上一篇文章给大家分享了什么是对象的属性和方法,以及怎么区分?
今天就给大家分享一章比较重要的VBA的基本语法中的算术运算符、比较运算符。
这些运算符等在VBA程序的运行当中是必不可少的,我们对不同的数据处理就需要不同的运算符号。
我们首先了解一下什么是算术运算符?
算术运算符号就是对数据进行算术运算的,一般得到的计算结果肯定也是数据类型的。
那么VBA中都有哪些算术运算符,它们都有什么功能呢?
❶ “+” 求两个数的和 例子:1+2=3
❷“-” 求两个数的差 例子:2-1=1
❸“*” 求两个数的积 例子:2*2=4
❹“/” 求两个数的商 例子:4/2=2
❺“%”(Mod) 取余数运算 例子:5%2=1 7 Mod 5=2
❻“^” 指数运算 例子:3^2=3*3=9
举例子:
要使用到的数据表格:
代码:
Sub suanshuyunsuanfu()
Worksheets(&34;).Range(&34;)= Worksheets(&34;).Range(&34;) + Work sheets(&34;).Range(&34;)
Worksheets(&34;).Range(&34;).Font.Color = RGB(255,0,0)
Worksheets(&34;).Range(&34;) = Worksheets(&34;).Range(&34;) - Worksheets(&34;).Range(&34;)
Worksheets(&34;).Range(&34;).Font.Color = RGB(255,0,0)
Worksheets(&34;).Range(&34;) = Worksheets(&34;).Range(&34;) * Worksheets(&34;).Range(&34;)
Worksheets(&34;).Range(&34;).Font.Color = RGB(255,0,0)
Worksheets(&34;).Range(&34;)= Worksheets(&34;).Range(&34;) / Worksheets(&34;).Range(&34;)
Worksheets(&34;).Range(&34;)= Worksheets(&34;).Range(&34;) ^ Worksheets(&34;).Range(&34;)
Worksheets(&34;).Range(&34;).Font.Color = RGB(255,0,0)
Worksheets(&34;).Range(&34;)= Worksheets(&34;).Range(&34;) Mod Worksheets(&34;).Range(&34;)
End Sub
其次再了解一下什么是比较运算符号?
❶“=” 等于符号 判断表达式是使用 表达式A=表达式B 当表达式相等时就返回True ,不相等的时候返回False。
❷“<” 小于符号 判断表达式是使用 表达式A<表达式B 当表达式A小于表达式B时就返回True ,否则返回False。
❹“<=” 小于等于符号 判断表达式是使用 表达式A<=表达式B 当表达式A小于等于表达式B时就返回True ,否则返回False。
❻“<>” 不等于符号 判断表达式是使用 表达式A<>表达式B 当表达式A不等于表达式B时就返回True ,否则返回False。
❻“Is” 比较两个对象的引用变量,对象A Is 对象B ,当对象A和对象B引用相同的对象时就返回True ,否则返回False。
❼“Like” 比较两个字符串是否匹配,字符串A Like 字符串B ,当字符串A和字符串B匹配时就返回True ,否则返回False。
举个例子:
Sub ljys()
Dim a As Integer,b As Integer
a = 10
b = 20
If a = b Then
MsgBox &34;
ElseIf a < b Then
MsgBox &34;
Else
MsgBox &34;
End If
End Sub
接下来要使用的数据表:
代码如下:
Sub lj()
Dim i As Integer
For i = 2 To 8
Worksheets(&34;).Cells(i,8)=Worksheets(&34;).Cells(i,2).Value
End If
Next
End Sub
今天就分享到这里,明天继续,喜欢的请关注我,谢谢!
下一章我们接着分享,比较重要的逻辑运算符和通配符