vb.net的算术运算代码和实例教程用法 - 信息发布软件,b2b软件,广告发布软件

算术运算是高级语言所要实现的最基本的功能。
算术运算也就是通常所说的数学运算，在vb.net中新增了一些算术运算符，这些新增的算术运算符是由基本运算符所组成的。
下表列出了这些算术运算符：
运算符名称类型说明
+ 加号双目运算符加号两边的操作数是数字类型时，要注意有没有溢出的可能；另外，“Single”类型与“Long”类型相加时，返回值为“Double”类型，如果两个操作数都为“Empty”，则返回值为“Integer”；一个是“Empty”，另一个不是时，另一个操作数即是返回值
- 减号或负号双目运算符或单目运算符做双目运算符时同加号。单目运算时，表示一个数的相反数
* 乘号双目运算符同加号
/ 浮点除号双目运算符操作数同时为“Byte”、“Integer”或“single”，返回值在不溢出时为“Single”或“Double”
\ 整除号双目运算符操作数可以是任何类型的数，但在运算时都被取整，返回值一般为“Byte”、“Single”、“Double”。
MOD 求余号双目运算符返回第一个操作数整除第二个操作数的余数，例如：10 MOD 3结果为1；12.6 MOD 5结果为3
^ 求指号双目运算符对第一操作数进行连乘，连乘次数为第二个操作数，注意：求指号的运算顺序为从右到左，例如：3^3^3结果为19683，而(3^3)^3结果为729

复制代码

VB .NET的运算符包括算术运算符、关系运算符、字符串连接运算符、逻辑运算符和赋值运算符。
1. 算术运算符
算术运算符是用来进行数值计算的运算符，共有7个：+、-、*、/、\、Mod和^。其中+、-、*分别是加法、减法和乘法运算，含义很明确。
^运算符：求一个数的某次方。例如2^3，表示求23。
/运算符：两个数相除并返回一个浮点数商。例如3/4，表示求3除以4所得的商。
\运算符：两个整数进行整除并返回整数商。例如3\4，表示求3除以4所得的整数商。
Mod运算符：两个数相除并返回余数。例如3 Mod 4，表示求3除以4所得的余数。
2. 关系运算符
其中比较运算符用来比较两个表达式，结果为True（真）或False（假），如5>9为False，18>10为True。常用的关系运算符如表3-3所示。
此外，VB .NET还有两种关系运算符：Is和Like。
表3-3 常用关系运算符
运算符名称说明
< 小于操作数可以是任何合理的表达式
<= 小于等于同“小于等于”号
> 大于同“大于”号
>= 大于等于同“大于等于”号
= 等于同“等于”号
<> 不等于同“不等于”号
(1) Is运算符
Is运算符用于对象比较，要求操作数是Object类型，如果两个操作数表示同一个对象，那么返回“True”，反之则返回“False”，例如：
Dim Obj1, Obj2, Obj3, Obj4 As Object
Dim R As Boolean
Obj2=Obj1 : Obj3=Obj1 : Obj3=Obj4
R=Obj1 Is Obj2 '返回True
R=Obj1 Is Obj3 '返回False
(2) Like运算符
Like运算符用于字符串的模式匹配。它的第一操作数要求是“String”类型，第二操作数要求是一个模式，模式中可以出现的通配符及其含义如下：
?“？”匹配单个字符。例如：A?，可匹配Ab、AC、AF等等。
?“*”匹配多个字符。例如：A*，可匹配Abc、Abcd、Array等等。
?“#”匹配0~9的单个数字。例如：1#，可匹配12、13、14等等。
? [字符列表]匹配任何在列表中的字符。例如：A[a-d]，可匹配Aa、Ab、Ac、Ad。
? [！字符列表]匹配任何不在列表中的字符。例如：A[!a-d]，可匹配Ae、Af等等。
以下是使用Like运算符的一些例子：
Dim R As Boolean
R = "aBCDa" Like "a*a" '返回True
R = "D" Like "[A-Z]" '返回True
R = "b2b" Like "b#b" '返回True
R = "MARY" Like "B?R*" '返回True
3. 连接运算符
连接运算符用于合并两个字符串，运算符有“&”和“+”，如表3-4所示。
表3-4 连接运算符
运算符名称说明
+ 加连接符如果两个操作数为“String”，就把这两个操作数连接成一个字符串。否则按加号处理
& 连接符将操作数强行转换成“String”，再进行连接运算
例如：
MyStr = "Hello," & "world!" '返回"Hello,world!"
Mystr = 10 & 22 '返回"1022"
MyStr = 10+22 '返回32
注意，由于“+”符号对两个操作数不是字符串时将做加法，因此最好使用“&”符号进行字符串的连接操作。
4. 逻辑运算符
逻辑运算符用来表示逻辑运算，运算结果为逻辑值，如表3-5所示。
表3-5 逻辑运算符
运算符名称说明
Not 非 Not A 表示非A，A为“True”时，结果为“False”，A为“False”时，结果为“True”
And 与 A And B 表示A与B，A、B都为“True”时结果为“True”，否则为“False”
OR 或 A Or B 表示A异或B，A、B都为“False”时，结果为“False”，否则为“True”
XOR 异或 A Xor B 表示A异或B，A、B不相等时，结果为“True”。否则为“False”
例如：
Not 9>8 '结果为False
8<9 And -5>-10 '结果为True
-5<10 Or 6<5 '结果为True
5. 赋值运算符
赋值运算符用于对变量进行赋值，表3-6列出赋值运算符。“=”为基本赋值运算符，其他均为复合赋值运算符。
记复合赋值运算符为X#=Y，其中“#”代表与基本赋值运算符“=”进行复合的运算符，X# = Y的含义是：执行X#Y运算后，将所得的结果赋予变量X。例如，X += Y，表示将X+Y的结果赋予X。
表3-6 赋值运算符
运算符名称说明
= 赋值号 Y=X，将X的值赋予变量Y
+= 加等号 Y+=X，将Y+X的值赋予变量Y
-= 减等号 Y-=X，将Y-X的值赋予变量Y
*= 乘等号 Y*=X，将Y*X的值赋予变量Y
/= 浮点除等号 Y/=X，将Y/X的值赋予变量Y
\= 整除等号 Y\=X，将Y\X的值赋予变量Y
^= 求指等号 Y^=X，将Y^X的值赋予变量Y
&= 连接等号 Y&=X，将Y&X的值赋予变量Y
例如：
Dim X As Interger
Dim S As String = "He"
X = 10 '将10赋给变量X
X +=10 'X = X+10
X \=2 'X = X\2
S &= "llo" 'S值为"Hello"
算术运算符优先级最高，然后依次是连接、关系和逻辑运算符。要说明的是，所有关系运算符的优先级是相同的。例如：
Dim A,B,C As Integer
Dim R As Boolean
A = 10 : B = 8 : C = 6
R = A>=2*3.14*B And C<>5 '返回False
R = A>B Xor B>C '返回False

