Visual Basic变量、常数和数据类型及过程概述

 

 

　　　　Numeric 数据类型
　　　　Visual Basic 支持几种 Numeric 数据类型：Integer（整型）、Long（长整型）、Single（单精度浮点型）、Double（双精度浮点型）和 Currency（货币型）。与 Variant 类型相比，Numeric 类型占用的存储空间通常要少。
　　　　如果知道变量总是存放整数（如 12 ）而不是带小数点的数字（如 3.57），就应当将它声明为 Integer 类型或 Long 类型。整数的运算速度较快，而且比其它数据类型占据的内存要少。在 For...Next 循环内作为计数器变量使用时，整数类型尤为有用。
　　　　详细信息 关于控制结构的详细资料，请参阅本章后面的“控制结构概述”。如果变量包含小数，则可将它们声明为 Single、Double 或 Currency 变量。Currency 数据类型支持小数点右面 4 位和小数点左面 15 位；它是一个精确的定点数据类型，适用于货币计算。浮点（Single 和 Double）数比 Currency的有效范围大得多，但有可能产生小的进位误差。
　　　　注意 浮点数值可表示为 mmmEeee 或 mmmDeee ，其中 mmm 是尾数，而 eee 是指数（以 10 为底的幂）。Single 数据类型的最大正数值为3.402823E+38，或 3.4 乘以 10 的 38 次方；Double 数据类型的最大正数值是 1.79769313486232D+308 或 1.8 乘以 10 的 308 次方。用 D 将数值文字中的尾数部分和指数部分隔开，就会导致将该值作为 Double 数据类型来处理。同样，用这种方式使用 E，也会导致将该值作为 Single 数据类型来处理。

　　　　Byte 数据类型
　　　　如果变量包含二进制数，则将它声明为 Byte 数据类型的数组（本章后面的“数组”中将讨论数组）。在转换格式期间用 Byte 变量存储二进制数据就可保留数据。当 String 变量在 ANSI 和 Unicode 格式间进行转换时，变量中的任何二进制数据都会遭到破坏。在下列任何一种情况下，VisualBasic 都会自动在 ANSI 和 Unicode 之间进行转换：
　　　　　读文件时
　　　　　写文件时
　　　　　调用 DLL 时
　　　　　调用对象的方法和属性时
　　　　除一元减法外，所有可对整数进行操作的运算符均可操作 Byte 数据类型。因为 Byte 是从 0-255 的无符号类型，所以不能表示负数。因此，在进行一元减法运算时，Visual Basic 首先将 Byte 转换为符号整数。
　　　　所有数值变量都可相互赋值，也可对 Variant 类型变量赋值。 在将浮点数赋予整数之前， Visual Basic要将浮点数的小数部分四舍五入，而不是将小数部分去掉。
　　　　详细信息 关于 Unicode 和 ANSI 转换的详细信息，请参阅第十六章“国际化”。

　　　　String 数据类型
　　　　如果变量总是包含字符串而从不包含数值，就可将其声明为 String 类型。
　　　　Private S As String
　　　　然后可将字符串赋予这个变量，并用字符串函数对它进行操作。
　　　　S = "Database"
　　　　S = Left (S,4)
　　　　按照缺省规定，String 变量或参数是一个可变长度的字符串。随着对字符串赋予新数据，它的长度可增可减。 也可以声明字符串具有固定长度。可用以下语法声明一个定长字符串：
　　　　String * size
　　　　例如，为了声明一个长度为 50 字符的字符串，可用下列语句：
　　　　Dim EmpName As String * 50
　　　　如果赋予字符串的字符少于 50 个，则用空格将 EmpName 的不足部分填满。如果赋予字符串的长度太长，已不能成为定长字符串，则 Visual Basic 会直接截去超出部分的字符。
　　　　因为定长字符串用空格填充尾部多余的空间，所以在处理定长字符串时可发现，删除空格的 Trim 和 RTrim 函数是很有用的。　　　　可将标准模块中的定长字符串声明为 Public 或 Private。在窗体和类模块中，必须将定长字符串声明为 Private。
　　　　详细信息 请参阅《Visual Basic 6.0语言参考手册》中的“Ltrim、RTrim 和Trim 函数”。

　　　　交换字符串和数字
　　　　如果字符串表示数值，则可将字符串赋予数值变量。也可将数值赋予字符串变量。例如，将命令按钮、文本框和列表框放置在窗体中。在命令按钮的 Click 事件中输入下列代码。运行应用程序并单击命令按钮。
　　　　Private Sub Command1_Click ()
　　　　　　　Dim intX As Integer
　　　　　　　Dim strY As String
　　　　　　　strY = "100.23"
　　　　　　　intX = strY 　　　　　　　　　　　　　'将字符串传递给数值变量。
　　　　　　　List1.AddItem Cos (strY)　　　　　　　'将字符串中数值的余弦值。
　　　　　　　　　　　　　　　　　　　　　　　　　　'添加到列表框中。
　　　　　　　strY = Cos (strY) 　　　　　　　　　　'将余弦值传递给字符串变量。
　　　　　　　Text1.Text = strY 　　　　　　　　　　'在文本框中显示字符串。
　　　　End Sub
　　　　Visual Basic 会自动强制变量为适当的数据类型。在转换字符串和数值时要小心；如果传送字符串中的值不是数值，则在运行时会出错。

　　　　Boolean 数据类型
　　　　若变量的值只是“true/false”、“yes/no”、“on/off”信息，则可将它声明为Boolean 类型。Boolean 的缺省值为 False。在下面的例子中，blnRunning 是Boolean 变量，存储简单的 yes/no 设置。
　　　　Dim blnRunning As Boolean
　　　　　　'查看磁带是否在转。
　　　　　　If Recorder.Direction = 1 Then
　　　　　　blnRunning = True
　　　　End if

　　　　Date 数据类型
　　　　Date 和 Time 值既可包含在特定的 Date 数据类型中，又可包含在 Variant变量中。一般的 Date 特性适用于这两种类型。
　　　　详细信息 请参阅《联机手册》的“高级变量主题”中的“在 Variant 变量中存储 Date/Time 值”部分。
　　　　当其它数值数据类型转换为 Date 时，小数点左边的值表示 Date 信息，小数点右边的值则代表 Time。午夜为 0，正午为 0.5。负数表示公元 1899 年12 月 31 日之前的 Date。