第2章VisualBasic语言基础.ppt

上传人:本田雅阁 文档编号:2497138 上传时间:2019-04-03 格式:PPT 页数:85 大小:1.01MB
返回 下载 相关 举报
第2章VisualBasic语言基础.ppt_第1页
第1页 / 共85页
第2章VisualBasic语言基础.ppt_第2页
第2页 / 共85页
第2章VisualBasic语言基础.ppt_第3页
第3页 / 共85页
亲,该文档总共85页,到这儿已超出免费预览范围,如果喜欢就下载吧!
资源描述

《第2章VisualBasic语言基础.ppt》由会员分享,可在线阅读,更多相关《第2章VisualBasic语言基础.ppt(85页珍藏版)》请在三一文库上搜索。

1、1,第2章 Visual Basic语言基础,2.1 Visual Basic语言的基本概念 2.2 数据类型和常量、变量 2.3 运算符和表达式 2.4 常用内部函数 2.5 InputBox、MsgBox函数和Print方法,2,2.1 Visual Basic语言的基本概念,2.1.1 标识符 2.1.2 书写规范,3,2.1.1 标识符,标识符是编程时为变量、常量、数据类型、过程、函数、类等定义的名字。 VB中所有的标识符都有相同的命名规则,命名规则如下: (1)标识符由字母、数字或下划线(_)组成,不能包含标点符号、空格等。 (2)标识符必须以字母开头,不能以数字或其他字符开头。例如

2、,2a、1_1等都是不合法的。 (3)标识符最长不能超过 255 个字符。 (4)自定义的变量、过程名等不能和VB中的关键字同名。例如,变量名不能是False、If、End等。,4,2.1.2 书写规范,VB代码中字母的大小写 (1)VB代码中不区分字母的大小写。 (2)VB中的关键字首字母总被转换成大写,其余字母被转换成小写。 (3)对于用户自定义的变量、过程名等,VB以第一次定义的大小写为准,以后每次输入的变量或过程名自动按第一次定义的格式转换。,5,2.1.2 书写规范,语句按行书写 VB的语句按行书写,每行最多允许255个字符。 (2) 可以将多个语句合并到同一行上,语句间用“:”号分

3、隔。 (3) 单行语句可以通过续行符“ _” 将一行分成若干行书写。一行语句最多只能有25个续行。,6,2.1.2 书写规范,3注释语句 注释语句用于在代码中添加注释。代码段中的注释语句VB并不运行,只是提高程序的可读性,便于程序的维护和调试。VB提供了两种方法来添加注释。 (1) Rem语句 语法: Rem 注释文本 例如,添加注释说明按钮Command1的Click事件的功能: Private Sub Command1_Click() Rem 单击按钮在标签中显示“你好!“ 或者在一行上写注释: Private Sub Command1_Click():Rem 单击按钮在标签中显示“你好!

4、“,7,2.1.2 书写规范,(2) 单引号“”注释符 语法: 注释文本 使用“”加注释更加灵活也更常用。 例如: Private Sub Command1_Click() 单击按钮在标签中显示“你好!“ 或者在一行上写注释: Private Sub Command1_Click() 单击按钮在标签中显示“你好!“,8,2.2 数据类型和常量、变量,2.2.1 数据类型 2.2.2 常量 2.2.3 变量,9,2.2.1 数据类型,基本数据类型:数据类型多达12种,包括:Integer、Long、Single、Double、Currency、Byte、String、Boolean、Date、O

5、bject和Variant。 1数值型 数值型数据包含两类共五种数据类型。 (1) 整数数据 存放整数数据的有Integer(整型)和Long(长整型)。 (2) 小数数据 存放小数数据的有Single(单精度浮点型)、Double(双精度浮点型)和 Currency(货币型),Currency型的数据小数点前面可以有15位,小数点后有4位。,(快讲),10,2.2.1 数据类型,2. 字节型(Byte ) Byte型用于存储二进制数据,0255的整数可以用Byte型表示。 3. 字符型(String) 字符型用于存放字符串,字符串是用双引号(“”)括起来的一串字符,字符型有变长和定长两种,分

