2016数据库Access应用(主编范萍-中央广播电视大学出版社) 运算符.docVIP

⑶ 动态数组 如果在程序运行之前不能肯定数组的大小，可以使用动态数组，建立动态数组的步骤如下： 声明空维表：Dim Array() 然后用ReDim语句配置数组个数。ReDim语句声明只能用在过程中，它是可执行语句，可以改变数组中元素的个数，但不能改变数组的维数。每次用ReDim配置数组时，原有数组的值全部清零。请看如下例子： Dim Aa() As Integer Dim I As Integer,J As Integer ReDim I Aa(7,5) For I=0 To 7 ? For J=0 To 5 ??? Aa(I,J)=I*J ? Next J Next I ReDim I Aa(9,2) For I=0 To 9 ????? For J=0 To 2 ??? Aa(I,J)=2*(I*J) ? Next J Next I? ? ? 5．运算符 ? ⑴ 算术运算符 加+?? 减-?? 乘*?? 除/?? 整除\?? 乘方^?? 求余Mod ? ⑵ 连接运算符 连接运算就是将两个表达式连接在一起。+和都能完成这个工作，但应尽量使用以。如： A1=#7/1/97# A2=”香港回归祖国” A3=A1A2 则变量A3的值为“97-7-1香港回归祖国” ? ⑶ 比较运算符 大于?? 小于?? 大于等于=? 小于等于=? 等于=?? 不等于 ? ⑷ 逻辑运算符 非Not?? 与And?? 或Or??? 异或Xor???? 逻辑相等（同或）Eqv???? 隐含（逐位比较）Imp 下面是真值表 ? A B Not A A Or B A And B A Xor B A Eqv B A Imp B 0 0 1 0 0 0 1 1 0 1 1 1 0 1 0 1 1 0 0 1 0 1 0 0 1 1 0 1 1 0 1 1 ? ⑸ 运算符的优先级 运算符的优先级顺序为：算术运算、连接运算、比较运算、逻辑运算。 ? ? 6．条件语句 ? VBA支持以下3种条件判断语句： ? ⑴ If…Then ? If条件 Then 程序代码 例如：If I5 Then Print“$” 又如：If (I5 And I0) Then Print “$” ? ⑵ If…Then…Else ? If条件1 Then ? 程序代码1 [Else If条件2 Then 程序代码2] ? … [Else 程序代码N+1] End If ? 例如： ? If Money10000 Then ? Tax=Money*0.2 Else If Money1000 Then ? Tax=Money*0.15 Else ? Tax=Money*0.1 End If ? ⑶ Select Case ? 当条件表达式仅有一个测试变量时，使用Select Case结构更有效。其语法如下： Select Case测试条件 ? Case 结果值1 ??? 程序代码1 ? [Case 结果值2 ??? 程序代码2] ??? … ? [Case Else ??? 程序代码N] End Select? ? 例如： ? Select Case X ? Case 1 ??? Print “One” ? Case 2 ??? Print “Two” ? Case 3 ??? Print “Three” ? Case 4 ??? Print “Best” ? Case Else ??? Print “Bad” End Select ? 1