一段神奇的代码

aidijy

会计专用，表格设计

  

子程序名	返回值类型	公开	备 注
高级表格初始

变量名	类 型	静态	数组	备 注
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	特殊功能支持库

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

补充内容 (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”)
加入新功能 ，图片置入

aidijy

.版本 2
.支持库 eGrid

data ＝ { “ 序 号 ”, “ 年 ”, “ 月 ”, “ 日 ”, “子 目”, “ 号数 ”, “ 摘 要 ”, “亿”, “千”, “百”, “十”, “万”, “千”, “百”, “十”, “元”, “角”, “分”, “亿”, “千”, “百”, “十”, “万”, “千”, “百”, “十”, “元”, “角”, “分”, “借或贷”, “亿”, “千”, “百”, “十”, “万”, “千”, “百”, “十”, “元”, “角”, “分”, “√” }
.计次循环首 (42, i)
    高级表格1.置数据 (1, i － 1, 1, data [i])
.计次循环尾 ()
替换掉相关代码，更简洁，记住，data是42成员的数组

lls5818

怎么联系你

富贵小白

怎么联系你

yunying

感谢楼主分享开源

易学易精

一段神奇的代码

易学易精

感谢分享 下载学习下

易学易精

感谢楼主分享开源

易学易精

感谢楼主分享开源

易学易精

感谢楼主分享开源

易学易精

神奇  下载学习下

小帅哥更

好神奇的代码，收藏了