易语言例程源码是用户编写的教程,属于易语言模块控件教程。
.计次循环首 (取数组成员数 (纵向金额), 计次1)
目的画板.定位写出 (10, 目的画板.高度 - (38 + 纵变量 × 计次1), 纵向金额 [计次1] + 纵向单位值)
目的画板.画直线 (左边距, 目的画板.高度 - (30 + 纵变量 × 计次1), 目的画板.宽度 - 30, 目的画板.高度 - (30 + 纵变量 × 计次1))
.计次循环尾 ()
横变量 = (目的画板.宽度 - 左边距 - 30) ÷ 取数组成员数 (横向文本1)
.如果 (取数组成员数 (横向文本1) < 21)
.计次循环首 (取数组成员数 (横向文本1), 计次1)
目的画板.定位写出 (左边距 - 8 + 横变量 × 计次1, 目的画板.高度 - 25, 横向文本1 [取数组成员数 (横向文本1) - 计次1 + 1])
目的画板.画直线 (左边距 + 横变量 × 计次1, 40, 左边距 + 横变量 × 计次1, 目的画板.高度 - 30)
.计次循环尾 ()
.否则
.计次循环首 (取数组成员数 (横向文本1), 计次1)
.如果 (上 = 真)
上 = 假
目的画板.定位写出 (左边距 - 8 + 横变量 × 计次1, 目的画板.高度 - 28, 横向文本1 [取数组成员数 (横向文本1) - 计次1 + 1])
.否则
目的画板.定位写出 (左边距 - 8 + 横变量 × 计次1, 目的画板.高度 - 17, 横向文本1 [取数组成员数 (横向文本1) - 计次1 + 1])
上 = 真
.如果结束
目的画板.画直线 (左边距 + 横变量 × 计次1, 40, 左边距 + 横变量 × 计次1, 目的画板.高度 - 30)
.计次循环尾 ()
上一篇 一键取硬盘序列号例子
下一篇 16进制读取器,实现读取文件数据