6、别表示固定长度和可变长度的字符串。变长字符串型是根据存放的字符串长度可增可减。,11,2.2.1 数据类型,4. 布尔型(Boolean) 布尔型存储的只能是 True 或 False。如果数据的值只有“True或False”、“Yes或No”、“On或Off”,则可以用Boolean型表示。当把数值型数据转换为布尔型数据时,0会转换为False,其它非0值转换为True。反之,当把布尔型数据转换为数值型时,False转换为0,True转换为-1。 5日期型(Date) 日期型用于存储日期和时间,日期型数据必须以一对“#”括起来。如果不含时间值,则自动将时间设置为午夜(00:00:00);如果

7、不含日期值,则自动将日期设置为公元1899年12月30日。,12,2.2.1 数据类型,6. 变体型(Variant) 变体型能够存储系统定义的所有类型的数据,是一种可变的数据类型。当没有说明数据类型时,则变量自动为 Variant型,但采用Variant型占用的内存也比其他类型多。Variant型还包含三种特定值:Empty、Null 和 Error。 7. 对象型(Object) 对象型用于表示任何类型的对象,可引用应用程序中或其它应用程序中的对象。必须使用Set语句先对对象引用赋值,然后才能引用对象。,13,2.2.1 数据类型,数据类型以及存储空间大小与范围,14,2.2.1 数据类型

8、,用户自定义数据类型(第3章P64) 除了上述数据类型外,在VB中,用户可以根据需要利用Type语句定义自己的数据类型,其格式如下: Type 数据类型名 数据类型元素名 As 类型名 End Type 其中,数据类型名为自定义数据类型名,数据类型元素名为自定义数据类型中的一个成员,类型名为上述基本类型名或自定义数据类型名。,(自学),15,2.2.1 数据类型,枚举类型 当一个变量只有几种可能的值时,可以使用枚举的方法将变量的值一一列出来,变量的值就只限制在列出的几种值中。采用这样的方法定义的变量类型称为枚举类型。 枚举可以通过在标准模块或公用类模块中的声明部分用 Enum 语句声明一个枚举

9、类型来创建。其格式为: Private|Public Enum 类型名称 成员名=常数表达式 End Enum,(自学),16,2.2.1 数据类型,例题:定义一天时间划分的枚举类型: Public Enum TimeOfDay Morning = 0 Afternoon = 1 Evening = 2 End Enum 使用方式和基本类型一样,如: Dim t as TimeOfDay t = Morning,(自学),17,2.2.2 常量,在整个应用程序执行过程中,值不会改变的数据就是常量,分为一般常量和符号常量。 1. 一般常量 一般常量包括:数值常量、字符常量、逻辑型常量和日期常量。

10、 (1) 数值常量 数值常量由正负号、数字和小数点等组成,其中小数可以用定点数和浮点数表示。,18,2.2.2 常量,整数:由数字和正负号组成,例如,12、-123、1234567。 整数大多数都是以十进制表示的,也可以用十六进制数(基数为 16)或八进制数(基数为 8)表示。八进制数用前缀&O引导,由数字07组成。十六进制数用前缀 &H 引导,由数字09、AF或 af 组成。,19,2.2.2 常量,十进制数、八进制数和十六进制数的相互转换,20,2.2.2 常量,定点数:带有小数点的正数或负数,表示数的范围比较小,例如,-75.32、3.1415926、0.0005。 浮点数:分为单精度浮

11、点数和双精度浮点数,分别表示为mEn和mDn,m为尾数,n为指数,指数为乘以10的幂次。例如,-93.2E5(单精度型)、-25.2E-3(单精度型)、2.35D-12(双精度型)。,21,2.2.2 常量,字符常量 字符常量是用双引号(“)括起来的一串字符。例如,“abC“、“、“李明“、“你好!“,其中“(双引号中无任何字符,也不含空格)为空字符串。 逻辑常量 逻辑常量只有两个:True(真)、False(假)。 日期常量 日期常量是用前后两个“#”把表示日期和时间的值括起来。例如,以下几种都是表示2004年3月15日: #2004-3-15#、#3/15/2004#、#2004/3/15

