级托岗酉肠涩璃篓熄掐普手为服踩售糟鲸泥万癣巍侯榷保制苛谚票维吏拎第2章VisualBasic语言基础第2章VisualBasic语言基础第第2章章 Visual Basic语言基础语言基础 2.1 Visual Basic2.1 Visual Basic语言的基本概念语言的基本概念2.2 2.2 数据类型和常量、变量数据类型和常量、变量2.3 2.3 运算符和表达式运算符和表达式2.4 2.4 常用内部函数常用内部函数2.5 InputBox2.5 InputBox、MsgBoxMsgBox函数和函数和PrintPrint方法方法可盟札组鞭添烙掂绵筋口趟摊渝旋搁呕调怯态蛛府迅做所焕锋顷亭丸掣爪第2章VisualBasic语言基础第2章VisualBasic语言基础12.1 Visual Basic2.1 Visual Basic语言的基本语言的基本概念概念2.1.1 2.1.1 标识符标识符2.1.2 2.1.2 书写规范书写规范柳涵蓝躇值亿空韧辐彬蓑庆寺氛轩扁席缩嘴铺伊钧隐勘栏钳腑咀咎隶币担第2章VisualBasic语言基础第2章VisualBasic语言基础22.1.1 标识符标识符 标识符标识符是编程时为变量、常量、数据类型、过程、函是编程时为变量、常量、数据类型、过程、函数、类等定义的名字。数、类等定义的名字。 VB VB中所有的标识符都有相同的命名规则，中所有的标识符都有相同的命名规则，命名规则命名规则如如下：下： （1 1）标识符由字母、数字或下划线（）标识符由字母、数字或下划线（_ _）组成，不能）组成，不能包含标点符号、空格等。包含标点符号、空格等。 （2 2）标识符必须以字母开头，不能以数字或其他字符）标识符必须以字母开头，不能以数字或其他字符开头。例如，开头。例如，2a2a、1_11_1等都是不合法的。等都是不合法的。 （3 3）标识符最长不能超过）标识符最长不能超过 255 255 个字符。个字符。 （4 4）自定义的变量、过程名等不能和）自定义的变量、过程名等不能和VBVB中的关键字同中的关键字同名。例如，变量名不能是名。例如，变量名不能是FalseFalse、IfIf、EndEnd等。等。 愧告堂偏姐队修鉴名郑粮棺淤睦攒蛮迁欠沈泥买册芳主翌墒杖拱羡耀叶封第2章VisualBasic语言基础第2章VisualBasic语言基础32.1.2 书写规范书写规范 1.1.VBVB代码中字母的大小写代码中字母的大小写（1 1）VBVB代码中代码中不区分不区分字母的大小写。字母的大小写。（2 2）VBVB中的关键字首字母总被转换成大写，其余中的关键字首字母总被转换成大写，其余字母被转换成小写。字母被转换成小写。（3 3）对于用户自定义的变量、过程名等，）对于用户自定义的变量、过程名等，VBVB以第以第一次定义的大小写为准，以后每次输入的变量或过一次定义的大小写为准，以后每次输入的变量或过程名自动按第一次定义的格式转换。程名自动按第一次定义的格式转换。钒蟹义美菊傲内这症嫡倔罗汐叛姥揽咐毋动坚胃线矗叉喷长孔示税络伏振第2章VisualBasic语言基础第2章VisualBasic语言基础42.1.2 书写规范书写规范 2.2.语句按行书写语句按行书写(1)(1)VBVB的语句按行书写，每行最多允许的语句按行书写，每行最多允许255255个字符。个字符。(2) (2) 可以将多个语句合并到同一行上，语句间用可以将多个语句合并到同一行上，语句间用“：”号分隔。号分隔。(3) (3) 单行语句可以通过续行符单行语句可以通过续行符“ _”“ _” 将一行分成将一行分成若干行书写。一行语句最多只能有若干行书写。一行语句最多只能有2525个续行。个续行。 旱宙波悔粱谱吩孔勺茅啊隘焉隆扒械嗣聋降谊泞综演锥够禄惟朔胳盂杉去第2章VisualBasic语言基础第2章VisualBasic语言基础52.1.2 书写规范书写规范3注释语句注释语句 注释语句用于在代码中添加注释。代码段中的注释语句注释语句用于在代码中添加注释。代码段中的注释语句VBVB并不运行，只是提高程序的可读性，便于程序的维护和调并不运行，只是提高程序的可读性，便于程序的维护和调试。试。VBVB提供了两种方法来添加注释。提供了两种方法来添加注释。(1) Rem语句语句语法：语法：Rem 注释文本注释文本例如，添加注释说明按钮例如，添加注释说明按钮Command1的的Click事件的功能：事件的功能：Private Sub Command1_Click()Rem 单击按钮在标签中显示单击按钮在标签中显示你好！你好！或者在一行上写注释：或者在一行上写注释：Private Sub Command1_Click()：Rem 单击按钮在单击按钮在标签中显示标签中显示你好！你好！ 掂当讯撵趟汐稠盆察宗琅哲仕阿淘年鉴氖郁咏够进显刽赦棠缀羚拖呐感疮第2章VisualBasic语言基础第2章VisualBasic语言基础62.1.2 书写规范书写规范(2) 单引号单引号“”注释符注释符语法：语法： 注释文本注释文本使用使用“”加注释更加灵活也更常用。加注释更加灵活也更常用。例如：例如：Private Sub Command1_Click() 单击按钮在标签中显示单击按钮在标签中显示你好！你好！ 或者在一行上写注释：或者在一行上写注释：Private Sub Command1_Click() 单击按单击按钮在标签中显示钮在标签中显示你好！你好！ 闸席哗野葬拉病熏脯俊循悉描唐垦冲钒族唯怯延陆医隋善丢椽柬歌室刻掀第2章VisualBasic语言基础第2章VisualBasic语言基础72.2 数据类型和常量、变量数据类型和常量、变量2.2.1 2.2.1 数据类型数据类型2.2.2 2.2.2 常量常量2.2.3 2.2.3 变量变量轻瞩皑井硼方氏恫昌锡君权冶毗捆睹围瘫倦讨雹坪浴靛俏屡天壁瞅别琶吞第2章VisualBasic语言基础第2章VisualBasic语言基础82.2.1 数据类型数据类型 v基本数据类型：基本数据类型：数据类型多达数据类型多达1212种，包括：种，包括：IntegerInteger、LongLong、SingleSingle、DoubleDouble、CurrencyCurrency、ByteByte、StringString、BooleanBoolean、DateDate、ObjectObject和和VariantVariant。 1 1数值型数值型 数值型数据包含两类共五种数据类型。数值型数据包含两类共五种数据类型。(1) (1) 整数数据整数数据 存放整数数据的有存放整数数据的有IntegerInteger（整型）和（整型）和LongLong（长整型）。（长整型）。(2) (2) 小数数据小数数据 存放小数数据的有存放小数数据的有SingleSingle（单精度浮点型）、（单精度浮点型）、DoubleDouble（双（双精度浮点型）和精度浮点型）和 Currency Currency（货币型），（货币型），CurrencyCurrency型的数据小型的数据小数点前面可以有数点前面可以有1515位，小数点后有位，小数点后有4 4位。位。（快讲）（快讲）致涛拱恢猪慢娱顽讯另暮吟您诫蔽锄马丸篇浇坞质望挂污构运漆秒只严磐第2章VisualBasic语言基础第2章VisualBasic语言基础92.2.1 数据类型数据类型2. 字节型（字节型（Byte ） Byte型用于存储二进制数据，型用于存储二进制数据，0255的整数可的整数可以用以用Byte型表示。型表示。3. 字符型（字符型（String） 字符型用于存放字符串，字符型用于存放字符串，字符串字符串是用双引号是用双引号（“”）括起来的一串字符，字符型有）括起来的一串字符，字符型有变长和定长变长和定长两种，分别表示固定长度和可变长度的字符串。变两种，分别表示固定长度和可变长度的字符串。变长字符串型是根据存放的字符串长度可增可减。长字符串型是根据存放的字符串长度可增可减。隧瀑晓押徊掷揽恶表励乳竖癌澄务边华仟略召刹匆雁疯瘫袖朱姻敦柒恿纳第2章VisualBasic语言基础第2章VisualBasic语言基础102.2.1 数据类型数据类型4. 布尔型（布尔型（Boolean） 布尔型存储的只能是布尔型存储的只能是 True True 或或 False False。如果数据的值。如果数据的值只有只有“True“True或或False”False”、“Yes“Yes或或No”No”、“On“On或或Off”Off”，则可，则可以用以用BooleanBoolean型表示。当把数值型数据转换为布尔型数据时，型表示。当把数值型数据转换为布尔型数据时，0 0会转换为会转换为FalseFalse，其它非，其它非0 0值转换为值转换为TrueTrue。反之，当把布尔。反之，当把布尔型数据转换为数值型时，型数据转换为数值型时，FalseFalse转换为转换为0 0，TrueTrue转换为转换为-1-1。5 5日期型（日期型（DateDate） 日期型用于存储日期和时间，日期型数据必须以一对日期型用于存储日期和时间，日期型数据必须以一对“# #”括起来。如果不含时间值，则自动将时间设置为午夜括起来。如果不含时间值，则自动将时间设置为午夜（00:00:0000:00:00）；如果不含日期值，则自动将日期设置为公）；如果不含日期值，则自动将日期设置为公元元18991899年年1212月月3030日。日。导簿挺牢翼蝗虱纯永巫笨掏灌振指私枢菊婶稗卫旬纳梗酶姓区款秦拨丛嫩第2章VisualBasic语言基础第2章VisualBasic语言基础112.2.1 数据类型数据类型6. 6. 变体型（变体型（VariantVariant） 变体型能够存储系统定义的所有类型的数据，是一种可变体型能够存储系统定义的所有类型的数据，是一种可变的数据类型。当没有说明数据类型时，则变量自动为变的数据类型。当没有说明数据类型时，则变量自动为 VariantVariant型，但采用型，但采用VariantVariant型占用的内存也比其他类型多。型占用的内存也比其他类型多。VariantVariant型还包含三种特定值：型还包含三种特定值：EmptyEmpty、Null Null 和和 Error Error。7. 7. 对象型（对象型（ObjectObject） 对象型用于表示任何类型的对象，可引用应用程序中或对象型用于表示任何类型的对象，可引用应用程序中或其它应用程序中的对象。必须使用其它应用程序中的对象。必须使用SetSet语句先对对象引用赋语句先对对象引用赋值，然后才能引用对象。值，然后才能引用对象。 趴铅俄潞除琐秩阐煮鞭插绦叶惹背纯咋某幢锑铬揭赋咨罕朱仕另权给乏刽第2章VisualBasic语言基础第2章VisualBasic语言基础122.2.1 数据类型数据类型数据类型以及存储空间大小与范围数据类型以及存储空间大小与范围 数据数据类型型存存储空空间（字（字节）范范围Byte10255Boolean2True或或FalseInteger2-32,76832,767Long4-2,147,483,6482,147,483,647Single4-3.402823E38-1.401298E-451.401298E-453.402823E38Currency8-922,337,203,685,477.5808922,337,203,685,477.5807Date8100年年1月月1日日9999年年12月月31日日Double8-1.79769313486232E308-4.94065645841247E-3244.94065645841247E-3241.79769313486232E308待锡卧恕棘秀弥猪流句廉替辉爪邀哦卸坝斯壶庆顾瘁健筛刹冯饵孩舜欺堵第2章VisualBasic语言基础第2章VisualBasic语言基础132.2.1 数据类型数据类型v用户自定义数据类型（第用户自定义数据类型（第3章章P64） 除了上述数据类型外，在除了上述数据类型外，在VB中，用户可以根据需要利用中，用户可以根据需要利用Type语句语句定义自己的数据类型，其格式如下：定义自己的数据类型，其格式如下：Type 数据类型名数据类型名 数据类型元素名数据类型元素名 As 类型名类型名 End Type 其中，数据类型名为自定义数据类型名，数据类型元素其中，数据类型名为自定义数据类型名，数据类型元素名为自定义数据类型中的一个成员，类型名为上述基本类型名为自定义数据类型中的一个成员，类型名为上述基本类型名或自定义数据类型名。名或自定义数据类型名。（自学）（自学）彭诗材锯橡茂再划慎唱钉审氖笔呕剩问网变傣锁茎制碰卡呵慑严蛾融绝缎第2章VisualBasic语言基础第2章VisualBasic语言基础142.2.1 数据类型数据类型v枚举类型枚举类型 当一个变量只有几种可能的值时，可以使用枚举的方法当一个变量只有几种可能的值时，可以使用枚举的方法将变量的值一一列出来，变量的值就只限制在列出的几种值将变量的值一一列出来，变量的值就只限制在列出的几种值中。采用这样的方法定义的变量类型称为中。采用这样的方法定义的变量类型称为枚举类型枚举类型。 枚举可以通过在标准模块或公用类模块中的声明部分用枚举可以通过在标准模块或公用类模块中的声明部分用 Enum 语句声明一个枚举类型来创建。其格式为：语句声明一个枚举类型来创建。其格式为：Private|Public Enum 类型名称类型名称成员名成员名=常数表达式常数表达式End Enum（自学）（自学）匪刻颐戴斜蓝寿袁蝇餐案浚确畏次畦像倚专雹掷峭假兄椅潭裔螟裁掩润欣第2章VisualBasic语言基础第2章VisualBasic语言基础152.2.1 数据类型数据类型例题：定义一天时间划分的例题：定义一天时间划分的枚举枚举类型：类型：PublicEnumTimeOfDayMorning=0Afternoon=1Evening=2EndEnum使用方式和基本类型一样，如：使用方式和基本类型一样，如：DimtasTimeOfDayt=Morning（自学）（自学）冗令腿错偿尼树挞莱寇慰营均淋股括鸥演丁咽决淀缝函暑非帽萍瘟码滋寝第2章VisualBasic语言基础第2章VisualBasic语言基础162.2.2 常量常量 在整个应用程序执行过程中，值不会改变的数在整个应用程序执行过程中，值不会改变的数据就是据就是常量常量，分为，分为一般常量和符号常量一般常量和符号常量。 1. 1. 一般常量一般常量 一般常量包括：数值常量、字符常量、逻辑型一般常量包括：数值常量、字符常量、逻辑型常量和日期常量。常量和日期常量。(1) (1) 数值常量数值常量 数值常量由正负号、数字和小数点等组成，其数值常量由正负号、数字和小数点等组成，其中小数可以用定点数和浮点数表示。中小数可以用定点数和浮点数表示。亲庸湃蛋适递怨融更林搅保播哼痞菌审矣烯麓刺沛梢病括柏焚狈篷赶低琴第2章VisualBasic语言基础第2章VisualBasic语言基础172.2.2 常量常量 整数整数：由数字和正负号组成，例如，：由数字和正负号组成，例如，1212、-123-123、12345671234567。 整数大多数都是以十进制表示的，也可以用十整数大多数都是以十进制表示的，也可以用十六进制数（基数为六进制数（基数为 16 16）或八进制数（基数为）或八进制数（基数为 8 8）表）表示。八进制数用前缀示。八进制数用前缀&O&O引导，由数字引导，由数字0 07 7组成。十组成。十六进制数用前缀六进制数用前缀 &H&H 引导，由数字引导，由数字0 09 9、A AF F或或 a af f 组成。组成。 衣遵择验赌怜莱晦拱凋咕饰柔扦株卯适黍俯徘匠苫凹狼显踏悦收讼欢弘信第2章VisualBasic语言基础第2章VisualBasic语言基础182.2.2 常量常量十进制数、八进制数和十六进制数的相互转换十进制数、八进制数和十六进制数的相互转换十十进制数制数八八进制数制数十六十六进制数制数7&O7&H78&O10&H815&O17&HF16&O20&H10255&O377&HFF膊阿卡鞋牡买芯恳坠何查危臆傍欲草淫侍摩瓤后颤蛋恋绵捏斧偶例惰搀拐第2章VisualBasic语言基础第2章VisualBasic语言基础192.2.2 常量常量定点数定点数：带有小数点的正数或负数，表示数的：带有小数点的正数或负数，表示数的范围比较小，例如，范围比较小，例如，-75.32-75.32、3.14159263.1415926、0.00050.0005。浮点数浮点数：分为单精度浮点数和双精度浮点数，：分为单精度浮点数和双精度浮点数，分别表示为分别表示为mEnmEn和和mDnmDn，m m为尾数，为尾数，n n为指数，指为指数，指数为乘以数为乘以1010的幂次。例如，的幂次。例如，-93.2E5-93.2E5（单精度（单精度型）、型）、-25.2E-3-25.2E-3（单精度型）、（单精度型）、2.35D-122.35D-12（双（双精度型）。精度型）。 约名湃镰孺模伺吕槐股彩菇溪蜂芯翟扛裤兴夷粗辣衍咏苞诈颇继膊肥瑰冀第2章VisualBasic语言基础第2章VisualBasic语言基础202.2.2 常量常量(2)(2)字符常量字符常量 字符常量是用双引号（字符常量是用双引号（）括起来的一串字符。例如，）括起来的一串字符。例如，abCabC、 李明李明 、 你好！你好！ ，其中，其中（双引号中无任何（双引号中无任何字符，也不含空格字符，也不含空格) )为为空字符串空字符串。(3)(3)逻辑常量逻辑常量 逻辑常量只有两个：逻辑常量只有两个：TrueTrue（真）、（真）、FalseFalse（假）。（假）。(4)(4)日期常量日期常量 日期常量是用前后两个日期常量是用前后两个“#”“#”把表示日期和时间的值括把表示日期和时间的值括起来。例如，以下几种都是表示起来。例如，以下几种都是表示20042004年年3 3月月1515日：日： #2004-3-15# #2004-3-15#、#3/15/2004#3/15/2004#、#2004/3/15#2004/3/15#、 #2004-3-15 7:30:00# #2004-3-15 7:30:00# 鹅绑肾镑束副剃俞戈鲁敛羚磕币玉号裳欣对侵寿富用擒次偶沥袋靖霉椅膘第2章VisualBasic语言基础第2章VisualBasic语言基础212.2.2 常量常量2 2符号常量符号常量 符号常量是指在程序中用符号表示的常量。符号常量符号常量是指在程序中用符号表示的常量。符号常量又分为系统内置常量和用户定义常量两种。又分为系统内置常量和用户定义常量两种。(1) (1) 用户定义常量用户定义常量 用户定义常量用具有含义的常量名来代替难记的一般用户定义常量用具有含义的常量名来代替难记的一般常量，使用符号常量可增加程序代码的可读性。在程序中常量，使用符号常量可增加程序代码的可读性。在程序中使用用户定义常量，应该使用使用用户定义常量，应该使用 Const Const 语句先行说明。语句先行说明。语法语法：Public|Private Const Public|Private Const 常量名常量名 As As 数据类型数据类型=表达式表达式说明说明： 表示可省略的参数，表示可省略的参数，| |表示是可选择的参数。表示是可选择的参数。表达式可以由数值、字符串等常量以及运算符组成，甚至表达式可以由数值、字符串等常量以及运算符组成，甚至可以用前面定义过的用户定义常量。可以用前面定义过的用户定义常量。祟挪衷霓隔棚织遥锨燎见仲狂嘱簿瞬魄千亚收拄吃幕暗浪锰槽匿银汐期囚第2章VisualBasic语言基础第2章VisualBasic语言基础222.2.2 常量常量 常量名的命名规则符合标识符的命名规则。常量名的命名规则符合标识符的命名规则。例如，以下都是将难记的常量例如，以下都是将难记的常量用用户定义常量表示：用用户定义常量表示：ConstPI=3.1415926ConstPIAsSingle=3.1415926PrivateConstPIAsSingle=3.1415926例如，使用用户定义常量例如，使用用户定义常量PI定义新用户定义常量：定义新用户定义常量：ConstPI2=PI*2(2)系统内置常量系统内置常量 系统内置常量与应用程序的对象、方法和属性一起使系统内置常量与应用程序的对象、方法和属性一起使用，一般以用，一般以Vb为前缀，如为前缀，如VbBlue为蓝色。为蓝色。防赫脐纺腕氯忧倡溢嫩讯碟泽孵日卓怀桨笆售躬捅定烟厌侯雏颤妇枢墙伪第2章VisualBasic语言基础第2章VisualBasic语言基础232.2.3 变量变量 变量变量：程序运行过程中其值可以改变的量称为变量。程序通：程序运行过程中其值可以改变的量称为变量。程序通过变量名来引用其存储的数据。过变量名来引用其存储的数据。1变量的声明变量的声明 变量的声明分为变量的声明分为“显式声明显式声明”和和“隐式声明隐式声明”。(1) 显式声明显式声明 显式声明是在变量使用之前，用显式声明是在变量使用之前，用 Dim、Static、Public、Private 语句声明一个变量或多个变量。语句声明一个变量或多个变量。语法：语法：Dim 变量名变量名 As 数据类型数据类型 Dim 变量名变量名 As 数据类型数据类型 ，变量名，变量名 As 数据类型数据类型说明：用说明：用Dim语句声明变量就是定义该变量应存储的数据类型；语句声明变量就是定义该变量应存储的数据类型；当省略数据类型时，则默认为当省略数据类型时，则默认为 Variant型；同时声明多个变量型；同时声明多个变量时，各变量用时，各变量用逗号逗号分开。分开。 荧脆谗城臭惧名项辨缠话估的帚宵冰秸互职亏锐檀蔷路蓬绅猴渝谊裴置痊第2章VisualBasic语言基础第2章VisualBasic语言基础242.2.3 变量变量 声明定长字符型变量声明定长字符型变量的语法：的语法：Dim 变量名变量名 As String * 长度长度 如果没有声明变量的数据类型，则如果没有声明变量的数据类型，则VB把它看作变体型把它看作变体型Variant。然而，变体型可能会浪费内存空间，有时变体型还可。然而，变体型可能会浪费内存空间，有时变体型还可能无效。所以，在使用变量前最好先声明变量类型。能无效。所以，在使用变量前最好先声明变量类型。 显式声明还有显式声明还有Static、Public、Private 语句，声明变量的语句，声明变量的语法格式与语法格式与Dim语句相似。（参见第语句相似。（参见第6章章p151）语法：语法： Public 变量名变量名 As 数据类型数据类型 ，变量名变量名 As 数据类型数据类型 Private 变量名变量名 As 数据类型数据类型 ，变量名变量名 As 数据类型数据类型 Static 变量名变量名 As 数据类型数据类型 ，变量名变量名 As 数据类型数据类型疑岿舒殷江绞沥惋藻符匠诵苏繁摄侄官景沼齐骤矛纳伙扁隙忿限汪韩漆管第2章VisualBasic语言基础第2章VisualBasic语言基础252.2.3 变量变量(2) 隐式声明隐式声明 隐式声明是用一个特殊的类型符号加在变量名后面来声明隐式声明是用一个特殊的类型符号加在变量名后面来声明数据类型，而在使用一个变量之前不需要声明这个变量。数据类型，而在使用一个变量之前不需要声明这个变量。 声明符号声明符号数据数据类型型含含义%Integer整型整型&Long长整型整型$String字符型字符型!Single单精度浮点型精度浮点型#Double双精度浮点型双精度浮点型Currency货币型型例如，用隐式声明变量：例如，用隐式声明变量：Private Sub Command1_Click() 单击按钮在标签中显示单击按钮在标签中显示你好！你好！ a$ = 你好！你好！ Label1.Caption = aEnd Sub 程序分析：变量程序分析：变量a被隐式声明为字符型，并将被隐式声明为字符型，并将 “你好！你好！”赋赋值给值给a。尽管隐式声明比较方便，但如果将变量名拼错的话，。尽管隐式声明比较方便，但如果将变量名拼错的话，就会导致难以查找的错误。就会导致难以查找的错误。 丢革俗悦镀白套锥郝爹真弊锈沥凰购鸟智顾邓锨搽蚀织英殉凭倘槽褒厄炽第2章VisualBasic语言基础第2章VisualBasic语言基础262.2.3 变量变量(3)Option Explicit语句：语句：可以使得可以使得vb只要遇到一个未经显式只要遇到一个未经显式声明的变量名，就发出错误警告。它有两种输入方式：声明的变量名，就发出错误警告。它有两种输入方式：1）在代码窗口中各种模块的声明部分输入）在代码窗口中各种模块的声明部分输入Option Explicit语语句。在代码编辑器从对象下拉列表中选择句。在代码编辑器从对象下拉列表中选择“通用通用”，从过，从过程下拉列表选择程下拉列表选择“声明声明”，然后输入代码，然后输入代码“Option Explicit” 跺拆韶绊膏笛斯遮魏岛趣檀兑举涟击悸慎氮沤祝最恫碗饲刽晚船膀拴谷郡第2章VisualBasic语言基础第2章VisualBasic语言基础272.2.3 变量变量2）在）在“工具工具”菜单中选择菜单中选择“选项选项”菜单项，单击菜单项，单击“编辑器编辑器”选项卡，选择选项卡，选择“要求变量声明要求变量声明”复选框如图所示。当下次复选框如图所示。当下次启动启动VB后，就在任何新模块中自动插入了后，就在任何新模块中自动插入了Option Explicit 语句。语句。 康房伞幂惋蛔别丙险寓涨沸盒院郎仓甥鸣着夺肇吊乓嘲绣监哪贷扁超吵菇第2章VisualBasic语言基础第2章VisualBasic语言基础282.2.3 变量变量2. 变量的赋值变量的赋值 在声明一个变量后，就可以给变量赋值。赋值语句在声明一个变量后，就可以给变量赋值。赋值语句用于将表达式的值赋给变量。用于将表达式的值赋给变量。 语法：语法： Let 变量变量= 表达式表达式说明：说明：Let可以省略；可以省略；“=”是赋值符号。是赋值符号。例如，下面几种都是赋值语句：例如，下面几种都是赋值语句： Dim a, b As Integera = 5 Let a = 5 b = 5: a = b 毋炸惊茁康沉夯皱伶箩蹬补乙约渐清撅碉恰绣枉换荤绥土寺斡睹舌割封崩第2章VisualBasic语言基础第2章VisualBasic语言基础292.2.3 变量变量3.变量的赋值说明：变量的赋值说明：（1）只有当右边的表达式是与变量兼容的数据类型时，）只有当右边的表达式是与变量兼容的数据类型时，该值才可以赋予变量，否则，会强制将该值转换为变量该值才可以赋予变量，否则，会强制将该值转换为变量的数据类型。当类型不匹配时，系统会提示出错。的数据类型。当类型不匹配时，系统会提示出错。例如：例如：dim a as Boolean a=5结果：结果：atrue（2）当数值型变量赋值超出其范围时，会提示溢出出错。）当数值型变量赋值超出其范围时，会提示溢出出错。（3）当对定长字符型变量赋值时，如果字符串长度小于定）当对定长字符型变量赋值时，如果字符串长度小于定长，则用空格将不足部分填满；如果字符串的长度太长，长，则用空格将不足部分填满；如果字符串的长度太长，则截掉超出部分的字符。则截掉超出部分的字符。蛋怒痛黎异墩莹辨模亭脸绚彪宅委呛移灵渤凉唆拍釜认粒籍泪窥轿躇换奏第2章VisualBasic语言基础第2章VisualBasic语言基础302.2.3 变量变量1、下列哪个符号不能作为、下列哪个符号不能作为VB中的变量名？中的变量名？(1)ABCDEFG(2)P_00000(3)89TWDDFF(4)xyz2、下列符号哪一个是、下列符号哪一个是VB中的合法变量名？中的合法变量名？(1)AB7(2)7AB(3)IF(4)AB73、如如果果希希望望使使用用变变量量x来来存存放放数数据据765432.123456，应该将变量应该将变量x声明为何种类型？声明为何种类型？(3)(3)(1)(1)Single昧造瓷股外讫傲即麓箱昭伦什斡蕉斗窥废捅措保匹陪跪绵啡孽贷涌跌算聪第2章VisualBasic语言基础第2章VisualBasic语言基础312.3 运算符和表达式运算符和表达式2.3.1 2.3.1 运算符和表达式运算符和表达式2.3.2 2.3.2 各种运算的优先顺序各种运算的优先顺序闪浊淡瞪凿沾酬肢寻讫径组书扶晓钮愈戍喂荣腹粒躯候太祝郸制颈厦辗渗第2章VisualBasic语言基础第2章VisualBasic语言基础322.3.1 运算符和表达式运算符和表达式 1. 算术运算符和表达式算术运算符和表达式 算术运算符算术运算符是用来进行数值运算的运算符，是用来进行数值运算的运算符，算术表达式算术表达式是是用算术运算符将常量、变量等连接起来的式子。用算术运算符将常量、变量等连接起来的式子。算术运算符包括算术运算符包括+、-、* 、/、 和和Mod：+、-、* 、/：用于两个数的加：用于两个数的加,减减,乘乘,除运算，为双目运算。除运算，为双目运算。：用于两个数的除法运算并返回一个整数商，为双目运算。：用于两个数的除法运算并返回一个整数商，为双目运算。：用于求一个数的幂运算即指数运算，为双目运算。：用于求一个数的幂运算即指数运算，为双目运算。Mod：用于两个数的除法运算并返回余数，为双目运算。：用于两个数的除法运算并返回余数，为双目运算。早角募含债妙掷献仔鹃涕埋比絮因番赐耻蝗普间俞春秦楼决撼窄幌卡寐酣第2章VisualBasic语言基础第2章VisualBasic语言基础332.3.1 运算符和表达式运算符和表达式 例如，以下都是算术表达式，其中例如，以下都是算术表达式，其中x=5： 2 *x结果为结果为 102 3结果为结果为 8 10 / 4结果为结果为 2.510 4 结果为结果为 2 10 Mod 4 结果为结果为 2#3/15/2004# #1/15/2004# 结果为结果为 60，两个日期的间隔天数，两个日期的间隔天数 驱缮拌棚简夹唉庐阁蓑睛注征邵荷得宫球笆还阔厢察痢庭该碧沼鬃末歹企第2章VisualBasic语言基础第2章VisualBasic语言基础342.3.1 运算符和表达式运算符和表达式2. 关系运算符和表达式关系运算符和表达式关系表达式的值只能是关系表达式的值只能是True、False或或NULL。关系运算符包括关系运算符包括、=、=、以及以及Is和和Like：=：等于符，与赋值符号：等于符，与赋值符号“=”不同。不同。：不等于符。：不等于符。Is：比较两个对象是否一致。：比较两个对象是否一致。Like：比较两个字符串的模式是否匹配。在：比较两个字符串的模式是否匹配。在Like表达式表达式中可以使用通配符。中可以使用通配符。混媒囱材怯灾卞奴石汕晶哲票太竹贰疆酝炯际拔拔材裙证妇掂值因网消梨第2章VisualBasic语言基础第2章VisualBasic语言基础352.3.1 运算符和表达式运算符和表达式在在Like表达式中可以使用通配符：表达式中可以使用通配符： 通配符通配符含含义实例例可匹配字符串可匹配字符串*可匹配多个字符可匹配多个字符a*a1,abc,?可匹配可匹配单个字符个字符a?a1,ab,#可匹配可匹配单个数字个数字123#1234,1238,list可匹配列表中的可匹配列表中的单个字符个字符a-ea,b,c,d,e!list可匹配列表以外的可匹配列表以外的单个字符个字符!a-eG,h,f,（自学）（自学）旺忽仑甸巧凉唤脂螺哟搁诫伐悠沾笛捧知庞怒允馅斑横赡韧懊墅赏倘替涯第2章VisualBasic语言基础第2章VisualBasic语言基础362.3.1 运算符和表达式运算符和表达式例如：例如：524数值比较，结果为数值比较，结果为false“5”24”字符串比较，结果为字符串比较，结果为true“aBBB” like “a*”判断字符串匹配，结果判断字符串匹配，结果true字符的字符的ASCII码大小顺序为：码大小顺序为：空格空格“0”“9”“A”“Z”“a”“z”a+bAndNoty1.3AndNotyb(2)再作关系运算：再作关系运算：TrueAndNotFalse(3)作非运算：作非运算：TrueAndTrue(4)最后得：最后得：True求表达式求表达式x*ab-y*5/2Ory*ax的值的值求表达式求表达式x*ab-y*5/2Andy*ax的值的值人烬蒋禽崩扮覆宴猎著逃珐贤冰榴彩朋昆募谢皋想码规执谷阜肠汗敷摧覆第2章VisualBasic语言基础第2章VisualBasic语言基础432.3.2 各种运算的优先顺序各种运算的优先顺序 练习练习1：表达式：表达式2*32+2*8/4+32的值为的值为(1)64(2)31(3)49(4)22答案：答案：(2)31练习练习2：3*2/5+53*2的值为的值为答案：答案：1.2欠联嗣撅予而眩烃火谱旦墅金傅川取楞恍怯卒林缸召奖篓汕访市莆晤动添第2章VisualBasic语言基础第2章VisualBasic语言基础442.3.2 各种运算的优先顺序各种运算的优先顺序【例【例2-1】判别某年是否是闰年，闰年的条件符合下面二者】判别某年是否是闰年，闰年的条件符合下面二者之一：之一：(1)能被能被4整除，但不能被整除，但不能被100整除。整除。(2)能被能被4整除又能被整除又能被400整除。整除。要求：单击按钮要求：单击按钮Command1计算出计算出2004年是否是闰年，并年是否是闰年，并在窗体的标签在窗体的标签Lable2中显示结果。中显示结果。 县团南巡绰廖佰婉伞琅瘫暗谴挺屯譬俗泄沁柔纹哆葵酚麻准彼鬃蒲辖完淋第2章VisualBasic语言基础第2章VisualBasic语言基础452.3.2 各种运算的优先顺序各种运算的优先顺序界面设计：窗体界面中放置了两个标签界面设计：窗体界面中放置了两个标签Lable1和和Lable2，以及一个按钮以及一个按钮Command1。分别设置其。分别设置其Caption属性属性 属性属性Form1Lable1Lable2Command1Caption判断闰年判断闰年2004年是否是闰年？年是否是闰年？空空判断判断单击单击Command1时判断时判断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 = yEnd Sub 忻鲜型狐厘瓤奥衍按屈酶卜浅台医正忠尧剁烃摹越燕谴税挥柑嫡加眼伪椽第2章VisualBasic语言基础第2章VisualBasic语言基础462.4 常用内部函数常用内部函数 内部函数也称公共函数，每个内部函数都有内部函数也称公共函数，每个内部函数都有某个特定的功能，可在任何程序中直接调用。某个特定的功能，可在任何程序中直接调用。语法：函数名（参数语法：函数名（参数1，参数，参数2，）2.4.1 算术函数算术函数2.4.2 字符函数字符函数2.4.3 日期与时间函数日期与时间函数2.4.4 类型转换函数和判断函数类型转换函数和判断函数（快讲）（快讲）羡疚庙鹿米挛界厉俏棱捌舷拷誊冤估屿拇极恬挞臂综钢跌被吻撑疡吵搭酒第2章VisualBasic语言基础第2章VisualBasic语言基础472.4.1 算术函数算术函数 算术函数是系统给用户提供进行算术运算的函数。算术函数是系统给用户提供进行算术运算的函数。 函函 数数说说 明明实例实例结果结果Sin返回弧度的正弦返回弧度的正弦Sin(1).841470984807897Cos返回弧度的余弦返回弧度的余弦Cos(1).54030230586814Atn返回用弧度表示的反正切值返回用弧度表示的反正切值Atn(1).785398163397448Tan返回弧度的正切返回弧度的正切Tan(1)1.5574077246549Abs返回数的绝对值返回数的绝对值Abs(-2.4)2.4Exp返回返回e的指定次幂的指定次幂Exp(1)2.71828182845905Log返回一个数值的自然对数返回一个数值的自然对数Log(1)0阁涛珊士窍居适养肥叔咽野拔磷诚啄宇独凯驯君砌金货拾物裙议坝掳穴供第2章VisualBasic语言基础第2章VisualBasic语言基础482.4.1 算术函数算术函数 函函 数数说说 明明实例实例结果结果Rnd返回小于返回小于1且大于或等于且大于或等于0的随机的随机数数Rnd 01之间的随之间的随机数机数Sgn返回数的符号值返回数的符号值Sgn(-100)-1Sqr返回数的平方根返回数的平方根Sqr(16)4Int返回不大于给定数的最大整数返回不大于给定数的最大整数Int(3.6)3Fix返回数的整数部分返回数的整数部分Fix(-3.6)-3腊献尹鞋茂湖偏世迟凶在涅罪牟小递池捅既伙悯党廷毫出账迁庆黍渠萝枷第2章VisualBasic语言基础第2章VisualBasic语言基础492.4.1 算术函数算术函数 算术函数有几点说明：算术函数有几点说明：（1）函数具有返回值，应注意函数返回值的数据）函数具有返回值，应注意函数返回值的数据类型。类型。 （2）三角函数的运算都使用弧度。）三角函数的运算都使用弧度。（3）Fix(x)和和Int(x)函数都是对数值型变量取整，函数都是对数值型变量取整，但对于正数和负数结果不同。但对于正数和负数结果不同。Fix(10.5)=10Int(10.5)=10Fix(-10.5)=-10Int(-10.5)=-11柠深合钮窍掘欲驯酚曾彤陷制捡梳交吞棵柑券射宫印鹰碳旨督久贰殷粪亏第2章VisualBasic语言基础第2章VisualBasic语言基础502.4.1 算术函数算术函数 （4）用）用Rnd(x)函数用于产生随机数，当函数用于产生随机数，当x=0时产生与前一时产生与前一次相同的随机数。如果不断地重复次相同的随机数。如果不断地重复Rnd函数，会反复出现同函数，会反复出现同一序列的随机数，可以用一序列的随机数，可以用Randomize语句消除这种情况。语句消除这种情况。语法：语法：Randomize(x) 常用常用Rnd函数产生某个限定范围的随机整数，使用以下规函数产生某个限定范围的随机整数，使用以下规则：则：Int(上限上限 - 下限下限+1)*Rnd)+下限下限例如：产生例如：产生1199范围的随机整数：范围的随机整数： Int(99 - 11+1)*Rnd)+11旦慈铺皱澡肌赞往暮睹胎此矗反晴柞娇阻犹梅椒酒琢卵壶觉泞俯诌加洪当第2章VisualBasic语言基础第2章VisualBasic语言基础512.4.1 算术函数算术函数【例【例2-2】根据直角三角形的两条直角边，计算其斜边的长】根据直角三角形的两条直角边，计算其斜边的长度。计算斜边根据公式：度。计算斜边根据公式：c2a2 b2界面设计：在窗体上放置三个文本框（界面设计：在窗体上放置三个文本框（Text1、Text2、Text3）、三个标签（）、三个标签（Label1、Label2、Label3）和一个按）和一个按钮钮Command1，Text1和和Text2用来输入两条直角边的长度，用来输入两条直角边的长度，计算的斜边显示在文本框计算的斜边显示在文本框Text3中，单击按钮中，单击按钮Command1计计算斜边。算斜边。对象象控件名控件名属性名属性名属性属性值FormForm1Caption计算三角形斜算三角形斜边LabelLabel1Captiona=Label2Captionb=Label3Captionc=TextText1Text空空Text2Text空空Text3Text空空CommandCommand1Caption计算算经怯钩任卧座颈缅抄命铲莆汰舅耙王兽候赤靳皆亩哩边久袋脚饺篇歇挟路第2章VisualBasic语言基础第2章VisualBasic语言基础522.4.2 字符函数字符函数 字符函数用于进行字符串处理。字符函数用于进行字符串处理。 函函 数数说说 明明 实例实例结果结果Ltrim(C)返回删除字符串左端空格后的返回删除字符串左端空格后的字符串字符串LTrim(MyName)MyNameRtrim(C)返回删除字符串右端空格后的返回删除字符串右端空格后的字符串字符串RTrim(MyName)MyNameTrim(C)返回删除字符串前导和尾随空返回删除字符串前导和尾随空格后的字符串格后的字符串Trim(MyName)MyNameLeft(C,N)返回从字符串左边开始的指定返回从字符串左边开始的指定数目的字符数目的字符Left(MyName,2)MyRight(C,N)返回从字符串右端开始的指定返回从字符串右端开始的指定数目的字符数目的字符Right(MyName,4)Name烯姐攒势险裳览草炽侈篱坪拣稽曳床郴亮涂五蹄烽雾锥北矮岔校魔咖洁耪第2章VisualBasic语言基础第2章VisualBasic语言基础532.4.2 字符函数字符函数 函函 数数说说 明明 实例实例结果结果Mid(C,N1,N2)返回从字符串指定位置开始的指返回从字符串指定位置开始的指定数目的字符定数目的字符Mid (MyName,2,3)yNaLen(C)返回字符串的长度返回字符串的长度Len(MyName=王青王青)9Instr(N1,C1,C2,M)返回字符串在给定的字符串中出返回字符串在给定的字符串中出现的开始位置现的开始位置InStr(7,ASDFDFDFSDSF, DF)7Space(N)返回由指定数目空格字符组成的返回由指定数目空格字符组成的字符串字符串Space(5)String(N,C)返回包含返回包含一个字符一个字符重复指定次数重复指定次数的字符串的字符串String(2, A)AALcase(C)返回以小写字母组成的字符串返回以小写字母组成的字符串LCase(Aab)aabUcase(C)返回以大写字母组成的字符串返回以大写字母组成的字符串UCase(Aab)AAB胀就搭便演汐蛛脚米罢琢蛙丽寺喀乏净市绝的鸥习肃童皑加厦炎玩渤滇奸第2章VisualBasic语言基础第2章VisualBasic语言基础542.4.2 字符函数字符函数 【例【例2-3】界面设计：界面包含】界面设计：界面包含5个标签（个标签（Label1Label5），四个文本框（），四个文本框（Text1Text4）和一个按钮）和一个按钮（Command1），），四个文本框分别用于输入字符串和从第四个文本框分别用于输入字符串和从第几个位置开始取几个字符，单击按钮几个位置开始取几个字符，单击按钮Command1进行取进行取字符运算。字符运算。 厦守塌宝霄蓖虽骆凄诌卡谰呆讯碟终闯溶蓑呀蛹篡揍栏缸仲型镶樟玛错燥第2章VisualBasic语言基础第2章VisualBasic语言基础552.4.2 字符函数字符函数程序代码如下：程序代码如下：Private Sub Command1_Click()单击按钮取字符单击按钮取字符 Dim s1 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 = s2End Sub程序分析：使用程序分析：使用Mid函数取字符串的任意位置字符。函数取字符串的任意位置字符。 了廉糟予致浙请南姚蔗埂倒缕朽蔗郡钝浇筐嚼环垛耀铃契富婉忌急诵拥压第2章VisualBasic语言基础第2章VisualBasic语言基础562.4.3 日期与时间函数日期与时间函数 函数名函数名返回类型返回类型功能功能例子例子运算结果运算结果Day(日期日期)Integer返回日期，返回日期，131的整数的整数Day(#2004/3/15#) 15Month(日期日期)Integer返回月份，返回月份，112 的整数的整数Month(#2004/3/15# ) 3Year(日期日期)Integer返回年份返回年份Year(#2004/3/15# ) 2004Weekday(日日期期)Integer返回星期几返回星期几Weekday(#2004/3/15#) 2（星星期期天天是是第第一天一天）TimeDate返回当前系统时间返回当前系统时间Time 系统当前时间系统当前时间DateDate返回系统日期返回系统日期Date 系统当前日期系统当前日期NowDate返回系统日期和时间返回系统日期和时间Now 系系统统当当前前日日期期与时间与时间日期时间函数提供日期和时间有关的函数。日期时间函数提供日期和时间有关的函数。 （自学）（自学）嘱劈碌础唾俐咽坷知单毛豢祸撞额璃栗旺撬豪未飘量求狭烹酬像鹊试棍仰第2章VisualBasic语言基础第2章VisualBasic语言基础572.4.3 日期与时间函数日期与时间函数 函数名函数名返回返回类型类型功能功能例子例子运算运算结果结果Hour(时间时间)Integer返返回回钟钟点点，0 23的整数的整数Hour(#4:35:17 PM# )16Minute(时时 间间)Integer返返回回分分钟钟，0 59的整数的整数Minute(#4:35:17 PM#) 35Second(时时间间)Integer返返回回秒秒钟钟，059的整数的整数Second(#4:35:17 PM#) 17落歪搭痹凛版侵甄芬骄屋骸俩污御柜铡厅榨辈茶朝姜鞍薪佰健邦骆梗睬市第2章VisualBasic语言基础第2章VisualBasic语言基础582.4.3 日期与时间函数日期与时间函数【例【例2-4】使用日期和时间函数在窗体上显示系统当前的日】使用日期和时间函数在窗体上显示系统当前的日期和时间。期和时间。界面设计：界面包含界面设计：界面包含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) & : & Second(Now)End Sub 独曲躺窝央汗漂尹将理晦棕大矫箱瘩据转哇读洽纸囊煌解脯模刃菌扬磁瞳第2章VisualBasic语言基础第2章VisualBasic语言基础592.4.4 类型转换函数和判断函数类型转换函数和判断函数 1. 类型转换函数类型转换函数 转换函数是用来将数据强制转换成某种特定的数据类转换函数是用来将数据强制转换成某种特定的数据类型，如表所示为转换函数的功能、例子以及转换结果。型，如表所示为转换函数的功能、例子以及转换结果。 转换函数转换函数转换结果类型转换结果类型例子例子转换结果转换结果CBool(x)BooleanCBool(0) FalseCByte(x)ByteCByte(125.5678) 126CCur(x)CurrencyCCur(543.214588) 543.2146CDate(x)Datecdate(5) #1900-1-4#CDbl(x)DoubleCDbl(“1922.54576”) 1922.54576CInt(x)IntegerCInt(123.5) 124（快讲）（快讲）巳喻惰广咋负肃簇邱皑凝搅蔽侮峡撼火醛赡甲滦匪辛嗅压悍巨茹吃俞笆折第2章VisualBasic语言基础第2章VisualBasic语言基础602.4.4 类型转换函数和判断函数类型转换函数和判断函数 转换函数转换函数转换结果类型转换结果类型例子例子转换结果转换结果CLng(x)LongCLng(25427.45) 25427CSng(x)SingleCSng(75.3421115) 75.34211CStr(x)StringCStr(437.324) 437.324CVar(x)VariantCVar(4534 & 000) 4534000CVErr(x)ErrorCVErr(2001) 自定义错误码自定义错误码Str(x)Variant StringStr(459) 459壁喳疚边件储镁伏劝歹侧并左氖呀攫禽懂唇渍液地自铰授拷那谅鹏质渍癣第2章VisualBasic语言基础第2章VisualBasic语言基础612.4.4 类型转换函数和判断函数类型转换函数和判断函数2. 判断函数判断函数 VB还提供了一些判断函数用来判断数据的类型，如表所示还提供了一些判断函数用来判断数据的类型，如表所示为判断函数的功能、例子以及转换结果。为判断函数的功能、例子以及转换结果。 判断函数判断函数判断结果判断结果类型类型功能功能例子例子转换转换结果结果TypeNameString返回变量的类型返回变量的类型TypeName(2)IntegerIsNumeric(x)Boolean判断是否是数判断是否是数值型型 IsNumeric(123.4) TrueIsDateBoolean判断是否是日期型判断是否是日期型 IsDate(5)False校嘴玻执剖取恤裴帅找并衍滚癌蜜疲钦申菌软护锁辟圆撞佐闷澎仿劝膀网第2章VisualBasic语言基础第2章VisualBasic语言基础622.4.4 类型转换函数和判断函数类型转换函数和判断函数判断函数判断函数判断结果判断结果类型类型功能功能例子例子转换结果转换结果IsObjectBoolean判断是否是判断是否是对象象IsObject(5)FalseIsNullBoolean判断是否是不包含判断是否是不包含任何有效数据任何有效数据IsNull(5)FalseIsEmptyBoolean判判断断变量量是是否否已已被被初始化初始化IsEmpty(a)是否被初是否被初始化始化雀琉单医费彪磐鼻券味鸳奖胳嵌接然连皱段杠唯础寇效艺扬沿丛愿闪鳞州第2章VisualBasic语言基础第2章VisualBasic语言基础632.5 InputBox、MsgBox函数和函数和Print方法方法2.5.1 InputBox函数函数2.5.2 MsgBox函数函数2.5.3 Print方法方法邑练归藉颅福锦禽邦郴邵疟梆渠剿猩艰菜愤斩液妹费陆嘻恫鲜几哺骨妨俊第2章VisualBasic语言基础第2章VisualBasic语言基础642 .5.1 InputBox函数函数 InputBox函数用于接受用户键盘输入的数据，也称为函数用于接受用户键盘输入的数据，也称为输入框。语法：输入框。语法： 变量变量=InputBox(对话框字符串对话框字符串,标题标题 ,文本框字符文本框字符串串 ,横坐标值横坐标值 ,纵坐标值纵坐标值 ,帮助文件帮助文件, 帮助主题号帮助主题号)说明说明：对话框字符串：在输入对话框中显示的字符串，最大长对话框字符串：在输入对话框中显示的字符串，最大长度是度是1024个字符。个字符。标题：指对话框标题栏的字符串，如果省略，则标题栏标题：指对话框标题栏的字符串，如果省略，则标题栏中为当前工程名。中为当前工程名。 文本框字符串：指文本框中显示的字符串，如果省略则文本框字符串：指文本框中显示的字符串，如果省略则文本框为空。文本框为空。 横、纵坐标值：指对话框在屏幕上的位置，横、纵坐标横、纵坐标值：指对话框在屏幕上的位置，横、纵坐标值为输入框左上角的坐标。值为输入框左上角的坐标。脱魔饼峰迎便忌氛天鼻诡雹攻洪郸煤和痰帘瞄裂块莉茎绕牵卢滚卵瑶躺琼第2章VisualBasic语言基础第2章VisualBasic语言基础652 .5.1 InputBox函数函数程序分析程序分析：InputBox函数出函数出现的的对话框中自框中自动生成一个文本框和生成一个文本框和“确确定定”、“取消取消”两个按两个按钮。对话框中框中显示示“请输入学号入学号”，标题为“输入学号入学号”，文本，文本框中框中显示的默示的默认值为“2001010123”。对话框等待用框等待用户在文本框在文本框输入内容，可以在文本框中入内容，可以在文本框中输入入，也可以使用默也可以使用默认值。InputBox函数返回函数返回值给变量量Number。 例如，使用例如，使用InputBox函数输函数输入学号，所显示的输入框。入学号，所显示的输入框。 Number = InputBox(请输入学号请输入学号, 输入学号输入学号, 2001010123) 诫讨循吕域缆蛋淄净鼓悔鼠马亏劣毖游迸婿萝妙荐谤歹哄宾础啼碉矗驮岳第2章VisualBasic语言基础第2章VisualBasic语言基础662.5.2 MsgBox函数函数 MsgBox函数用于向用户发布提示信息，要求用户做出必函数用于向用户发布提示信息，要求用户做出必要的响应，也称为消息框。语法：要的响应，也称为消息框。语法：变量变量=MsgBox(消息文本消息文本,显示按钮和图标显示按钮和图标 ,标题标题 ,帮助文件帮助文件, 帮助主题号帮助主题号)说明说明：消息文本：在对话框中作为消息显示的字符串，用于提示消息文本：在对话框中作为消息显示的字符串，用于提示信息。如果消息的内容超过一行时，可以在每行之间插入回信息。如果消息的内容超过一行时，可以在每行之间插入回车符车符Chr(13)或换行符或换行符Chr(10)进行换行。进行换行。标题：在对话框标题栏中显示的标题，省略时为空白。标题：在对话框标题栏中显示的标题，省略时为空白。显示按钮和图标：是显示按钮和图标：是c1+c2+c3+c4的总和，用来指定显示的总和，用来指定显示按钮的数目、形式、使用的图标样式。按钮的数目、形式、使用的图标样式。氧罗第颂胸油绘已滔抒默荔暇果仙愈渣倡滤无敝骋捶榔字几映雁馁翼惧逝第2章VisualBasic语言基础第2章VisualBasic语言基础672.5.2 MsgBox函数函数例如，使用消息框例如，使用消息框显示出示出错提示信提示信息，消息框如息，消息框如图所示：所示：Response=MsgBox(对不起不起,你的你的学号不正确学号不正确!,vbOKOnly+vbExclamation,出出错)程序分析程序分析：显示的消息框中消息文本示的消息框中消息文本为“对不起不起,你的学号不正确你的学号不正确!”，标题为“出出错”，按，按钮只有一个只有一个“确定确定”按按钮（vbOKOnly），），图标为警告（警告（vbExclamation）。）。当当单击“确定确定”按按钮，则返回返回1给变量量Response。跳趴舒备獭束斌斡羽撞摧插的闰曲痪糟谐霜头僻朋碰僳牙昭屯沪翌坊当疏第2章VisualBasic语言基础第2章VisualBasic语言基础682.5.3 Print方法方法 Print方法用于在窗体、图片框控件和打印机上输出文本。方法用于在窗体、图片框控件和打印机上输出文本。语法：语法：对象对象.Print表达式列表表达式列表说明说明：当对象省略，就将表达式列表显示在窗体屏幕上。当对象省略，就将表达式列表显示在窗体屏幕上。表达式列表是显示或打印的内容。如果省略，则输出一空表达式列表是显示或打印的内容。如果省略，则输出一空行。行。多个表达式用多个表达式用“;”隔开；用隔开；用“,”隔开则每个表达式间隔隔开则每个表达式间隔14个字符。个字符。赎琉帖从己揍凉饶识舵盟挟闺网叫病罩篡酪杰互瘫敌么运嘉吼酱纸区赋缝第2章VisualBasic语言基础第2章VisualBasic语言基础692.5.3 Print方法方法 1. Format格式函数格式函数 用格式函数用格式函数Format可以使数值、日期或字符型数据按指可以使数值、日期或字符型数据按指定的格式输出。定的格式输出。语法：语法：Format（表达式（表达式, 格式字符串格式字符串）说明说明：表达式可以是数值、日期型或字符型表达式。表达式可以是数值、日期型或字符型表达式。格式字符串是一个字符串常量或变量，由专门的格式说明格式字符串是一个字符串常量或变量，由专门的格式说明字符组成。当格式字符串为常量时，必须放在字符组成。当格式字符串为常量时，必须放在双引号双引号中。中。(1) “#”（数字占位符）（数字占位符） 在格式字符串中在格式字符串中“#”的位置上有数字存在，就显示出来；的位置上有数字存在，就显示出来；否则，该位置就什么都不显示。否则，该位置就什么都不显示。 塘翱舱译崇丧床范烃备遍粕凌津蕴磁块恫勇萍铆俐讯者鳃黔等往腺蛹庚榆第2章VisualBasic语言基础第2章VisualBasic语言基础702.5.3 Print方法方法(2) “0”（数字占位符）（数字占位符） 与与“#”功能相同，只是多余的位用功能相同，只是多余的位用0补齐。补齐。(3) “.”（小数点占位符）（小数点占位符） 小数点与小数点与“#”或或“0”结合使用，根据格式字符串的位置，结合使用，根据格式字符串的位置，小数部分多余的数字按四舍五入处理。小数部分多余的数字按四舍五入处理。(4) “,”（千分位符号占位符）（千分位符号占位符） 从小数点左边一位开始，每从小数点左边一位开始，每3位用一个逗号分开。逗号可位用一个逗号分开。逗号可以放在小数点左边的任何位置，但不能放在头部，也不能紧以放在小数点左边的任何位置，但不能放在头部，也不能紧靠小数点。靠小数点。(5) 其他符号其他符号 还可以使用：百分号还可以使用：百分号(%)、美元符号、美元符号($)、正号、正号(+)、负号、负号()、指数形式、指数形式(E+或或E)等来设置数值型数据的输出格式。等来设置数值型数据的输出格式。 筛闪雹搅伶昔阶浅羞国狱裹钡兰潞残弘截琴哨榷糖署浅搬迷枉袜班检圈影第2章VisualBasic语言基础第2章VisualBasic语言基础712.5.3 Print方法方法表表.常常用用的的数数值值型型格格式式说说明明字字符符字符字符说说 明明#数字占位符。显示一位数字或什么都不显示。如果表达式在格式字符串中数字占位符。显示一位数字或什么都不显示。如果表达式在格式字符串中#的位置上有数字存在，那么就显示出来，否则，该位置什么都不显示的位置上有数字存在，那么就显示出来，否则，该位置什么都不显示0数字占位符。显示一位数字或是零。如果表达式在格式字符串中数字占位符。显示一位数字或是零。如果表达式在格式字符串中0的位置上的位置上有一位数字存在，那么就显示出来，否则就以零显示有一位数字存在，那么就显示出来，否则就以零显示.小数点占位符小数点占位符,千分位符号占位符千分位符号占位符%百分比符号占位符。表达式乘以百分比符号占位符。表达式乘以100。而百分比字符（。而百分比字符（%）会插入到格式字符）会插入到格式字符串中出现的位置上串中出现的位置上$在数字前强加在数字前强加$+在数字前强加在数字前强加+-在数字前强加在数字前强加-E+用指数表示用指数表示E-用指数表示用指数表示更象二之右律蛙版荚斌纷桐滚诗张扩姻职藤馋帽擎旷吕或揉毒熔光筛金感第2章VisualBasic语言基础第2章VisualBasic语言基础722.5.3 Print方法方法例如，例如，Format函数在窗体中显示：函数在窗体中显示： Dim a As Single a = 12345.67 Print Format(a, #) Print Format(a, #,#.#) Print Format(a, 000000.000) Print Format(a, #00.000) Print Format(a, #.#%) Print Format(a, -#.#) Print Format(a, 0.00E+00)则在窗体中显示如下：则在窗体中显示如下：1234612,345.67012345.67012345.6701234567.%-12345.671.23E+04 屎烧哈却败竭猴汲鹊婚涎卫侧泅伙霸接湍袱症澈弄迁腊将菲汐慨募恼库圆第2章VisualBasic语言基础第2章VisualBasic语言基础732.5.3 Print方法方法(6) 用指定格式显示日期和时间用指定格式显示日期和时间表表. 常用的时间日期型格式说明字符常用的时间日期型格式说明字符符号符号作用作用符号符号作用作用D显示日期（显示日期（131），个位前不加），个位前不加0dd显示日期（显示日期（0131），个位前加），个位前加0ddddddddww显示星期缩写（显示星期缩写（SunSat）星期为数字）星期为数字（17，1是星期日）是星期日）显示完整日期（显示完整日期（yy/mm/dd）ddddddddddww显示星期全名（显示星期全名（SundaySaturday）显示完整长日期显示完整长日期(yyyy年年m月月d日日)一年中的星期数一年中的星期数(153)M显示月份（显示月份（112），个位前不加），个位前不加0mm显示月份（显示月份（0112），个位前加），个位前加0mmm显示月份缩写（显示月份缩写（JanDec）mmmm月份全名（月份全名（JanuaryDecember）Y显示一年中的天（显示一年中的天（1366）yy两位数显示年份（两位数显示年份（0099）yyyy四位数显示年份（四位数显示年份（01009999）q季度数（季度数（14）H显示小时（显示小时（023），个位前不加），个位前不加0hh显示小时（显示小时（023），个位前加），个位前加0M在在h后显示分（后显示分（059），个位前不加），个位前不加0mm在在h后显示分（后显示分（059），个位前加），个位前加0S显示秒（显示秒（09），个位前不加），个位前不加0ss显示秒（显示秒（0059），个位前加），个位前加0ttttt显示完整时间（小时、分和秒）默认格式显示完整时间（小时、分和秒）默认格式为为hh:mm:ssAM/PMAm/pm12小时的时钟，中午前小时的时钟，中午前AM或或am中午后中午后PM或或pmA/P,a/p12小时的时钟，中午前小时的时钟，中午前A或或a，中午后中午后P或或p（自学）（自学）茨穷曙颁矛俊座汤量效湘杂涣闸猪妻吱散驾侍氧伐遮筛准孝杯兔陇啪轧梧第2章VisualBasic语言基础第2章VisualBasic语言基础742.5.3 Print方法方法例如，按指定格式显示当前日期和时间：例如，按指定格式显示当前日期和时间： Print Format(Now, mm-dd-yyyy) 按指定格式显示日期按指定格式显示日期Print Format(Now, dddddd)按完整格式显示日期按完整格式显示日期Print Format(Now, h:m:s) 按指定格式显示时间按指定格式显示时间则显示：则显示：03-15-20042004年年3月月15日日15:13:24 棋宾踞半柿贵企揉锑稗霸蕊竞坪绰起敌贸卿泳虎距择凶榴嵌转刷创譬电私第2章VisualBasic语言基础第2章VisualBasic语言基础752.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! 则在窗体上显示：则在窗体上显示：Hello World! 呻间躇渍汗搜总吸荷票授畏敦遇牌饶搅玛吴睬蒂狄礼讹庞键垫牛皑菩钵柴第2章VisualBasic语言基础第2章VisualBasic语言基础76重重 点点1.基本数据类型基本数据类型2.常量和变量的命名规则常量和变量的命名规则3.常量和变量的声明常量和变量的声明4.运算的优先级运算的优先级5.InputBox、MsgBox函数和函数和Print方法方法夏庭咳楚香君氟孕慢迅卫谣淹趁鹅吩鸡佑佃贰钨梁歪寻沪僧邮扑尼个藉瑶第2章VisualBasic语言基础第2章VisualBasic语言基础77习习 题题 一、选择题一、选择题1下列字符串中下列字符串中_是合法变量。是合法变量。 A. char_1,student,No,a1234 B. exp,123a,x*y C. xy,xy D. end,1bcx2变量变量MyDate为日期型，下面赋值语句中正确的为日期型，下面赋值语句中正确的 。A. MyDate=#1/4/2004#B. MyDate=#1/4/2004#C. MyDate=Date(1/4/2004)D. MyDate=Format(m/d/yyyy,1/4/2004)3下列数据中下列数据中_是是 Boolean型常量。型常量。 A. 123 B. And C. True D. Or4. x为为Integer型，如果型，如果Sgn(x)的值为的值为-1，则，则x的值是的值是_。 A. 等于等于0 B. 小于小于0 C. 大于大于0 D. 任意整数任意整数 煽遁庚钢景宝路薪隶傀侈官惺吾抵溅呕萤搜稍芥赛颂抨焊并甩锡持谚敢岭第2章VisualBasic语言基础第2章VisualBasic语言基础78习习 题题5. I被被j整除的逻辑表达式整除的逻辑表达式_。A. I/j=0 B. Ij=0 C. Ij D. I mod j=06. 在在Form_Click事件中执行事件中执行Print Format(1236.54,“+#,#0.0%”)语句的正确结果是语句的正确结果是 _ _。 A. 123456 B. +123,654.0% C. +123,654% D. 123,6547. 表达式为表达式为4+56*7/8 Mod 9的值为的值为_ 。 A. 4 B. 5 C. 6 D. 78. 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. Timer10下面的运算符中优先级最高的是下面的运算符中优先级最高的是_。A. Not B. C. y, Form1.frm, x_y2VB中是否可以出现下列形式的数？中是否可以出现下列形式的数？D32， 3.457E-10，.368，2.5E，1.87E+5，12E3.8，8.75D+6圈菏陀哀洛执概茨屎返坑舞近播抬冷裸断茂翻枪翅几伏洛酿掺支枷磋名脚第2章VisualBasic语言基础第2章VisualBasic语言基础83习习 题题1、函数、函数Int(Rnd*10)是在哪个范围内的整数？是在哪个范围内的整数？(1)(0,1)(2)(0,10)(3)0,10)(4)1,92、如如果果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)3、数学式子、数学式子sin25写成写成VB表达式是表达式是(1)Sin25(2)Sin(25)(3)Sin(25)(4)Sin(25*3.14/180)324默涩诣两疥寡肘翔滨渗涣运摈尼居贰豺扒砍膀瘟敏庭蛇措廓姜虐副躇烘针第2章VisualBasic语言基础第2章VisualBasic语言基础84习习 题题4、设、设A=7，B=3，C=4，求下列表达式的值。，求下列表达式的值。(1)A+3*C(2)A2/6(3)A/2*3/2(4)AMod3+B3/C55、写出下列函数的值。、写出下列函数的值。(1)Int(-3.14159)(2)Sqr(Sqr(64)(3)Fix(-3.1415926)(4)Int(Abs(99-100)/2)(5)Sgn(7*3+2)(6)Lcase(Hello)(7)Left(Hello,2)(8)Val(16Year)(9)Str(-459.65)(10)Len(Hello)贺缚详弓袜抬团伞讣侄绒菇狭瞎带蹲邻膨趋植砖艘牛俭刹暑数期觉派包表第2章VisualBasic语言基础第2章VisualBasic语言基础85