|
发表于 2012-12-31 18:29:33
|
显示全部楼层
广东省中山市
也许我的写法很差...
[e]
.版本 2
.程序集 窗口程序集1
.程序集变量 图片1, 文本型
.程序集变量 图片2, 文本型
.程序集变量 分割1, 文本型, , "0"
.程序集变量 分割2, 文本型, , "0"
.子程序 _按钮1_被单击
.局部变量 a, 整数型
.局部变量 a1, 整数型
.局部变量 c, 整数型
.局部变量 c1, 整数型
图片1 = 到文本 (快照 (, , ))
图片2 = 到文本 (快照 (, 60, 60))
a = 取文本长度 (图片1) ÷ 5
a1 = 取文本长度 (图片2) ÷ 5
.计次循环首 (5, )
加入成员 (分割1, 取文本中间 (图片1, c, a))
c = c + a + 1
加入成员 (分割2, 取文本中间 (图片2, c1, a1))
c1 = c1 + a1 + 1
.计次循环尾 ()
对比_ ()
.子程序 对比_
.局部变量 b, 整数型
.计次循环首 (5, b)
.判断开始 (分割1 = 分割2 )
.判断开始 (b = 5)
信息框 (“相等”, 0, )
.默认
.判断结束
.默认
信息框 (“不相等”, 0, )
跳出循环 ()
.判断结束
.计次循环尾 ()
[/e] |
|