12、#、 #2004-3-15 7:30:00#,22,2.2.2 常量,2符号常量 符号常量是指在程序中用符号表示的常量。符号常量又分为系统内置常量和用户定义常量两种。 (1) 用户定义常量 用户定义常量用具有含义的常量名来代替难记的一般常量,使用符号常量可增加程序代码的可读性。在程序中使用用户定义常量,应该使用 Const 语句先行说明。 语法: Public|Private Const 常量名 As 数据类型=表达式 说明: 表示可省略的参数,|表示是可选择的参数。 表达式可以由数值、字符串等常量以及运算符组成,甚至可以用前面定义过的用户定义常量。,23,2.2.2 常量,常量名的命名规则符

13、合标识符的命名规则。 例如,以下都是将难记的常量用用户定义常量表示: Const PI = 3.1415926 Const PI As Single = 3.1415926 Private Const PI As Single = 3.1415926 例如,使用用户定义常量PI定义新用户定义常量: Const PI2 = PI * 2 (2) 系统内置常量 系统内置常量与应用程序的对象、方法和属性一起使用,一般以Vb为前缀,如VbBlue为蓝色。,24,2.2.3 变量,变量:程序运行过程中其值可以改变的量称为变量。程序通过变量名来引用其存储的数据。 1变量的声明 变量的声明分为“显式声明”和

14、“隐式声明”。 (1) 显式声明 显式声明是在变量使用之前,用 Dim、Static、Public、Private 语句声明一个变量或多个变量。 语法:Dim 变量名 As 数据类型 Dim 变量名 As 数据类型 ,变量名 As 数据类型 说明:用Dim语句声明变量就是定义该变量应存储的数据类型;当省略数据类型时,则默认为 Variant型;同时声明多个变量时,各变量用逗号分开。,25,2.2.3 变量,声明定长字符型变量的语法:Dim 变量名 As String * 长度 如果没有声明变量的数据类型,则VB把它看作变体型Variant。然而,变体型可能会浪费内存空间,有时变体型还可能无效。

15、所以,在使用变量前最好先声明变量类型。 显式声明还有Static、Public、Private 语句,声明变量的语法格式与Dim语句相似。(参见第6章p151) 语法: Public 变量名 As 数据类型 ,变量名 As 数据类型 Private 变量名 As 数据类型 ,变量名 As 数据类型 Static 变量名 As 数据类型 ,变量名 As 数据类型,26,2.2.3 变量,(2) 隐式声明 隐式声明是用一个特殊的类型符号加在变量名后面来声明数据类型,而在使用一个变量之前不需要声明这个变量。,例如,用隐式声明变量: Private Sub Command1_Click() 单击按钮在

16、标签中显示“你好!“ a$ = “你好!“ Label1.Caption = a End Sub,程序分析:变量a被隐式声明为字符型,并将 “你好!”赋值给a。尽管隐式声明比较方便,但如果将变量名拼错的话,就会导致难以查找的错误。,27,2.2.3 变量,Option Explicit语句:可以使得vb只要遇到一个未经显式声明的变量名,就发出错误警告。它有两种输入方式: 1)在代码窗口中各种模块的声明部分输入Option Explicit语句。在代码编辑器从对象下拉列表中选择“通用”,从过程下拉列表选择“声明”,然后输入代码“Option Explicit”,28,2.2.3 变量,2)在“工

17、具”菜单中选择“选项”菜单项,单击“编辑器”选项卡,选择“要求变量声明”复选框如图所示。当下次启动VB后,就在任何新模块中自动插入了Option Explicit 语句。,29,2.2.3 变量,2. 变量的赋值 在声明一个变量后,就可以给变量赋值。赋值语句用于将表达式的值赋给变量。 语法: Let 变量= 表达式 说明:Let可以省略;“=”是赋值符号。 例如,下面几种都是赋值语句: Dim a, b As Integer a = 5 Let a = 5 b = 5: a = b,30,2.2.3 变量,变量的赋值说明: (1)只有当右边的表达式是与变量兼容的数据类型时,该值才可以赋予变量,

