为了让它更人性化,我们才采用变量的。
试想下,我们让用户设置运算符,然后让用户输入要运算的数据。这样是不是更人性化呢?
那么我们可以这样
dim a,b,c
'c保存用户的运算符
dim temp
'temp保存计算结果
do
a = inputbox("请输入数值1:","输入数值")
'获得第一个数值
if a = "" then
'如果变量a里面没有数据
msgbox "您没有输入数值",,"错误"
else
exit do
end if
loop
do
'开始循环
c = inputbox("请输入运算符(+ - * /)","输入运算符","+")
'获得运算符数据
if c = "+" or c = "-" or c = "*" or c = "/" then
'如果用户输入的运算符是+或者-或者*或者/
exit do
'退出循环
else
'否则
msgbox "运算符错误,未知的运算符"&c,,"错误"
'报错
end if
'if结尾处
loop<