dim s
dim x
dim k
s=Clng(inputbox("请输入第一个数","运算器"))
x=inputbox("请输入运算符:1加,2减,3乘,4除","运算器")
k=Clng(inputbox("请输入第一个数","运算器"))
if x=1 then
s=s+k
elseif x=2 then
s=s-k
elseif x=3 then
s=s*k
elseif x=4 then
s=s/k
end if
msgbox s
用户登录
还没有账号?立即注册
用户注册
投稿取消
| 文章分类: |
|
还能输入300字
上传中....
百里轩轅