第03章 Visual Basic数据类型及其运算.docx

1、第03章 Visual Basic数据类型及其运算第3章 Visual Basic 数据类型及其运算3.1基本数据类型表3.13.1.1 数值型1.整型数（1）整数（Integer）2个字节范围：-32768 +32767（2）长整数（Long）4个字节-2147483648 +21474836472.浮点型数三部分：符号、指数及尾数例：123.45E3 或 123.45e+3123.45678D3 或 123.45678d+3（1）单精度浮点数（Single）4个字节7位有效数字范围：-3.402823E+38 -1.401298E+45+1.401298E-45 +3.402823E+38

2、（2）双精度浮点数（Double）8个字节15或16位有效数字范围：-1.797693134862316D+308-4.94065D+324+4.94065D-324+1.797693134862316D+3083.货币型（Currency）8个字节小数点后4位、小数点前15位、定点数据范围：-922337203685477.5808 922337203685477.58074.字节型（Byte）1个字节范围：02553.1.2 字符串型（String）变长字符串：长度不确定，可以有大约21亿个字符定长字符串：含有确定个数的字符，不超过65535个字符3.1.3 布尔型（Boolean）两个字

3、节两种值：True（真）或False（假）3.1.4 日期时间型（Date）8个字节日期范围：公元100年1月1日9999年12月31日时间范围：0:00:0023:59:593.1.5 对象型（Object）4个字节3.1.6 变体型（Variant）16个字节3.2 变量与常量常量：在整个应用程序运行期间值不会发生变化的量变量：在整个应用程序运行期间值可能发生变化的量变量用来存储数据每个变量都有一个名字和相应的数据类型3.2.1 命名规则变量、过程、符号常量、数组的命名都必须遵守下述规则：（1）以字母开头，后跟字母、数字和下划线，不区分大小写例：MyName、sum、x1都是合法的名字In

4、teger、abc.ef、123不是合法的名字Hello、HELLO、hello指的是同一个名字（2）最后一个字符可以是类型说明符（3）不能超过255个字符（4）不能关键字同名3.2.2 定义变量Option Explicit语句：强制性规定变量“先定义后使用” 语句：Dim 变量名 As 数据类型名 ，变量名 As 数据类型名 注：（1）设置适当的变量类型（2）每个变量都要指明数据类型，否则为变体类型（3）Dim i As Integer等价于dim i%（4）Dim s1 As String 长度可变 Dim s2 As String*50 长度固定3.2.3 使用变量1. 赋值与取值（1

5、）变量赋值用赋值语句（2）引用变量的值将变量名写在表达式中给其他变量或属性赋值用作过程或函数的参数（3）变量的作用域限定了变量的有效作用区间（4）对于同名变量，作用域小的变量屏蔽作用域大的变量（5）访问另一个模块中定义的全局变量，应在变量名前加模块名例：Form2.inti。访问本模块或标准模块中的全局变量，不必加模块名2. 变量的默认值（1）数值型0（2）逻辑型False（3）日期时间型#0:00:00#（4）变长字符串变量为空字符串（5）定长字符串变量为指定数量的空格组成的字符串（6）对象型变量为Nothing（7）变体类型变量为Empty3.数据类型转换（1）数据类型转换发生的情况为变量

6、和属性赋值时计算表达式时参数传递时（2）隐式类型转换的规则整型浮点型：存储格式转换，数值的大小不变浮点型整型：小数部分“四舍五入”为整数数值字符串：所有的数值都可以转换为字符串字符串数值：只有字符串内容全部是数值才可转换数值型逻辑型：0转换为False，非0转换为True逻辑型数值型：False转换为0，True转换为-1逻辑型字节型：False转换为0，True转换为255日期时间数值：日期转换为整数，值为此日期距1899年12月30日的天数时间转换为小数，从零时到该时间占一整天的比例数值日期时间：是日期时间数值的逆过程逻辑型字符串：True和False分别转换为True和False字符串逻

7、辑型：True和False转换为True和False日期时间字符串：按日期的短格式转换为相应的字符串例：s2=#2/1/2010 8:20:00#字符串变量s2的值为2010-2-1 8:20:00字符串日期时间：例：d2=2/1/2010 8:20:00 AM日期时间变量d2的值为#2010-2-1 8:20:00 AM#（3）不能进行类型转换的情况包含非数值字符的字符串向数值型转换非True和False的字符串向逻辑型转换非日期时间内容的字符串向日期时间型转换转换时超出目标类型的表示范围3.2.4 文字常量1数值型常量（1）字节型、整型、长整型常量十进制：09例：624、-36、+256十