18、否则,会强制将该值转换为变量的数据类型。当类型不匹配时,系统会提示出错。 例如:dim a as Boolean a=5 结果:atrue (2)当数值型变量赋值超出其范围时,会提示溢出出错。 (3)当对定长字符型变量赋值时,如果字符串长度小于定长,则用空格将不足部分填满;如果字符串的长度太长,则截掉超出部分的字符。,31,2.2.3 变量,1、下列哪个符号不能作为VB中的变量名? (1) ABCDEFG (2) P_00000 (3) 89TWDDFF (4) xyz 2、下列符号哪一个是VB中的合法变量名? (1) AB7 (2) 7AB (3) IF (4) AB7 3、如果希望使用变量

19、x来存放数据765432.123456,应该将变量x声明为何种类型?,(3),(1),Single,32,2.3 运算符和表达式,2.3.1 运算符和表达式 2.3.2 各种运算的优先顺序,33,2.3.1 运算符和表达式,1. 算术运算符和表达式 算术运算符是用来进行数值运算的运算符,算术表达式是用算术运算符将常量、变量等连接起来的式子。 算术运算符包括+、-、* 、/、 和Mod: +、-、* 、/:用于两个数的加,减,乘,除运算,为双目运算。 :用于两个数的除法运算并返回一个整数商,为双目运算。 :用于求一个数的幂运算即指数运算,为双目运算。 Mod:用于两个数的除法运算并返回余数,为双

20、目运算。,34,2.3.1 运算符和表达式,例如,以下都是算术表达式,其中x=5: 2 *x 结果为 10 2 3 结果为 8 10 / 4 结果为 2.5 10 4 结果为 2 10 Mod 4 结果为 2 #3/15/2004# #1/15/2004# 结果为 60,两个日期的间隔天数,35,2.3.1 运算符和表达式,2. 关系运算符和表达式 关系表达式的值只能是True、False或NULL。 关系运算符包括、=、=、以及Is和Like: =:等于符,与赋值符号“=”不同。 :不等于符。 Is:比较两个对象是否一致。 Like:比较两个字符串的模式是否匹配。在Like表达式中可以使用通

21、配符。,36,2.3.1 运算符和表达式,在Like表达式中可以使用通配符:,(自学),37,2.3.1 运算符和表达式,例如: 524 数值比较,结果为false “5”24” 字符串比较,结果为true “aBBB” like “a*” 判断字符串匹配,结果true 字符的ASCII码大小顺序为: 空格“0”“9”“A”“Z”“a”“z”“汉字”,38,2.3.1 运算符和表达式,3. 连接运算符和表达式 连接运算符是用来合并字符串的运算符,包括&和+。连接表达式是用连接运算符将两个运算数连接起来。 例如,以下都是连接表达式: “Hello“ & “ World“ 结果为“Hello Wo

22、rld“ “2“ & “4“ 结果为“24“ “2“ +“4“ 结果为“24“ 2 & 4 结果为24 2 +4 结果为6 说明:“&”运算符与运算数之间应加一个空格。“&”运算符会自动将非字符串类型的数据转换成字符串后再进行连接,而“+”运算符则不行 。,39,2.3.1 运算符和表达式,4. 逻辑运算符和表达式 逻辑表达式是用逻辑运算符将逻辑变量连接起来。 逻辑运算符包括And(与)、Or(或)、Not(非)、Eqv(等价)、Imp(包含)和Xor(异或)。如表2.5是a和b进行逻辑运算的结果。,(快讲),40,2.3.2 各种运算的优先顺序,表达式的组成 表达式由变量、常量、运算符、函数

23、和圆括号按一定的规则组成,表达式的运算结果的类型由参与运算的数据类型和运算符共同确定。 表达式的书写规则 (1)每个符号占1格,所有符号都必须一个一个并排写在同一基准上,不能出现上标和下标。 (2)不能按常规习惯省略的乘号*,如:2x要写成2*x。 (3)只能使用小括号(),且必须配对。 (4)不能出现非法的字符,如。,41,2.3.2 各种运算的优先顺序,表达式中不同数据类型的转换 如果表达式中操作数具有不同的数据精度,则将较低精度转换为操作数中精度最高的数据精度,即按Integer、Long、Single、Double、Currency的顺序转换。 Integer型数据和Single型数据

