VBA数据操作和运算总结.docxVIP

VBA基础系列【数据操作及运算】更新提示新增VBA教程PDF版17本，见底部菜单新增王佩丰Excel2010教程，编号为B7同样是后台回复编号获取链接和密码在讲解变量操作与运算之前，先看一个小例子：Sub test() Dim x As Byte Dim y As Boolean Dim c x = 1 y = 1 c = x + y Debug.Print x+y= cEnd Sub这个例子中代码的意思就不用说了，看上去是将x和y这两个变量都赋值了1，然后求和，那输出的和是多少呢？答案是：这当然不会是电脑计算出错了，原因肯定在我们开始定义的数据类型，x是Byte型数据，而y是Boolean型数据。那么用“+”运算后的c是什么类型呢？在代码最后添加一句Debug.Print TypeName(c)可以看到立即窗口中输出是“Integer”所以，原因就在于我们对x和y实行“+”运算的时候，电脑先强制转换了数据类型，然后再计算。在实际工作中，我们接触的最多的还是同类型的数据操作和运算。1、数学运算（主要针对数值型数据）该运算主要是数学计算可以实行该操作的数据有：Byte、Integer、Long、Single、Double、Currency、Date、Decimal，另外Boolean、Variant、String也可以进行部分运算。以下例子中假设变量A等于5，B等于10操作描述实例+两个变量相加A + B = 15-两个变量相减A - B w= -5*两个变量相乘A * B= 50/数学除法B / A =2%取相除后的余数B % A =0^幂运算B ^ A =100000此外还有一个比较特殊的是“\”(注意和除法区分，两个符号是相反的)，是整除运算符，相除之后只保留整数部分，比如4.2\2=2。因为强制转换Int(4.2/2)也能达到同样的效果，为了避免记混淆，相除取整一般用后者。2.比较运算该运算比较两个变量的大小关系，输出的是Boolean类型。可以实行该操作的数据有：Byte、Integer、Long、Single、Double、Currency、Date、Decimal，另外Boolean类型默认TrueFalseString类型中按英文字母表排序，大写字母小于小写字母。以下例子中同样假设变量A等于5，B等于10操作说明实例=判断两个值是否相等，如果相等，则返回“True”，否则，返回“False”(A = B) ： False.判断两个值是否相等，如果不相等，则返回“True”，否则，返回“False”(A B) ： True.判断符号左边的值是否大于右边，如果是，返回“True”；否则，返回“False”。(A B) ： False.判断符号左边的值是否小于右边，如果是，返回“True”；否则，返回“False”。(A B) ： True.=判断符号左边的值是否大于或等于右边，如果是，返回“True”；否则，返回“False”。(A = B) ： False.=判断符号左边的值是否小于或等于右边，如果是，返回“True”；否则，返回“False”。(A = B) ： True.3.逻辑运算主要用于Boolean的运算，比如True和False，可以判断两个比较运算之间的关系。输出的还是Boolean类型。以下例子中同样假设变量A等于5，B等于10OperatorDescriptionExampleAND称为“和”与运算，或者“与”，如果给出的两个条件都是“True”，则返回“True”。a0 AND b0 ： False.OR称为“或”与运算，如果给出的两个条件中，只要有一个是“True”，则返回“True”。a0 OR b0 ： true.NOT称为“否”与运算，用来反转或否定原来的值，如果原来的值为“True”，则返回“False”； 如果原来的值为“False”，则返回“True”。（可理解为“颠倒黑白”）NOT(a0 OR b0) ： false.XOR当两个条件有且只有一个为“True”时，返回“True”，否则，返回“False”。(a0 XOR b0) ： true.4.包含运算与等效VBA中并没有直接的包含关系的判断，“In”和“Not In”主要是在后期的循环、数组、以及SQL中用到，所以这里不细讲。一些特殊类型的包含关系是用函数来判断的，比如：判断“Today is /link?url=PEy7lKC0bvRUccMaWpqxZTTajzR0jfyspeF0da3Z2xwUnOUb5cejhKkeTJaXTI7Kg2r9aIgs6-RK85I9ct5Ujo4Qr01sicwSlPUZmBTfmnSWednesday”这句话中是否包含“is”可以用Instr函数来完成Sub t2()sen