VB 计算器文本框为空时 直接弹出错误窗口 点击确定后自动关闭,还有下拉列表框怎么写代码,比如我选择是相乘,等于号怎么写就是相乘,选择加/减 等号结果就加/减
第1个回答 2015-02-25
在等号的按钮上,写代码:
if 文本框1.text="" or 文本框2.text="" then
msgbox "你没有输入数据"
else
select case 下拉框.text
case "*"
文本框3.text=文本框1.text * 文本框2.text
end select
end if本回答被网友采纳
if 文本框1.text="" or 文本框2.text="" then
msgbox "你没有输入数据"
else
select case 下拉框.text
case "*"
文本框3.text=文本框1.text * 文本框2.text
end select
end if本回答被网友采纳
第2个回答 2015-02-23