24、进行运算时,结果总是Single型数据。Long型数据和Single型数据进行运算时,结果总是Double型数据。 除法运算不论运算数是什么类型,结果都是Double型。,42,2.3.2 各种运算的优先顺序,当在表达式中运算符不止一种时,系统会按预先确定的顺序进行计算,这个顺序称为运算符的优先顺序。 各种运算符的优先顺序有以下原则: (1)表达式的括号最优先,相同优先级的运算按从左到右顺序进行; (2)各种类型运算符的优先顺序(从高到低)如下: 算术运算符 字符串连接运算符 (&) 关系运算符 逻辑运算符 赋值语句 (3)同一类运算符的优先顺序也不同 算术运算符的优先顺序(从高到低)如下:

25、(负号) *、 / (整数除法) Mod +、 ,43,2.3.2 各种运算的优先顺序,【例】设变量x = 4,y = 1,a = 7.5,b = 6.2,求表达式x + y a + b And Not y 1.3 And Not y b (2) 再作关系运算: True And Not False (3) 作非运算: True And True (4) 最后得: True 求表达式 x*ab- y*5/2 Or y*ax 的值 求表达式 x*ab- y*5/2 And y*ax 的值,44,2.3.2 各种运算的优先顺序,练习1:表达式2 *32 + 2 * 8 / 4 + 32的值为 (1

26、) 64 (2) 31 (3) 49 (4) 22,答案:(2) 31,练习2: 3 * 2 / 5 + 5 3 * 2 的值为,答案:1.2,45,2.3.2 各种运算的优先顺序,【例2-1】判别某年是否是闰年,闰年的条件符合下面二者之一: (1)能被4整除,但不能被100整除。 (2)能被4整除又能被400整除。 要求:单击按钮Command1计算出2004年是否是闰年,并在窗体的标签Lable2中显示结果。,46,2.3.2 各种运算的优先顺序,界面设计:窗体界面中放置了两个标签Lable1和Lable2, 以及一个按钮Command1。分别设置其Caption属性,单击Command1

27、时判断2004年是否是闰年,程序代码如下: Private Sub Command1_Click() 单击按钮计算闰年 Dim x As Integer Dim y As Boolean x = 2004 y = (x Mod 4) = 0) And (x Mod 100) 0) Or (x Mod 4) = 0) And (x Mod 400) = 0) Label2.Caption = y End Sub,47,2.4 常用内部函数,内部函数也称公共函数,每个内部函数都有某个特定的功能,可在任何程序中直接调用。 语法:函数名(参数1,参数2,) 2.4.1 算术函数 2.4.2 字符函数

28、2.4.3 日期与时间函数 2.4.4 类型转换函数和判断函数,(快讲),48,2.4.1 算术函数,算术函数是系统给用户提供进行算术运算的函数。,49,2.4.1 算术函数,50,2.4.1 算术函数,算术函数有几点说明: (1)函数具有返回值,应注意函数返回值的数据类型。 (2)三角函数的运算都使用弧度。 (3)Fix(x)和Int(x)函数都是对数值型变量取整,但对于正数和负数结果不同。 Fix(10.5)=10 Int(10.5)=10 Fix(-10.5)=-10 Int(-10.5)=-11,51,2.4.1 算术函数,(4)用Rnd(x)函数用于产生随机数,当x=0时产生与前一次

29、相同的随机数。如果不断地重复Rnd函数,会反复出现同一序列的随机数,可以用Randomize语句消除这种情况。 语法:Randomize(x) 常用Rnd函数产生某个限定范围的随机整数,使用以下规则:Int(上限 - 下限+1)*Rnd)+下限 例如:产生1199范围的随机整数: Int(99 - 11+1)*Rnd)+11,52,2.4.1 算术函数,【例2-2】根据直角三角形的两条直角边,计算其斜边的长度。计算斜边根据公式:c2a2 b2 界面设计:在窗体上放置三个文本框(Text1、Text2、Text3)、三个标签(Label1、Label2、Label3)和一个按钮Command1,