复制代码

(2) 运算符和逻辑处理
　　一、运算符号
　　算术运算
() 括号 (2+3)*2=10
- 负号 -5
^ 指数 2^3=8
* 乘法 2*3=6
/ 除法 62/3=20.666666666667
\ 除法取整 62\2=20
Mod 取余数 62 Mod 3=2
+ 加法 2+3=5
- 减法 2-3=-1
$amp;$amp;>amp;$gt; 位右移 35$amp;>amp;$gt;2=8
　　比较运算
= 等于
$amp;< 小于
> 大于
<= 小于等于
>= 大于等于
Like 字符串比较：任何单一字符，#任何单一数字，*零或多个字符，[]在范围内的任一字符，[!]不在范围内的任一字符
Is 对象比较，判断两对象是否是同一对象
注意：当中文、英文、数字比较大小时，规则为中文>小写字母>大写字母>数字
　　逻辑运算
Not 否
And 与
Or 或
Xor 异或
AndAlso 最短路径与运算（当第一个为False则直接返回False）
OrElse 最短路径或运算（当第一个为True则直接返回True）
　　串连运算
&　串连各种类型的数据（主要用于连接字符串）
+　串连字符串
注意：+运算符可以用于加法和串连运算
1)数值+数值　加法运算
2)字符串+字符串串连运算
3)字符串+数值要看字符串为数值型字符串或文字型字符串
数值型字符串+数值加法运算
数值型字符串+字符串串连运算
数值型字符串+数值型字符串串连运算
　　自定义数据类型
私有自定义类型
Private Structure Rect
Dim x1 As Integer
Dim y1 As Integer
Dim color As Integer
End Structure
公用自定义类型
Public Structure Rect
Dim x1 As Integer
Dim y1 As Integer
Dim color As Integer
End Structure
声明自定义数据类型变量
Dim area_a As Rect
使用自定义数据类型
area_a.x1=100
area_a.y1=200
area_a.color=1
　　字符串处理技巧
Asc(str) 从字符串取出字符串第一个字符的ASCII码
Chr(ASCII) 将ASCII码转换为字符
StrDup(重复次数,str) 重复输出该字符串的第一个字符
Len(str) 计算字符串长度
Left(str,字符个数) 取出字符串最左边的n个字符
Right(str,字符个数) 取出字符串最右边的n个字符
Mid(str,m,n) 取出字符串第m个字符到第n个字符
LCase(str) 将字符串转换为小写
UCase(str) 将字符串转换为大写
LTrim(str) 清除字符串左边的空格
RTrim(str) 清除字符串右边的空格
Replace(str,"S1","S2") 将字符串的S1字符替换为S2
Trim(str) 清除字符串左右空格
Str(数值) 将数据类型转换为字符串类型
Val(str) 将数据类型转换为数值类型
Instr(n,str1,str2) 从字符串1的第n个字符开始查找是否包含字符串2，并返回其所在位置
StrComp(str1,str2) str1<str返回-1，str1=str2返回0，str1>str2返回1
StrReverse(str) 反转字符串
　　二、选择结构
　　单向选择结构
单行语句
If x=1 Then y=100
多行语句
If x=1 Then
y=100
z=50
End If
　　双向选择结构
第一种
If x=1 Then
y=100
Else
y=50
End If
第二种
变量=IIF(条件,条件成立,条件不成立)
例：y=IIF(x=1,100,50)
　　多向选择结构
第一种
Select Case 表达式
Case 值1
　描述式1
Case 值2
　描述式2
Case Else
　描述式n
End Select
第二种
If x=1 Then
y=1
ElseIf x=2 Then
y=2
ElseIf x=3 Then
y=3
Else
y=0
End If
第三种
Choose(I,v1,v2,...,vn)
例：x=Choose(2,"*","**","***")
第四种
Imports Microsoft.VisualBasic
Switch(表达式1,v1,表达式2,v2,...,表达式n,vn)
例：x=Switch(y=1,1,y=2,2,y=3,3)
使用Choose和Switch可以简化代码，不过当每个选项中要加入多行语句时，则必须使用Select Case
　　三、重复循环
递增
For i=1 To 100 Step 2
...
Next i
递减
For i=100 To 1 Step -2
...
Next i
数组
For Each i In Array
...
Next i
当递增或递减值为1时，可省略Step命令
强制退出For循环可以使用Exit For命令
　　四、条件循环
第一种，当条件成立时才会运行
While 条件
...
End While
第二种，当条件成立时才会运行
Do While 条件
...
Loop
第三种，当条件不成立时才会运行
Do Until 条件
...
Loop
第四种，先运行一次，再判断条件是否成立，不成立则跳出循环
Do
...
Loop While 条件
第五种，先运行一次，再判断条件是否成立，若成立则跳出循环
Do
...
Loop Util 条件
第六种，一直运行直到遇到Exit Do后跳出循环
Do
...
Loop