8、六进制：09、af（或AF）以&H（或&h）为前缀例：&H76、&H2F8八进制：07以&O（大写字母O）或仅以&为前缀例：&O347、&O1235（2）浮点型常量（单精度、双精度）日常记法：整数部分或小数部分为0，可省略，但要保留小数点。例：3.14159、0.23、24.、.5指数记法：用mEn来表示m10nm是一个整型常量或浮点型常量n必须是整型常量E可用e、D、d代替例：1E2表示11022. 字符串型常量必须用英文的双引号将实际的字符括起来空格也是合法的字符如果两个双引号之间没有任何字符，表示一个空字符串例：Hello计算机Visual Basic 程序￥25.003. 布尔型常量只

9、有两个值：True和False4. 日期时间型常量用“#”作为定界符可以表示日期、时间、日期及时间例：#1/2/2010#2010-1-2#January 2，2010#12:00:00 PM#1/2/2010 8:00:00 AM#注：可在常量后面加上类型说明符% 整型& 长整型! 单精度浮点数# 双精度浮点数 货币型$ 字符串型3.2.5 符号常量先定义后使用一次定义多次使用作用域由定义时使用的语句和位置决定1.符号常量的定义语法格式：Const 常量名 As 数据类型名 = 表达式 ，常量名 As 数据类型名 =表达式例：Const Pi = 3.141592. 符号常量的使用（1）注意

10、作用域（2）在声明符号常量时，省略“As 数据类型名”部分，可以在常量后面加上类型说明符。例：Const ONE&=1 Const TWO#=1（3）在程序中引用符号常量时，通常省略类型说明符。例：可以通过名字ONE和TWO引用上面声明的符号常量（4）类型说明符不是符号常量的一部分。例：假定声明了Const Num=45则Num!、Num%、Num&、Num不能再用作变量名或常量名。（5）VB中有大量预定义的符号常量，一般以“vb”为前缀。例：vbOKOnly3.3 常用内部函数由VB系统本身提供的、用户可以直接使用的函数叫内部函数（或库函数、标准函数）可以使用立即窗口进行快速测试3.3.1显

11、式数据类型转换函数函数功能Cint(x)把x的小数部分四舍五入，转换为整数CLng(x)把x的小数部分四舍五入转换为长整型数CSng(x)把x值转换为单精度数CDbl(x)把x的值转换为双精度数Ccur(x)把x的值转换为货币类型值，小数部分最多保留4位且自动四舍五入CByte(x)把x值转换为字节型CStr(x)把x值转换为字符串型CBool(x)把x值转换为布尔型CDate(x)把x值转换为日期时间型CVar(x)把x值转换为变体类型值3.3.2 数学函数函数功能Sin(x)返回自变量x的正弦值，x为弧度值Cos(x)返回自变量x的余弦值，x为弧度值Tan(x)返回自变量x的正切值，x为弧

12、度值Atn(x)返回自变量x的反正切值，函数值为弧度值Abs(x)返回自变量x的绝对值Sgn(x)返回自变量x的符号：当x为负数时，函数返回-1当x为0时，函数返回0当x为正数时，函数返回1Sqr(x)返回自变量x的算术平方根，x必须大于或等于0，Double型Exp(x)返回以e为底，以x为指数的值，即求e的x次方，Double型Log(x)返回以e为底x的自然对数值，返回值为Double型Int(x)求不大于自变量x的最大整数Fix(x)去掉一个浮点数的小数部分，保留其整数部分（截尾）Rnd(x)产生一个01之间的单精度随机数1度=/180=3.14159/180弧度Randomize (

13、x)设置随机数种子省略x，则以系统时钟返回值作为“种子数”例：Int(8.78)的值为8Int(-5.68)的值为-6Int(6.7436*1000+0.5)/1000的值为6.744（在小数点后第四位四舍五入）Fix(5.69)的值为5Fix(-5.88)的值为-5Int(Rnd*(B-A+1)+A)的功能是产生A，B闭区间内的随机整数3.3.3字符串型和数值型转换函数函数功能Hex$(x)或Hex(x)把一个十进制数转换为十六进制数，转换结果为一字符串Oct$(x)或Oct(x)把一个十进制数转换为八进制数，转换结果为一字符串Asc(x$)返回字符串x$中的第一个字符的ASCII码，转换结

