|
楼主 |
发表于 2015-5-14 23:25:01
|
显示全部楼层
吉林省长春市
.版本 2
.支持库 iext
.程序集 窗口程序集_启动窗口
.子程序 _按钮_计算_被单击
.局部变量 数值11, 整数型
.局部变量 数值12, 整数型
.局部变量 数值1, 整数型
.局部变量 数值2, 整数型
.局部变量 数字22, 整数型
.局部变量 数字33, 整数型
.局部变量 数字01, 整数型
.局部变量 数字02, 整数型
数值1 = 到整数 (编辑框_数字1.内容)
数值2 = 到整数 (编辑框_数字2.内容)
数值11 = 到整数 (编辑框_数字11.内容)
数值12 = 到整数 (编辑框_数字12.内容)
数字22 = 到整数 (编辑框_数字22.内容)
数字33 = 到整数 (编辑框_数字33.内容)
数字02 = 到整数 (编辑框_数字01.内容)
数字01 = 到整数 (编辑框_数字02.内容)
编辑框_结果.内容 = 到文本 (数值1 + 数值2)
编辑框_结果1.内容 = 到文本 (数值11 - 数值12)
编辑框_结果2.内容 = 到文本 (数字22 × 数字33)
编辑框_结果3.内容 = 到文本 (数字02 ÷ 数字01)
.子程序 _按钮_清除_被单击
连续赋值 (“”, 编辑框_数字1.内容, 编辑框_数字2.内容, 编辑框_结果.内容, 编辑框_数字11.内容, 编辑框_数字12.内容, 编辑框_结果1.内容, 编辑框_数字22.内容, 编辑框_数字33.内容, 编辑框_结果2.内容, 编辑框_数字01.内容, 编辑框_数字02.内容, 编辑框_结果3.内容)
.子程序 _按钮_记录清除_被单击
连续赋值 (“”, 编辑框_数值001.内容, 编辑框_数值002.内容, 编辑框_数值003.内容, 编辑框_数值004.内容)
.子程序 __启动窗口_创建完毕
时钟1.时钟周期 = 1000
.子程序 _时钟1_周期事件
透明标签1.标题 = 到文本 (取现行时间 ())
|
|