vb.net的算术运算代码和实例教程用法

信息发布软件

	算术运算是高级语言所要实现的最基本的功能。 算术运算也就是通常所说的数学运算，在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 复制代码

信息发布软件

	实例教程4 B.NET中的除法运算符有两个：/（浮点除法）、\（整数除法） C#中的除法运算符只有一个：/（除法） VB.NET中的除法运算符与C#中的除法运算符存在很大的差异，使用时注意区分。 关于VB.NET中的除法运算符的介绍(摘自MSDN)： /（浮点除法）:将两个数相除并返回以浮点数表示的结果。 所得结果的数据类型取决于操作数的类型。 下表显示如何确定结果的数据类型。 操作数数据类型 结果数据类型 两个表达式都是整数数据类型（SByte、Byte、Short、UShort、Integer、UInteger、Long、ULong） Double 一个表达式为 Single 数据类型，而另一个表达式不为 Double Single 一个表达式为 Decimal 数据类型，而另一个表达式不为 Single 或 Double Decimal 任一表达式为 Double 数据类型 Double 执行除法之前，任何整数数值表达式都会被扩展为 Double。 如果将结果赋给整数数据类型，Visual Basic 会尝试将结果从 Double 转换成这种类型。 如果结果不适合该类型，会引发异常。如果除数或被除数计算结果等于Nothing，则将其视为零。 \（整数除法）:将两个数相除并返回以整数形式表示的结果。 下表如何确定结果的数据类型。 请注意，此表是对称的；对于给定的操作数数据类型组合，无论操作数的顺序如何，结果数据类型都是相同的。 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 如果 \ 运算符两个操作数中的任何一个为 Decimal、Single 或 Double，则 Visual Basic 在运算前会尝试将其转换为 Long，并且运算的结果数据类型为 Long。如果 Option Strict 为 On，将产生编译器错误。 如果 Option Strict 为 Off，若值超出 Long 数据类型 (Visual Basic) 的范围，则可能会产生 OverflowException。 转换为 Long 也服从“四舍六入五成双”。如果除数或被除数计算结果等于 Nothing，则将其视为零。

信息发布软件

	实例教程3 (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 复制代码

信息发布软件

	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 复制代码