30、Text1和Text2用来输入两条直角边的长度,计算的斜边显示在文本框Text3中,单击按钮Command1计算斜边。,53,2.4.2 字符函数,字符函数用于进行字符串处理。,54,2.4.2 字符函数,55,2.4.2 字符函数,【例2-3】界面设计:界面包含5个标签(Label1Label5),四个文本框(Text1Text4)和一个按钮(Command1),四个文本框分别用于输入字符串和从第几个位置开始取几个字符,单击按钮Command1进行取字符运算。,56,2.4.2 字符函数,程序代码如下: Private Sub Command1_Click() 单击按钮取字符 Dim s1

31、As String, s2 As String Dim a As Integer, b As Integer s1 = Text1.Text 输入字符串 a = Val(Text2.Text) 输入起始个数 b = Val(Text3.Text) 输入字符个数 s2 = Mid(s1, a, b) 取字符 Text4.Text = s2 End Sub 程序分析:使用Mid函数取字符串的任意位置字符。,57,2.4.3 日期与时间函数,日期时间函数提供日期和时间有关的函数。,(自学),58,2.4.3 日期与时间函数,59,2.4.3 日期与时间函数,【例2-4】使用日期和时间函数在窗体上显示

32、系统当前的日期和时间。 界面设计:界面包含5个(Label1Label5)标签,四个文本框(Text1Text4)和一个按钮(Command1),四个文本框分别用于显示年份、月份、日期和时间,单击按钮Command1在四个文本框中显示时间。,程序代码如下: Private Sub Command1_Click() 单击按钮显示时间 Text1.Text = Year(Date) 显示年份 Text2.Text = Month(Date) 显示月份 Text3.Text = Day(Date) 显示日期 显示时间 Text4.Text = Hour(Now) & “:“ & Minute(Now

33、) & “:“ & Second(Now) End Sub,60,2.4.4 类型转换函数和判断函数,1. 类型转换函数 转换函数是用来将数据强制转换成某种特定的数据类型,如表所示为转换函数的功能、例子以及转换结果。,(快讲),61,2.4.4 类型转换函数和判断函数,62,2.4.4 类型转换函数和判断函数,2. 判断函数 VB还提供了一些判断函数用来判断数据的类型,如表所示为判断函数的功能、例子以及转换结果。,63,2.4.4 类型转换函数和判断函数,64,2.5 InputBox、MsgBox函数和Print方法,2.5.1 InputBox函数 2.5.2 MsgBox函数 2.5.3

34、 Print方法,65,2 .5.1 InputBox函数,InputBox函数用于接受用户键盘输入的数据,也称为输入框。语法: 变量=InputBox(对话框字符串,标题 ,文本框字符串 ,横坐标值 ,纵坐标值 ,帮助文件, 帮助主题号) 说明: 对话框字符串:在输入对话框中显示的字符串,最大长度是1024个字符。 标题:指对话框标题栏的字符串,如果省略,则标题栏中为当前工程名。 文本框字符串:指文本框中显示的字符串,如果省略则文本框为空。 横、纵坐标值:指对话框在屏幕上的位置,横、纵坐标值为输入框左上角的坐标。,66,2 .5.1 InputBox函数,程序分析: InputBox函数出现

35、的对话框中自动生成一个文本框和“确定”、“取消”两个按钮。 对话框中显示“请输入学号”,标题为“输入学号”,文本框中显示的默认值为“2001010123”。 对话框等待用户在文本框输入内容,可以在文本框中输入,也可以使用默认值。 InputBox函数返回值给变量Number。,例如,使用InputBox函数输入学号,所显示的输入框。 Number = InputBox(“请输入学号“, “输入学号“, “2001010123“),67,2.5.2 MsgBox函数,MsgBox函数用于向用户发布提示信息,要求用户做出必要的响应,也称为消息框。语法: 变量=MsgBox(消息文本,显示按钮和图标

36、 ,标题 ,帮助文件, 帮助主题号) 说明: 消息文本:在对话框中作为消息显示的字符串,用于提示信息。如果消息的内容超过一行时,可以在每行之间插入回车符Chr(13)或换行符Chr(10)进行换行。 标题:在对话框标题栏中显示的标题,省略时为空白。 显示按钮和图标:是c1+c2+c3+c4的总和,用来指定显示按钮的数目、形式、使用的图标样式。,68,2.5.2 MsgBox函数,例如,使用消息框显示出错提示信息,消息框如图所示: Response = MsgBox(“对不起,你的学号不正确!“, vbOKOnly + vbExclamation, “出错“),程序分析: 显示的消息框中消息文本