14、果是一个数Chr$(x)或Chr(x)把数值型x的值作为ASCII值，转换为此ASCII码对应的字符Str$(x)或Str(x)把数值型x的值转换为一个字符串。当X为正数时，结果的第一个字符为空格。Val(x$)把字符串x左边有效数值转化为数值，若左边无有效数值，则返回结果为0有效数值包括09、正负号、小数点和组成浮点常量的E、e、D、d。转换时忽略空格、制表符与换行符例：Hex(30)的值为1EOct(30)的值为36Asc(abce)的值为97Chr(97)的值为aStr(345)的值为345Val(23.5.3abe)的值为23.5Val(w23.5.3abe)的值为0Val(2E3.5

15、.3abe)的值为2000（相当于2E3）注：函数名后面的“$”表示函数的返回值为字符串型，可省略。3.3.4日期时间函数类型函数功能系统日期时间Date返回系统当前的日期Time返回系统当前的时间Now返回系统当前的日期和时间日期Day(date)返回date的日Weekday(date)返回date的星期Month(date)返回date的月份Year(date)返回date的年份DateSerial(year,month,day)返回一个日期值时间Hour(date)返回date的小时（0-23）Minute(date)返回date的分钟（0-59）Second(date)返回date的

16、秒（0-59）TimeValue(date)返回date的时间部分TimeSerial(hour,minute,secong)返回一个时间值3.3.5 字符串处理函数1. 删除空白字符函数LTrim$（字符串）：去掉左边的空白字符RTrim$（字符串）：掉字右边的空白字符Trim$（字符串）：去掉左右两边的空白字符例：a$= Good LTrim(a$)的结果为Good RTrim(a$)的结果为 GoodTrim(a$)的结果为Good2. 字符串截取函数（1）Left$（字符串，字符个数）返回“字符串”最左边的长度为“字符个数”的子字符串（2）Right$（字符串，字符个数）返回“字符串”

17、最右边的长度为“字符个数”的子字符串（3）Mid$（字符串，起始位置，字符个数）返回一个子字符串。如果起始位置大于字符串长度，返回空字符串若省略“字符个数”，则从起始位置到字符串的结尾3. 字符串长度测试函数Len（字符串）返回字符串的长度4. String$函数格式：String$（n，ASCII码）或String$(n，字符串)功能：返回由n个指定字符组成的字符串。例如：x=String$(5,65) x=AAAAAx=String$(5,abc) x=aaaaa5. 字母大小写转换LCase$（字符串）不论字符串中的字符为大写还是小写，一律输出为小写UCase$（字符串）不论字符串中的字

18、符为大写还是小写，一律输出为大写6. 字符串匹配函数格式：InStr（起始位置， 字符串1，字符串2 ，比较模式）功能：在字符串1中查找字符串2说明：（1）如果找到，则返回字符串2在字符串1中第一次出现的起始位置如果找不到，返回0若起始位置省略，则从字符串1的起始位置开始查找（2）比较模式为1时，不区分大小写比较模式为0时，区分大小写默认设置为0（3）若指定了比较模式，则必须指定起始位置3.3.6 格式输出函数1. Tab函数与Print方法配合使用格式：Tab（n）；输出项；Tab（n）；输出项；功能：把光标移到由参数n指定的位置，从该位置输出数据参数：n为数值表达式，其值为一整数例如：Pr

19、int Tab(5); 姓名; Tab(25); 年龄; Tab(40); 职称2. Spc函数与Print方法配合使用格式：Spc（n）功能：Spc函数和输出项之间用分号间隔，确定两个输出项之间的间隔参数：n为数值表达式，其值为0 32767之间的整数例如：Debug.Print 吉林师范大学; Spc(10); 计算机学院3. Space$函数格式：Space$（n）功能：返回n个空格参数：n为数值表达式，其值为非负数例如：Debug.Print 计算机学院 & Space(5 + 2) & 网络实验室3.3.7 InputBox函数1函数的格式InputBox（PROMPT,TITLE,

20、DEFAULT,XPOS,YPOS,HELPFILE,CONTEXT）2. 函数的参数PROMPT：字符串，长度不超过1024个字符，显示在对话框内作为提示信息。TITLE：字符串，对话框的标题。DEFAULT：字符串，输入区的缺省信息。XPOS、YPOS：两个整数，单位为twip，用来确定对话框在屏幕中的显示位置。HELPFILE：帮助文件的名称CONTEXT：相关帮助主题的目录号3. 应用举例例：编写程序，完成对话框设计Private Sub Form_Click() Dim c As String, m1 As String, m2 As String Dim Msg As String

21、, Title As String, n As String c = Chr(13) + Chr(10) m1 = Please Input Name: m2$ = Please Enter Or Click OK after Input Msg = m1 + c + m2 Title = Register n = InputBox(Msg, Title, Marry) Print nEnd Sub4. 几点说明（1）如果要求对话框内提示信息换行，则需要插入回车换行操作（2）InputBox函数的返回值是一个字符串（3）单击OK按钮或按回车键，表明对输入进行确认，返回输入的数据单击Cancel

