VBA基本语法之算术运算符比较运算符,它们具体都有什么含义?
上一篇文章给大家分享了什么是对象的属性和方法,以及怎么区分?
今天就给大家分享一章比较重要的VBA的基本语法中的算术运算符、比较运算符。
这些运算符等在VBA程序的运行当中是必不可少的,我们对不同的数据处理就需要不同的运算符号。
我们首先了解一下什么是算术运算符?
算术运算符号就是对数据进行算术运算的,一般得到的计算结果肯定也是数据类型的。
那么VBA中都有哪些算术运算符,它们都有什么功能呢?
求两个数的和例子:123
求两个数的差例子:211
求两个数的积例子:224
求两个数的商例子:422
(Mod)取余数运算例子:5217Mod52
指数运算例子:32339
举例子:
要使用到的数据表格:
代码:
Subsuanshuyunsuanfu()
Worksheets(sheet30)。Range(D2)Worksheets(sheet30)。Range(B2)Worksheets(sheet30)。Range(C2)
Worksheets(sheet30)。Range(D2)。Font。ColorRGB(255,0,0)
Worksheets(sheet30)。Range(D5)Worksheets(sheet30)。Range(B5)Worksheets(sheet30)。Range(C5)
Worksheets(sheet30)。Range(D5)。Font。ColorRGB(255,0,0)
Worksheets(sheet30)。Range(D8)Worksheets(sheet30)。Range(B8)Worksheets(sheet30)。Range(C8)
Worksheets(sheet30)。Range(D8)。Font。ColorRGB(255,0,0)
Worksheets(sheet30)。Range(D11)Worksheets(sheet30)。Range(B11)Worksheets(sheet30)。Range(C11)
Worksheets(sheet30)。Range(D11)。Font。ColorRGB(255,0,0)
Worksheets(sheet30)。Range(D14)Worksheets(sheet30)。Range(B14)Worksheets(sheet30)。Range(C14)
Worksheets(sheet30)。Range(D14)。Font。ColorRGB(255,0,0)
Worksheets(sheet30)。Range(D17)Worksheets(sheet30)。Range(B17)ModWorksheets(sheet30)。Range(C17)
Worksheets(sheet30)。Range(D17)。Font。ColorRGB(255,0,0)
EndSub
其次再了解一下什么是比较运算符号?
等于符号判断表达式是使用表达式A表达式B当表达式相等时就返回True,不相等的时候返回False。
小于符号判断表达式是使用表达式A表达式B当表达式A小于表达式B时就返回True,否则返回False。
大于符号判断表达式是使用表达式A表达式B当表达式A大于表达式B时就返回True,否则返回False。
小于等于符号判断表达式是使用表达式A表达式B当表达式A小于等于表达式B时就返回True,否则返回False。
大于等于符号判断表达式是使用表达式A表达式B当表达式A大于等于表达式B时就返回True,否则返回False。
不等于符号判断表达式是使用表达式A表达式B当表达式A不等于表达式B时就返回True,否则返回False。
Is比较两个对象的引用变量,对象AIs对象B,当对象A和对象B引用相同的对象时就返回True,否则返回False。
Like比较两个字符串是否匹配,字符串ALike字符串B,当字符串A和字符串B匹配时就返回True,否则返回False。
举个例子:
Subljys()
DimaAsInteger,bAsInteger
a10
b20
IfabThen
MsgBoxa和b相等
ElseIfabThen
MsgBoxa小于b
Else
MsgBoxa大于b
EndIf
EndSub
接下来要使用的数据表:
代码如下:
Sublj()
DimiAsInteger
Fori2To8
IfWorksheets(sheet31)。Cells(i,2)。ValueLike李Then
Worksheets(sheet31)。Cells(i,8)Worksheets(sheet31)。Cells(i,2)。Value
EndIf
Next
EndSub
这里面为了举Like的实例,使用了一个通配符,下一章我们会具体分享,这里大家只需要重点关注Like就行。
今天就分享到这里,明天继续,喜欢的请关注我,谢谢!
下一章我们接着分享,比较重要的逻辑运算符和通配符
日出晨光风景美图蓬勃而出的朝阳,总能给人一种希望。但温暖的阳光穿过云层照射在大地上的时候,一切都显得明亮而富有了生机。云彩变得瑰丽无比,山峦蒙上了薄薄的轻纱。一切都充满了希望,一切都充满了期待。朝
我们为什么要早起,难道仅仅是为了上班我们很多人早起,可能并不是自己的意愿而是被闹钟吵醒。因为我们要去上班,到上班的地方,终有一段距离,或近或远。单身的朋友们,大多数可能是匆匆起床,洗漱完毕之后就匆匆出门了。然后买上早
这样的女人,是一个会过日子的人吗?当家庭经济最困难的时候,女人却还有心思出去旅游。这样的女人是一个过日子的人吗生活本身就是五彩斑斓的。人到了中年反而心灵越加的敏感和脆弱。今日也约定好出去逛逛,她却在准备出门的时候说
雪压青松不弯腰主席在困难面前的壮志豪情与乐观自信,催人奋进对许多人来说,只要谈到毛主席,崇敬和爱戴之情就会溢于言表和油然而生。而对于主席在困难和挫折面前的壮志凌云乐观向上自信不屈,许多人更是佩服和敬仰。然而,一旦谈到主席处于低谷时期的乐观
随笔英年早逝的都是些什么人走在秋天的阳光里,暖暖的,秋天的色彩很美,给人踏实的感觉。生活真好,世界真好,活着真好。但是,最近却总见发布英年早逝的消息。四十多岁,五十多岁,正是人生最成熟的时候。他们事业有成,
非凡十年警心向党欢歌盛世以诗寄情藏蓝的诗行诗歌之美,不仅彰显着气自华的雍容气度,也可以传情咏志聚力。盛世之美,不仅包括雄浑辽阔的热土,也深藏细腻温热的情怀不仅有一代代人的艰辛探索,也有一代代人的接力奋斗。忆往昔,
独在小镇为客守坐在回家的公交车上,看着窗外高楼大厦闪烁着五彩的霓虹灯,这是新区繁华的CBD,我将缓缓离它而去,到边缘的小镇去,因那里有我使出毕生心血购来的小窝,繁华的地段置办不起房产,只好委屈自
牛驼寨的集我赶过大大小小的集,都是在十里八乡的村镇,最远就是在县城了。在大城市赶集少而又少,前几年没有疫情,曾在早市买过蔬菜和水果,还有一些日常用品。这次远离了市中心,住到了郊区,不知不觉集
武汉东湖4万余株红叶地肤迎来最佳观赏期极目新闻记者丁晨通讯员冯瑛金秋十月,武汉东湖马鞍山森林公园成为武汉市民赏秋踏青遛娃的最佳去处之一。位于东湖马鞍山森林公园南区的梦花源红色地肤乐园内的4万余株红叶地肤进入了换装期。随
卢建伟巩义的荷湖文卢建伟巩义最早的荷湖,根据我的记忆应该是2014年前出现在陇海桥新兴桥下面的石河道那片。我记的2015夏天,当时看护人叫老张,据说是他承包了那片湖,放了一二十个脚踏船平时出租让人
秋天的约会秋日生活打卡季秋天总是让人想到万物凋零的景象,但在我们这里不同,秋意渐浓,邂逅在万亩海棠园中,眼睛一下就被那挂满枝头的红果果吸引了去。一眼望过去,在阳光的照耀下,它们红的晶莹剔透,