在vb编程中，常常需要计算表达式的值，例如3+6、sin(-8)或(3>4)%ignore_a_1%r(1>5)等。下面将介绍一种利用微软脚本控件来实现表达式求值的技巧。
1、 打开VB6.0，新建一个标准EXE工程。
2、 设计界面时，放置两个label控件，并将其caption属性分别设置为“表达式”和“值”。
3、 然后添加两个Textbox控件，分别命名为txbExpression和txbValue，用来输入表达式以及显示运算结果。
4、 最后再添加一个命令按钮，命名为cmdCalc，其标题设为“计算”。
5、 双击命令按钮，进入代码编辑界面，在txbCalc_Click事件里编写以下代码：
6、 定义一个字符串变量，用于存储表达式内容。
7、 再定义一个字符串变量Rst，用来保存运算结果。
8、 创建并初始化 ScriptControl 对象，具体代码如下：
创意艺术设计的网站模板
创意艺术设计的网站模板创意艺术是指是把再简单不过的东西或想法不断延伸给予的另一种表现方式，创意设计包括工业设计、建筑设计、包装设计、平面设计、服装设计、个人创意特区等内容。设计除了具备“初级设计”和“次设计”的因素外，还需要融入“与众不同的设计理念——创意”。搜索一、初级设计范围划分一般是以是否在表达图形上是否以“具象化”为指导目标，标志设计就像绘画一样真实表现图形。二、次级设
50 查看详情
9、 设置 SCtl = CreateObject(MSScriptControl.ScriptControl)
10、 这一步是为了初始化脚本控制对象，方便后续调用。
11、 将表达式的内容赋值给变量Str，比如：Str = txbExpression.Text
12、 设置脚本语言为VBScript，代码如下：SCtl.Language = “VBScript”
13、 利用 SCtl 对象的 Eval 方法对字符串 Str 的表达式进行求值，并将结果保存到 VBScriptRst 变量中。
14、 将计算结果赋值给变量 txbValue 并展示最终输出。
15、 按下F5运行程序，在输入框内输入任意表达式，点击“计算”按钮，程序会快速给出正确答案。需要注意的是，因为使用了脚本控件，所以输入的表达式必须符合VBScript的语法规则。只要满足VBScript语法的表达式都可以正确计算，而不符合该规则的表达式则无法被处理。
以上就是VB中计算表达式值的方法的详细内容，更多请关注创想鸟其它相关文章！
版权声明：本文内容由互联网用户自发贡献，该文观点仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。
如发现本站有涉嫌抄袭侵权/违法违规的内容， 请发送邮件至 chuangxiangniao@163.com 举报，一经查实，本站将立刻删除。
发布者：程序猿，转转请注明出处：https://www.chuangxiangniao.com/p/1145892.html
微信扫一扫 
支付宝扫一扫 