22、按钮或按Esc键，表明取消输入，返回一个空字符串（4）每次执行InputBox函数只能输入一个值（5）InputBox与InputBox$等价3.3.8 MsgBox函数1. MsgBox函数的格式MsgBox（MESSAGE，TYPE，TITLE，HELPFILE，CONTEXT）2. 函数的参数MESSAGE：长度不超过1024个字符的字符串TYPE：是一个符号常量或整数值，用来控制对话框内显示的图标和按钮的种类及数量表3.6 TYPE参数的常见取值类 型符 号 常 量数 值功 能按钮的类型和数量vbOKOnlyvbOKCancelvbAbortRetryIgnorevbYesNoCanc

23、elvbYesNovbRetryCancel012345只显示“确定”按钮显示“确定”和“取消”按钮显示“终止”、“重试”和“忽略”按钮显示“是”、“否”和“取消”按钮显示“是”和“否”按钮显示“重试”和“取消”按钮图标类型vbCriticalvbQuestionvbExclamationvbInformation16324864显示暂停图标（x）显示疑问图标（?）显示警告图标（！）显示忽略图标（i）默认活动按钮vbDefaultButton1VbDefaultButton2VbDefaultButton3VbDefaultButton40256512768第一个按钮是默认值第二个按钮是默认值

24、第三个按钮是默认值第四个按钮是默认值强制返回VbApplicationModalvbSystemModal04096应用程序强制返回系统强制返回TYPE参数的值由表中四种类型的数值相加产生，通常只用前三类数值。例如：36=4+32+0显示“是”和“否”按钮显示疑问图标（?）默认按钮为“是”TYPE参数还可以用符号常量表示，以提高程序的可读性。TITLE：字符串，作为对话框的标题。3. 函数的返回值MsgBox函数的返回值是一个整数，该整数与所选择的按钮有关：1或vbOK，则表明用户选择了“确定”按钮2或vbCancel，“取消”3或vbAbort，“终止”4或vbRetry，“重试”5或vbI

25、gnore，“忽略”6或vbYes，“是”7或vbNo，“否”4. 应用举例例：编写程序，用MsgBox函数完成对话框设计。Private Sub Form_Click() Dim m As String, t As String, n As Integer m = 请确认该信息是否正确 t = 信息确认 n = MsgBox(m, 19, t) Print nEnd Sub5. 几点说明（1）在信息框内标有虚线框的按钮是当前活动按钮，按回车键，可完成相应的选择操作。（2）需要插入回车换行操作在提示信息中实现换行。（3）根据该返回值决定后续操作。（4）由MsgBox函数产生的对话框属于“模态窗

26、口”（Modal Window）。出现该对话框时，要求用户必须做出选择，否则不能执行任何其他操作。（5）MsgBox函数也可以写成语句的形式，即MsgBox语句。功能相同，只是没有返回值。3.4表达式运算符：表示某种运算的符号运算量：被运算的数据（常量、变量、函数）表达式：由运算符和运算量组成的式子3.4.1 算术表达式1. 算术运算符运算符名称表达式例子说明+加a+b-减a-b*乘a*b/除a/b整除ab只用于整数Mod求余（取模）a Mod b只用于整数乘方ab-取负-a参加整除、求余运算的对象含有小数点时，自动四舍五入为整数后再进行运算。例：17.85.2，转化为185，结果为3。11.

27、6 mod 5.1，转化为12对5求余，结果为2。2. 算术表达式算术表达式：由算术运算符连接的数值型常量、变量或函数构成的有意义的式子。（1）所有符号都不能写成上标或下标的形式（2）不能省略乘号（3）所有括号一律写成圆括号，左右成对（4）数学中的要写成3.143. 算术运算符的优先级指数运算符（）取负（-）乘（*）、浮点除（/）整除（）取模（Mod）加（+）、减（-）例：-32=-9(3+2)*7=3514/5*2=5.6145*2=11+(2+3)*2)*2=213.4.2 字符串表达式1. 字符串连接运算符运算符：&、+例：Visual & Basic + 的结果为Visual Basi

28、c abc & 123的运算结果是abc123“&”能自动将非字符串类型的数据转换成字符串后再进行连接运算，而“+”则不能自动转换。例：abc + 123的运算结果是abc123abc + 123 结果出错，错误提示为“类型不匹配”abc & 123 的运算结果是abc12312+ 123的运算结果是1212312+ 123的运算结果是135（先将字符串转换为整数），而不121232. 字符串表达式字符串表达式：字符串运算符将字符串常量、字符串变量、字符串函数连接形成的一个有意义的式子。例：xyz & 123 & Left(abc, 2)3. 字符串连接运算符的优先级“&”的优先级低于所有的算术运算符3.4.3关系表达式1. 关系运算符关系运算符（比较运算符）用来对两个表达式的值进行比较，结果为逻辑值。关系运算符：= （等于） （大于） （小于）或（不等于）= （大于等于）2. 关系表达式关系表达式：用关系运算符将算术表达