复制代码

操作数数据类型	结果数据类型
两个表达式都是整数数据类型（SByte、Byte、Short、UShort、Integer、UInteger、Long、ULong）	Double
一个表达式为 Single 数据类型，而另一个表达式不为 Double	Single
一个表达式为 Decimal 数据类型，而另一个表达式不为 Single 或 Double	Decimal
任一表达式为 Double 数据类型	Double

	Boolean	SByte	Byte	Short	UShort	Integer	UInteger	Long	ULong
Boolean	Boolean	SByte	Short	Short	Integer	Integer	Long	Long	Long
SByte	SByte	SByte	Short	Short	Integer	Integer	Long	Long	Long
Byte	Short	Short	Byte	Short	UShort	Integer	UInteger	Long	ULong
Short	Short	Short	Short	Short	Integer	Integer	Long	Long	Long
UShort	Integer	Integer	UShort	Integer	UShort	Integer	UInteger	Long	ULong
Integer	Integer	Integer	Integer	Integer	Integer	Integer	Long	Long	Long
UInteger	Long	Long	UInteger	Long	UInteger	Long	UInteger	Long	ULong
Long	Long	Long	Long	Long	Long	Long	Long	Long	Long
ULong	Long	Long	ULong	Long	ULong	Long	ULong	Long	ULong