脚本之家,脚本语言编程技术及教程分享平台!
分类导航

Python|VBS|Ruby|Lua|perl|VBA|Golang|PowerShell|Erlang|autoit|Dos|bat|

服务器之家 - 脚本之家 - VBS - VBS教程:函数-Eval 函数

VBS教程:函数-Eval 函数

2020-06-27 12:31脚本之家 VBS

这篇文章为大家介绍了vbs函数之Eval 函数,实现计算一个表达式的值并返回结果,有需要的童鞋可以参考一下

Eval 函数

计算一个表达式的值并返回结果。

 [result = ]Eval(expression)

参数

result

可选项。 是一个变量,用于接受返回的结果。如果未指定结果,应考虑使用 Execute 语句代替。

expression

必选项。可以是包含任何有效 VBScript 表达式的字符串。

说明

在 VBScript 中,x = y 可以有两种解释。第一种方式是赋值语句,将 y 的值赋予 x。第二种解释是测试 xy 是否相等。如果相等,resultTrue;否则 resultFalseEval 方法总是采用第二种解释,而 Execute 语句总是采用第一种。

注意  在Microsoft(R) Visual Basic Scripting Edition 中不存在这种比较与赋值的混淆,因为赋值运算符(=)与比较运算符 (==)不同。

下面的例子说明了 Eval 函数的用法:

Sub GuessANumber  Dim Guess, RndNum  RndNum = Int((100) * Rnd(1) + 1)  Guess = CInt(InputBox("Enter your guess:",,0))  Do    If Eval("Guess = RndNum") Then      MsgBox "祝贺你!猜对了!"      Exit Sub    Else      Guess = CInt(InputBox("对不起,请再试一次",,0))    End If  Loop Until Guess = 0End Sub

延伸 · 阅读

精彩推荐