您的位置:首页 > 编程开发 > 易语言

画板画Code39条形码

:2.818KB :2021-02-21 11:09:20

画板.清除 (0, 0, 画板1.宽度, 画板1.高度)
画板.画笔粗细 = 画笔宽度
.计次循环首 (取文本长度 (输出文本), 计次)
变量2 = 取文本中间 (输出文本, 计次, 1)
.如果真 (变量2 = “0”)
画板.画笔颜色 = #白色
画板.画直线 (计次 × 画笔宽度, 0, 计次 × 画笔宽度, 画板.高度)

.如果真结束
.如果真 (变量2 = “1”)
画板.画笔颜色 = #黑色
画板.画直线 (计次 × 画笔宽度, 0, 计次 × 画笔宽度, 画板.高度)
.如果真结束

.计次循环尾 ()

画板画Code39条形码例子。

拖放工具及分割置超级列表框
删除目录下的指定后缀名

同类资源