VisualBasic编程：数据类型、运算符与声明详解

### Visual Basic 编程：数据类型、运算符与声明详解 #### 1. 数据类型 Visual Basic 包含多种数据类型，以下是对这些数据类型的详细总结： | 类型 | 大小 | 值范围 | | ---- | ---- | ---- | | Boolean | 2 字节 | True 或 False | | Byte | 1 字节 | 0 到 255（无符号字节） | | SByte | 1 字节 | -128 到 127（有符号字节） | | Char | 2 字节 | 0 到 65,535（无符号字符） | | Short | 2 字节 | -32,768 到 32,767 | | UShort | 2 字节 | 0 到 65,535（无符号短整型） | | Integer | 4 字节 | -2,147,483,648 到 2,147,483,647 | | UInteger | 4 字节 | 0 到 4,294,967,295（无符号整型） | | Long | 8 字节 | -9,223,372,036,854,775,808 到 9,223,372,036,854,775,807 | | ULong | 8 字节 | 0 到 18,446,744,073,709,551,615（无符号长整型） | | Decimal | 16 字节 | 无小数点时 0 到 ±79,228,162,514,264,337,593,543,950,335；28 位小数时 0 到 ±7.9228162514264337593543950335 | | Single | 4 字节 | 负值范围 -3.4028235E+38 到 -1.401298E-45；正值范围 1.401298E–45 到 3.4028235E+38 | | Double | 8 字节 | 负值范围 -1.79769313486231570E+308 到 -4.94065645841246544E–324；正值范围 4.94065645841246544E–324 到 1.79769313486231570E+308 | | String | 可变 | 取决于平台，大约 0 到 20 亿个 Unicode 字符 | | Date | 8 字节 | 公元 0001 年 1 月 1 日 0:0:00 到公元 9999 年 12 月 31 日 23:59:59 | | Object | 4 字节 | 指向任何类型的数据 | | Structure | 可变 | 结构成员有各自的范围 | #### 2. 数据类型字符 Visual Basic 提供了数据类型字符来表示特定的数据类型，但单独使用这些字符确定变量的数据类型可能会造成混淆，建议使用 As 子句。以下是数据类型字符的列表： | 字符 | 数据类型 | | ---- | ---- | | % | Integer | | & | Long | | @ | Decimal | |! | Single | | # | Double | | $ | String | 示例代码： ```vb Dim i% Dim j As Integer For i = 1 To 10 For j = 1 To 10 Debug.WriteLine(i * 100 + j) Next j Next i ``` #### 3. 字面类型字符 字面类型字符用于指定字面量的数据类型，如下表所示： | 字符 | 数据类型 | | ---- | ---- | | S | Short | | US | UShort | | I | Integer | | UI | UInteger | | L | Long | | UL | ULong | | D | Decimal | | F | Single | | R | Double | | c | Char | #### 4. 数据类型转换函数 Visual Basic 提供了多种数据类型转换函数，用于在不同数据类型之间进行转换： | 函数 | 转换目标类型 | | ---- | ---- | | CBool | Boolean | | CByte | Byte | | CChar | Char | | CDate | Date | | CDbl | Double | | CDec | Decimal | | CInt | Integer | | CLng | Long | | CObj | Object | | CSByte | SByte | | CShort | Short | | CSng | Single | | CStr | String | | CUInt | UInteger | | CULng | ULong | | CUShort | UShort | 除了这些转换函数，数据类型还有自己的解析方法，例如： ```vb an_integer = Integer.Parse(a_string) ``` 这种解析方法比相应的数据类型转换函数更快。 Convert 类也提供了一些有用的转换方法，例如： | 函数 | 功能 | | ---- | ---- | | ToBoolean | 转换为 Boolean 类型 | | ToInt64 | 转换为 Int64 类型 | | ToByte | 转换为 Byte 类型 | | ToSByte | 转换为 SByte 类型 | | ToChar | 转换为 Char 类型 | | ToSingle | 转换为 Single 类型 | | ToDateTime | 转换为 DateTime 类型 | | ToString | 转换为 String 类型 | | ToDecimal | 转换为 Decimal 类型 | | ToUInt16 | 转换为 UInt16 类型 | | ToDouble | 转换为 Double 类型 | | ToUInt32 | 转换为 UInt32 类型 | | ToInt16 | 转换为 Int16 类型 | | ToUInt64 | 转换为 UInt64 类型 | | ToInt32 | 转换为 Int32 类型 | 整数转换函数（ToInt16、ToInt32、ToInt64、ToUInt16、ToUInt32 和 ToUInt64）还提供了重载版本，可以接受字符串值和基数作为参数，例如： ```vb Dim value As Integer = Convert.ToInt32("00100100", 2) ``` #### 5. CType、DirectCast 和 TryCast CType 和 DirectCast 语句也用于类型转换。CType 在类型兼容时将数据从一种类型转换为另一种类型，例如： ```vb Dim value As Integer = CType("1234", Integer) ``` DirectCast 将对象引用转换为所需类型，前提是对象的真实类型继承自或与所需类型有实现关系，例如： ```vb Dim emp1 As New Employee Dim per1 As Person = DirectCast(emp1, Person) Dim emp2 As Employee = DirectCast(per1, Employee) Dim per2 As New Person ' 此转换会失败，因为 per2 是 Person 类型，不是 Employee 类型 Dim emp3 As Employee = DirectCast(per2, Employee) ``` CType 和 DirectCast 在对象无法转换为所需类型时会抛出异常，而 TryCast 与 DirectCast 类似，但在转换失败时返回 Nothing，例如： ```vb Dim emp3 As Employee = TryCast(per2, Employee) ' 返回 Nothing ``` #### 6. 运算符 Visual Basic 运算符主要分为五类：算术、连接、比较、逻辑和位运算。以下是对各类运算符的详细介绍： ##### 6.1 算术运算符 | 运算符 | 用途 | 示例 | 结果 | | ---- | ---- | ---- | ---- | | ^ | 指数运算 | 2 ^ 3 | 8 | | - | 取反 | -2 | -2 | | * | 乘法 | 2 * 3 | 6 | | / | 除法 | 3 / 2 | 1.5 | | \ | 整数除法 | 17 \ 5 | 3 | | Mod | 取模 | 17 Mod 5 | 2 | | + | 加法 | 2 + 3 | 5 | | - | 减法 | 3 - 2 | 1 | | << | 左移 | &H57 << 1 | &HAE | | >> | 右移 | &H57 >> 1 | &H2B | 位运算运算符将数字的二进制表示向左或向右移动指定的位数，例如十六进制值 &H57（二进制 01010111）左移一位得到 10101110（十六进制 &HAE），右移一位得到 00101011（十六进制 &H2B）。 ##### 6.2 连接运算符 Visual Basic 提供了两个连接运算符 & 和 +，都用于连接两个字符串。由于 + 符号也表示算术运算符，为了使代码更易读，建议使用 & 符号进行字符串连接。 ##### 6.3 比较运算符 | 运算符 | 用途 | 示例 | 结果 | | ---- | ---- | ---- | ---- | | = | 等于 | A = B | 如果 A 等于 B 则为 True | | <> | 不等于 | A <> B | 如果 A 不等于 B 则为 True | | < | 小于 | A < B | 如果 A 小于 B 则为 True | | <= | 小于等于 | A <= B | 如果 A 小于或等于 B 则为 True | | > | 大于 | A > B | 如果 A 大于 B 则为 True | | >= | 大于等于 | A >= B | 如果 A 大于或等于 B 则为 True | | Is | 两个对象相等 | emp Is