
a=thisformtext1value
b=thisformtext2value
c=thisformoptiongroup1value
do case
case c=1
y=a+b
case c=2
y=a-b
case c=3
y=ab
case c=4
y=a/b
endcase
thisformtext3value=y
thisformrefresh
1、首先点击打开左上角文件中的“新建”选项。
2、在d出的新界面,依次 *** 作:勾选项目选项,点击新建按钮;
3、在d出的新窗口,选择保存路径,设置项目文件名称,回车确定。
4、在出现的界面中,点击打开“其他”设置选项。
5、然后在d出来的界面中,打开菜单级,选择新建一个菜单级。
6、然后在d出来的界面中,对菜单名称、结果、选项进行编辑,运行表单在选型中填写Do form 表单路径\表单名scx,保存表单设计,按下enter键确定,这样就完成了。
将下面的代码写在按钮的click事件中:t1=alltrim(thisformtext1value)
r=&t1
thisformlabel1caption=alltrim(str(r))
文本框和标签不加代码。
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)