|
楼主 |
发表于 2020-2-12 18:34:43
|
显示全部楼层
//如果填入值非整数,那么在界面编辑框控件属性把"数字"属性改为false,否则只能输入整数
功能 编辑框0_内容改变()//交强险
计算结果()
结束
功能 编辑框1_内容改变()//商业险
计算结果()
结束
功能 编辑框2_内容改变()//车船税
计算结果()
结束
功能 计算结果()
变量 总金额, 返点, 实收, 交强险值, 商业险值, 车船税值
交强险值 = 编辑框获取文本("编辑框0")//取填入的交强险值
商业险值 = 编辑框获取文本("编辑框1")//取填入的商业险值
车船税值 = 编辑框获取文本("编辑框2")//取填入的车船税值
如果(交强险值 != "" && 商业险值 != "" && 车船税值 != "")//判断三个编辑框是否都填入了值,如果都填入了值,那么开始计算结果,否则不计算只还原初始状态值
总金额 = 交强险值 + 商业险值 + 车船税值
返点 = 交强险值 * 4 / 100 / 1.06 + 商业险值 * 20 / 100 / 1.06
实收 = 总金额 - 返点
标签设置文本("标签4", "总金额:" & 总金额)//将结果写到界面标签上
标签设置文本("标签5", "返 点:" & 返点)
标签设置文本("标签6", "实 收:" & 实收)
否则
标签设置文本("标签4", "总金额:0")
标签设置文本("标签5", "返 点:0")
标签设置文本("标签6", "实 收:0")
结束
结束
我看了TAB键切换输入框的那个文件了,但是不知道把代码加到那个位置。 |
|