37、为“对不起,你的学号不正确!”,标题为“出错”,按钮只有一个“确定”按钮( vbOKOnly),图标为警告(vbExclamation)。 当单击“确定”按钮,则返回1给变量Response。,69,2.5.3 Print方法,Print方法用于在窗体、图片框控件和打印机上输出文本。 语法:对象.Print表达式列表 说明: 当对象省略,就将表达式列表显示在窗体屏幕上。 表达式列表是显示或打印的内容。如果省略,则输出一空行。 多个表达式用“;”隔开;用“,”隔开则每个表达式间隔14个字符。,70,2.5.3 Print方法,1. Format格式函数 用格式函数Format可以使数值、日期或字

38、符型数据按指定的格式输出。 语法:Format(表达式, 格式字符串) 说明: 表达式可以是数值、日期型或字符型表达式。 格式字符串是一个字符串常量或变量,由专门的格式说明字符组成。当格式字符串为常量时,必须放在双引号中。 (1) “#”(数字占位符) 在格式字符串中“#”的位置上有数字存在,就显示出来;否则,该位置就什么都不显示。,71,2.5.3 Print方法,(2) “0”(数字占位符) 与“#”功能相同,只是多余的位用0补齐。 (3) “.”(小数点占位符) 小数点与“#”或“0”结合使用,根据格式字符串的位置,小数部分多余的数字按四舍五入处理。 (4) “,”(千分位符号占位符)

