可以用vbs制作四则运算计算器吗

如题所述

第1个回答  2017-05-16

VBS计算器,代码如下:

dim x,y,d
Do Until d = vbno
x=inputbox("输入算式","算式计算器",y)
y=eval(x)
d=msgbox (x & "=" & y & chr(10) & "继续吗?" ,vbYesNo, "算式计算器")
loop

满意请采纳,谢谢

本回答被网友采纳

可以用vbs制作四则运算计算器吗
VBS计算器,代码如下:dim x,y,dDo Until d = vbnox=inputbox("输入算式","算式计算器",y)y=eval(x)d=msgbox (x & "=" & y & chr(10) & "继续吗?" ,vbYesNo, "算式计算器")loop满意请采纳,谢谢

简易计算器的设计与实现:能进行简单的四则运算和基本数学函数(如对数...
最简单的方法应该是用函数EVAL了吧,它直接可以把包含四则运算和基本数学函数(如对数,指数,三解函数等)的表达式计算为数值:方法如下:打开记事本:输入下面代码:on error resume next do s=eval(s)s=inputbox("结果:"&s&chr(13)&chr(10)&"请输入表达式,为空则退出")loop until s=""然后...

可否将一窜有括号加减乘除百分之复制到计算器直接计算?
不可以。但是放到记事本就可以 操作如下:(X=3+4*56\/3*3 MSGBOX X)把括号里的内容保存为vbs文件 比如:计算器.vbs 双击运行就得出答案了 运算顺序是按照四则运算法则 另外还可以计算函数

怎么用VBS写一个判断大小的程序?(谢谢您的回答)
我想你已经发现了, vbs中的数学计算和真正的算术没有什么不同, +,-,*,\/,(),[],{}都是一样的用法, 比如: dim ans ans=12+32\/4+[(23-10)*2] msgbox(ans) 四则运算的法则在编程中同样生效, 你可以在编程中重新获得小学时候的乐趣(你恨数学?那就别学电脑了). 在编程中有一个有趣的运算符是"mod...

用VBS写一段程序定时关闭指定程序?
代码如下:Dim WS'Dim variable.Set WS=WScript.CreateObject("WScript.Shell")'Create object.WS.Run "",1'上面一行双引号中键入文件路径.逗号后面的"1"意思为正常运行此程序,改为0可隐藏运行.WS.Run "taskkill \/f \/im notepad.exe"...

VBS 怎么判断4个数中,有三个一样,或是有两个一样,或是各不相同?_百度...
ok, 这么一修改, 无论用户输入怎样的数据, 我们都能计算出矩形的面积了. 如果你用s=15*12能改嘛? 当然不行. 我想你已经发现了, vbs中的数学计算和真正的算术没有什么不同, +,-,*,\/,(),[],{}都是一样的用法, 比如: dim ans ans=12+32\/4+[(23-10)*2] msgbox(ans) 四则运算的法则在编程中...

各位姐姐哥哥们:vbs中的wscript.shell是什么意思,如果是高手的话就...
ok, 这么一修改, 无论用户输入怎样的数据, 我们都能计算出矩形的面积了. 如果你用s=15*12能改嘛? 当然不行. 我想你已经发现了, vbs中的数学计算和真正的算术没有什么不同, +,-,*,\/,(),[],{}都是一样的用法, 比如: dim ans ans=12+32\/4+[(23-10)*2] msgbox(ans) 四则运算的法则在编程中...

相似回答