精易论坛

标题: 一段神奇的代码 [打印本页]

作者: aidijy    时间: 2018-11-9 21:27
标题: 一段神奇的代码
本帖最后由 aidijy 于 2018-11-9 21:32 编辑

会计专用,表格设计
  
子程序名返回值类型公开备 注
高级表格初始  
变量名类 型静态数组备 注
i整数型 
高级表格1.列数 = 42
高级表格1.置列宽 (0, 50)
高级表格1.置列宽 (1, 40)
高级表格1.置列宽 (2, 30)
高级表格1.置列宽 (3, 30)
高级表格1.置列宽 (4, 60)
高级表格1.置列宽 (5, 100)
高级表格1.置列宽 (6, 200)
高级表格1.置列宽 (29, 50)
高级表格1.置数据 (1, 0, 1, “ 序 号 ”)
高级表格1.置数据 (1, 1, 1, “  年  ”)
高级表格1.置数据 (1, 2, 1, “ 月 ”)
高级表格1.置数据 (1, 3, 1, “ 日 ”)
高级表格1.置数据 (1, 4, 1, “子  目”)
高级表格1.置数据 (1, 5, 1, “ 号数 ”)
高级表格1.置数据 (1, 6, 1, “    摘    要    ”)
高级表格1.置数据 (1, 7, 1, “亿”)
高级表格1.置数据 (1, 8, 1, “千”)
高级表格1.置数据 (1, 9, 1, “百”)
高级表格1.置数据 (1, 10, 1, “十”)
高级表格1.置数据 (1, 11, 1, “万”)
高级表格1.置数据 (1, 12, 1, “千”)
高级表格1.置数据 (1, 13, 1, “百”)
高级表格1.置数据 (1, 14, 1, “十”)
高级表格1.置数据 (1, 15, 1, “元”)
高级表格1.置数据 (1, 16, 1, “角”)
高级表格1.置数据 (1, 17, 1, “分”)
高级表格1.置数据 (1, 18, 1, “亿”)
高级表格1.置数据 (1, 19, 1, “千”)
高级表格1.置数据 (1, 20, 1, “百”)
高级表格1.置数据 (1, 21, 1, “十”)
高级表格1.置数据 (1, 22, 1, “万”)
高级表格1.置数据 (1, 23, 1, “千”)
高级表格1.置数据 (1, 24, 1, “百”)
高级表格1.置数据 (1, 25, 1, “十”)
高级表格1.置数据 (1, 26, 1, “元”)
高级表格1.置数据 (1, 27, 1, “角”)
高级表格1.置数据 (1, 28, 1, “分”)
高级表格1.置数据 (1, 29, 1, “借或贷”)
高级表格1.置数据 (1, 30, 1, “亿”)
高级表格1.置数据 (1, 31, 1, “千”)
高级表格1.置数据 (1, 32, 1, “百”)
高级表格1.置数据 (1, 33, 1, “十”)
高级表格1.置数据 (1, 34, 1, “万”)
高级表格1.置数据 (1, 35, 1, “千”)
高级表格1.置数据 (1, 36, 1, “百”)
高级表格1.置数据 (1, 37, 1, “十”)
高级表格1.置数据 (1, 38, 1, “元”)
高级表格1.置数据 (1, 39, 1, “角”)
高级表格1.置数据 (1, 40, 1, “分”)
高级表格1.置数据 (1, 41, 1, “√”)
高级表格1.置对齐方式 (0, 0, 高级表格1.行数, 高级表格1.列数, #表格常量 .居中对齐)
' 高级表格1.合并 (0, 0, 0, 6)
' 高级表格1.置数据 (0, 0, 1, “  凭  证  信  息  ”)
高级表格1.合并 (0, 0, 0, 3)
高级表格1.置数据 (0, 0, 1, “会计科目:”)
高级表格1.置对齐方式 (0, 0, 0, 3, #表格常量 .左对齐)
高级表格1.合并 (0, 4, 0, 5)
高级表格1.置数据 (0, 4, 1, “明细科目:”)
高级表格1.置对齐方式 (0, 4, 0, 5, #表格常量 .左对齐)
' 高级表格1.合并 (0, 6, 0, 6)
高级表格1.置数据 (0, 6, 1, “子目:”)
高级表格1.置对齐方式 (0, 6, 0, 6, #表格常量 .左对齐)
高级表格1.合并 (0, 7, 0, 17)
高级表格1.置数据 (0, 7, 1, “  借  方  金  额  ”)
高级表格1.合并 (0, 18, 0, 28)
高级表格1.置数据 (0, 18, 1, “  贷  方  金  额  ”)
高级表格1.合并 (0, 29, 1, 29)
高级表格1.置数据 (0, 29, 1, “借或贷”)
高级表格1.合并 (0, 30, 0, 40)
高级表格1.置数据 (0, 30, 1, “    余      额    ”)
高级表格1.合并 (0, 41, 1, 41)
高级表格1.置数据 (0, 41, 1, “√”)
高级表格1.置单元格文字颜色 (0, 7, 高级表格1.行数, 17, #红色 )
高级表格1.置单元格文字颜色 (0, 18, 高级表格1.行数, 28, #蓝色 )
调试输出 (到文本 (高级表格1.取数据 (3, 29)))
高级表格1.表格线颜色 = #墨绿
高级表格1.置行高 (0, 35)
高级表格1.置行高 (1, 30)
计次循环首 (高级表格1.行数, i)
如果 (到文本 (高级表格1.取数据 (i, 29)) = “借”)
高级表格1.置单元格文字颜色 (i, 29, i, 29, #红色 )
高级表格1.置单元格文字颜色 (i, 29, i, 29, #蓝色 )

计次循环尾 ()


i支持库列表   支持库注释   
eGrid高级表格支持库
spec特殊功能支持库








补充内容 (2018-11-12 15:26):
觉得没用循环的,可以写个固定数组,然后用循环,可以省好多代码了


补充内容 (2018-11-12 15:57):
https://125.confly.eu.org/forum.php?mod ... 91&pid=14508238
数组功能添加了,在这里

补充内容 (2018-11-12 22:55):
.版本 2
.支持库 eGrid

高级表格1.置列宽 (41, 232)
高级表格1.置行高 (1, 232)
高级表格1.置列类型 (41, #表格常量.图片型)
高级表格1.置数据 (1, 41, #表格常量.图片型, “d:\f.png”)
加入新功能 ,图片置入
作者: 专注研究    时间: 2018-11-9 21:35
提示: 作者被禁止或删除 内容自动屏蔽
作者: 易易语    时间: 2018-11-9 21:52
看着工程浩大,思路挺好,有人能用的上。最好简化一下。。嘿嘿
作者: zz5331    时间: 2018-11-9 21:53
神奇
作者: 东皇大人    时间: 2018-11-9 21:55
神奇 神奇 神奇
作者: 周sir    时间: 2018-11-9 22:42
哎哟我去,我感觉写这么一段,是很累的   有用的人这段神器的代码,绝对能省很多事
作者: sxlldaj    时间: 2018-11-9 22:42
谢谢分享,正在学习
作者: ㄣ负二代    时间: 2018-11-9 22:52
原来是财务的东西
作者: 夜华    时间: 2018-11-9 23:11
博大精深!!!!!
作者: 维生素B    时间: 2018-11-10 03:26
感谢分享。、。。
作者: 西瓜小刚    时间: 2018-11-10 09:20
厉害了  会玩
作者: 178826559    时间: 2018-11-10 09:30
已复制并使用!

感觉效果真不错。
作者: luoran    时间: 2018-11-10 11:29
        支持开源~!感谢分享
作者: jushunhe    时间: 2018-11-10 11:35
看标题来的
作者: kyo9766    时间: 2018-11-10 14:06
就喜欢楼主这种性格,一高兴直接甩源码
作者: 夢幽痕    时间: 2018-11-10 23:43
看标题来的
作者: 56448412    时间: 2018-11-11 22:06
写那么多!计次循环了解一下
作者: aidijy    时间: 2018-11-12 06:30
56448412 发表于 2018-11-11 22:06
写那么多!计次循环了解一下

能计次的都用上了,不能计次的一个格子一个文本
作者: aidijy    时间: 2018-11-12 06:32
aidijy 发表于 2018-11-12 06:30
能计次的都用上了,不能计次的一个格子一个文本

不过可以丢个文本数组来完成赋值
作者: 飞飞怕冷    时间: 2018-11-12 08:01
我只是看看不说
作者: aidijy    时间: 2018-11-12 15:56
.版本 2
.支持库 eGrid

data = { “ 序 号 ”, “ 年 ”, “ 月 ”, “ 日 ”, “子 目”, “ 号数 ”, “ 摘 要 ”, “亿”, “千”, “百”, “十”, “万”, “千”, “百”, “十”, “元”, “角”, “分”, “亿”, “千”, “百”, “十”, “万”, “千”, “百”, “十”, “元”, “角”, “分”, “借或贷”, “亿”, “千”, “百”, “十”, “万”, “千”, “百”, “十”, “元”, “角”, “分”, “√” }
.计次循环首 (42, i)
    高级表格1.置数据 (1, i - 1, 1, data [i])
.计次循环尾 ()
替换掉相关代码,更简洁,记住,data是42成员的数组
作者: LOVESHINENA    时间: 2018-11-12 19:13
66666666666666666666666
作者: 小帅哥更    时间: 2018-11-12 21:11
好东西,收藏了。
作者: 小帅哥更    时间: 2018-11-12 21:11
好东西,收藏了。
作者: 小帅哥更    时间: 2018-11-12 21:12
好神奇的代码,收藏了
作者: 易学易精    时间: 2018-11-12 22:47
神奇  下载学习下

作者: 易学易精    时间: 2018-11-12 22:57
感谢楼主分享开源
作者: 易学易精    时间: 2018-11-12 22:57
感谢楼主分享开源
作者: 易学易精    时间: 2018-11-12 22:57
感谢楼主分享开源
作者: 易学易精    时间: 2018-11-12 23:06
感谢分享 下载学习下
作者: 易学易精    时间: 2018-11-12 23:08
一段神奇的代码
作者: yunying    时间: 2018-11-13 15:21
提示: 作者被禁止或删除 内容自动屏蔽
作者: 富贵小白    时间: 2018-11-21 15:10
怎么联系你
作者: lls5818    时间: 2019-10-23 13:29
怎么联系你




欢迎光临 精易论坛 (https://125.confly.eu.org/) Powered by Discuz! X3.4