发布网友 发布时间:2024-10-18 22:06
共1个回答
热心网友 时间:2024-10-20 07:22
新建一个表单,加4个文本框,一个标签,两个命令按钮,一个计算,一个清空
a=thisform.text1.value fuhao=thisform.text2.value b=thisform.text3.value
计算click事件:if fuhao="+" result=a+b endif
if fuhao="-" result=a-b endif
if fuhao="*" result=a*b endif
if fuhao="/" if b=0 messagebox("除数不能为零",32,"提示信息") endif result=a/b endif
result=thisform.text4.value