39、从小数点左边一位开始,每3位用一个逗号分开。逗号可以放在小数点左边的任何位置,但不能放在头部,也不能紧靠小数点。 (5) 其他符号 还可以使用:百分号(%)、美元符号($)、正号(+)、负号()、指数形式(E+或E)等来设置数值型数据的输出格式。,72,2.5.3 Print方法,表.常用的数值型格式说明字符,73,2.5.3 Print方法,例如,Format函数在窗体中显示: Dim a As Single a = 12345.67 Print Format(a, “#“) Print Format(a, “#,#.#“) Print Format(a, “000000.000“) Pri

40、nt Format(a, “#00.000“) Print Format(a, “#.#%“) Print Format(a, “-#.#“) Print Format(a, “0.00E+00“),则在窗体中显示如下: 12346 12,345.67 012345.670 12345.670 1234567.% -12345.67 1.23E+04,74,2.5.3 Print方法,(6) 用指定格式显示日期和时间,表. 常用的时间日期型格式说明字符,(自学),75,2.5.3 Print方法,例如,按指定格式显示当前日期和时间: Print Format(Now, “mm-dd-yyyy“

41、) 按指定格式显示日期 Print Format(Now, “dddddd“) 按完整格式显示日期 Print Format(Now, “h:m:s“) 按指定格式显示时间,则显示: 03-15-2004 2004年3月15日 15:13:24,76,2.5.3 Print方法,2. Spc函数 Spc(n)函数是在显示下一个表达式之前插入n个空格。 例如: Print “Hello“;Spc(2); “World! “ 则在窗体上显示: Hello World!,3. Tab 函数 Tab(n) 函数是将光标移动到第n列。 例如: Print “Hello“;Tab(8); “World!

42、“ 则在窗体上显示: Hello World!,77,重 点,1. 基本数据类型 2. 常量和变量的命名规则 3. 常量和变量的声明 4. 运算的优先级 5. InputBox、MsgBox函数和Print方法,78,习 题,一、选择题 1下列字符串中_是合法变量。 A. char_1,student,No,a1234 B. exp,123a,x*y C. xy,xy D. end,1bcx 2变量MyDate为日期型,下面赋值语句中正确的 。 A. MyDate=#“1/4/2004“# B. MyDate=#1/4/2004# C. MyDate=Date(“1/4/2004“) D. M

43、yDate=Format(“m/d/yyyy“,“1/4/2004“) 3下列数据中_是 Boolean型常量。 A. 123 B. And C. True D. Or 4. x为Integer型,如果Sgn(x)的值为-1,则x的值是_。 A. 等于0 B. 小于0 C. 大于0 D. 任意整数,79,习 题,5. I被j整除的逻辑表达式_。 A. I/j=0 B. Ij=0 C. Ij D. I mod j=0 6. 在Form_Click事件中执行Print Format(1236.54,“+#,# 0.0%”)语句的正确结果是 _ _。 A. 123456 B. +123,654.0%

44、 C. +123,654% D. 123,654 7. 表达式为4+56*7/8 Mod 9的值为_ 。 A. 4 B. 5 C. 6 D. 7 8. a=“Visual Basic“,下面使b=“Basic“的语句是_。 A.b=left(a,8,12) B. b=Mid(a,8,5) C. b=Right(a,5,8) D. b=left(a,8,5) 9可用于设置系统当前时间的语句是_。 A. Date B. Date$ C. Time D. Timer 10下面的运算符中优先级最高的是_。 A. Not B. C. D. *,80,习 题,11. 在窗体上放置一个命令按钮Command

45、1和一个文本框,把Text1的Text属性设置为空,运行下面的事件过程代码: Private Sub Command1_Click() Dim a,b a = InputBox(“输入一个整数“) b = Text1.Text Text1.Text=a+b End Sub 运行程序,在Text1文本框中输入456,单击按钮Command1,然后在出现的输入框中输入123,单击“确定”按钮,在Text1中显示的内容是_。 A. 579 B. 123456 C. 456123 D. 456,81,习 题,二、填空题 1VB中的注释语句采用_;VB的续行符采用_;若要在一行书写多条语句,则各语句间应

46、加分隔符,VB的语句分隔符为_。 2在VB中,字符型常量应用_符号将其括起来,日期常量应用_符号将其括起来。 3隐式声明字符型变量应使用_符号,整型变量应使用_符号。 4. 可实现将字符串小写转换成大写的的函数是_。 5代数表达式为(1+d2)-e2)5/2,则对应的 Visual Basic 表达式是_。 6. 将下面的十进制数75用八进制表示为_,用十六进制数表示为_。,82,习 题,7. 变量a是Single型,a=-1.23456, b=Int(a) c=Sgn(a) d=Abs(a) e=Fix(a) 则:b=_,c=_,d=_,e=_。 8. x是小于100的非负数,用VB的表达式

47、表示: _ 。 9使用MsgBox显示如下图,则写出语句_ 。 10. 在窗体中放置一个命令按钮,运行下面的程序代码: Private Sub Command1_Click() Dim a,b a = InputBox(“输入一个数字“) b = Len(a) Print “The Length of “;a;“=“;b End Sub 在出现的输入框中输入“12345“,单击“确定”按钮,结果是_。,83,习 题,三、简答题 1下面符号名中哪些是合法的VB符号常量和 变量名。 x1, 2a, If, x&2, y%x, xy, Form1.frm, x_y 2VB中是否可以出现下列形式的数? D32, 3.457E-10,.368,2.5E,1.87E+5,12E3.8,8.75D+6,84,习 题,1、函数Int(Rnd* 10)是在哪个范围内的整数? (1) ( 0 , 1 ) (2) ( 0 , 10 ) (3) 0 , 10 ) (4) 1 , 9 2、如果x是一个正实数,对x的第3位小数四舍五入的表达式是 (1)0.01*Int(x+0.005) (2) 0.01 * Int(100 * (x + 0.005) (3)0.01*Int(100*(x+0.05) (4) 0.01 * Int(x + 0.05)

展开阅读全文
相关资源
猜你喜欢
相关搜索

当前位置:首页 > 其他


经营许可证编号:宁ICP备18001539号-1