实验：学用DRVI可重构虚拟仪器实验平台

四、VBScript 运算符

VBScript 有一套完整的运算符，包括算术运算符、比较运算符、连接运算符和逻辑运算符。

算术运算符 描述 求幂 负号 乘 除 整除 求余 加 减 字符串连接 符号 描述 ^ - * / \\ 等于 不等于 小于 大于 小于等于 比较运算符 逻辑运算符 符号 描述 = <> < > <= >= Is 逻辑非 逻辑与 逻辑或 逻辑异或 逻辑等价 逻辑隐含 符号 Not And Or Xor Eqv Imp Mod 大于等于 + - & 对象引用比较

五、使用条件语句

使用条件语句和循环语句可以控制 Script 的流程。使用条件语句可以编写进行判断和重复操作的 VBScript 代码。在 VBScript 中可使用以下条件语句：

If...Then...Else 语句 Select Case 语句

使用 If...Then...Else 进行判断例程：

.....

If value = 0 Then b=1 End If .....

If b = 0 Then c=1 Else

c=2 End If .....

使用 Select Case 进行判断例程：

Select Case value Case 0

value=1 Case 1

value=2

Case 2

value=3 Case Else

value=4 End Select

六、使用循环语句

循环用于重复执行一组语句。循环可分为三类：一类在条件变为 False 之前重复执行语句，一类在条件变为 True 之前重复执行语句，另一类按照指定的次数重复执行语句。

在 VBScript 中可使用下列循环语句：

? Do...Loop： 当（或直到）条件为 True 时循环。

? For...Next： 指定循环次数，使用计数器重复运行语句。

使用 Do 循环例程：

myNum = 20

Do While myNum > 10 myNum = myNum - 1 counter = counter + 1 Loop

使用 For...Next例程：

Dim j, total

For j = 2 To 10 Step 2 total = total + j Next

七、使用过程

VBScript 中，过程被分为两类：Sub 过程和 Function 过程。 Sub 过程

Sub 过程是包含在 Sub 和 End Sub 语句之间的一组 VBScript 语句，执行操作但不返回值。Sub 过程可以使用参数（由调用过程传递的常数、变量或表达式）。如果 Sub 过程无任何参数，则 Sub 语句必须包含空括号 ()。 例如：

Sub ConvertTemp(data) temp = data/128 End Sub Function 过程

Function 过程是包含在 Function 和 End Function 语句之间的一组 VBScript 语句。Function 过程与 Sub 过程类似，但是 Function 过程可以返回值。Function 过程通过函

数名返回一个值，这个值是在过程的语句中赋给函数名的。Function 返回值的数据类型总是 Variant。

Function Celsius(fDegrees)

Celsius = (fDegrees - 32) * 5 / 9 End Function

八、常用Signal VBScript标准函数 1.数学函数

Abs函数：返回一个数字的绝对值。 调用方法：a=Abs(-100)

Asc函数：返回对应字串中第一个字母的 ANSI 字元码。 调用方法：a=Asc(\

Atn函数：返回一个数字的弧正切值(arctangent)。 调用方法：a=Atn(1)*180/3.14

CDbl函数：返回已转换成 Double 型的字符串的值。 调用方法：a=Abs(\

Cos函数：返回一角度(弧度)的余弦值。 调用方法：a=Cos(60*(3.14/180))

CStr函数：返回已转换成字符串的数字量的值。 调用方法：a=Cstr(2.56)

Exp函数：返回 e (自然对数的底数) 的某次方。 调用方法：a=Exp(1)

Int函数：返回数字的整数部分。 调用方法：a=Int(3.25)

Log函数：返回一个数字的自然对数。 调用方法：a=Log(12)

Randomize：初始化随机数产生器。 调用方法：Randomize Time

Rnd函数：返回一个随机数(0 到 1)。 调用方法：a=Rnd()

Round函数：返回已进位到指定小数位的数字。 调用方法：a=Round(2.75678,2)

Sgn函数：返回指出数字之正负号的整数。 调用方法：a=Sgn(-11)

Sin函数：返回一个角度(弧度)的正弦值。 调用方法：a=Sin(60*(3.14/180)) Sqr函数：返回一个数字的平方根。 调用方法：a=Sqr(9)

Tan函数：返回一个角度的正切值。 调用方法：a=Tan(1)

Time函数：返回 Date 子类型的当前系统时间。 调用方法：a=Time()

2.软件总线接口函数

RunIC：以直接命令方式驱动一组软件芯片工作。

调用方法：RunIC(\编号,IC2编号,...,ICn编号\Getline：读取软件总线数据线的值 调用方法：值=Getline(线号) Setline：设定软件总线的值 调用方法：Setline 线号,设定值

GetInterval：读取数组型数据线(内存条芯片)的数据点间隔 调用方法：数据点间隔=GetInterval(内存条芯片号)

Document.getArrayStart：读取数组型数据线(内存条芯片)的起始点坐标 调用方法：数据点间隔=Document.getArrayStart(内存条芯片号)

Document.getarrayline：读取数组型数据线(内存条芯片)上的波形或频谱数据到数组中 调用方法：Document.getarrayline 内存条芯片号,读取点数,数组名

注意：对于VBScript，其变量初始化为VARIANT不定型，该函数中的数组是Double型，使用前先需对其进行Double赋值，强制转换为Double类型，如下所示： Dim data(2048),data1(2048) For K = 0 To 2047 data(k)=0.00001 Next

Document.getarrayline 6000,2048,data

SetInterval：设定数组型数据线(内存条芯片)的数据点间隔 调用方法：SetInterval 内存条芯片号,数据点间隔 。

Document.setArrayStart：设定数组型数据线(内存条芯片)的起始点坐标