VisualBasic程序设计基础

1、 VisualBasic程序设计基础程序设计基础程序设计基础程序设计基础2021-6-252021-6-25 本章内容本章内容 语句和语法规则 1 数据类型 2 3 运算符和表达式 4 常量和变量 5常用标准函数 VisualBasic程序设计基础程序设计基础程序设计基础程序设计基础2021-6-252021-6-25 语句和语法规则语句和语法规则 1关键字和标识符关键字和标识符 关键字：又称为保留字，是关键字：又称为保留字，是Visual Basic系统定义的、系统定义的、 有特定意义的词汇有特定意义的词汇 。 标识符：自定义的命名标识符：自定义的命名 。 2Visual Basic中标识符

2、的命名规则中标识符的命名规则 必须以字母或汉字开头。必须以字母或汉字开头。 只能由字母、汉字、数字和下划线组成，但不能直接使只能由字母、汉字、数字和下划线组成，但不能直接使 用用Visual Basic的关键字。的关键字。 不能超过不能超过255个字符，控件、窗体和模块的名字不能超个字符，控件、窗体和模块的名字不能超 过过40个字符。个字符。 在标识符的有效范围内必须是唯一的。在标识符的有效范围内必须是唯一的。 VisualBasic程序设计基础程序设计基础程序设计基础程序设计基础2021-6-252021-6-25 语句书写规则语句书写规则 VB中每个语句以回车结束，通常一行只写一条语句。中

3、每个语句以回车结束，通常一行只写一条语句。 如果一行写多条语句，语句之间用冒号如果一行写多条语句，语句之间用冒号“：”分隔。如分隔。如 果将一条语句断开换行写，需要再语句断开处用下划线果将一条语句断开换行写，需要再语句断开处用下划线 “_”结尾。结尾。 注释以注释以Rem开头，也可以使用单引号开头，也可以使用单引号“”，注释内容可，注释内容可 直接出现在语句的后面。直接出现在语句的后面。 VB能够自动对语句进行简单的格式调整。能够自动对语句进行简单的格式调整。 VB具有自动提示的功能。具有自动提示的功能。 注意：下划线与最后一个注意：下划线与最后一个 字符间隔至少一个空格。字符间隔至少一个空格

4、。 VisualBasic程序设计基础程序设计基础程序设计基础程序设计基础2021-6-252021-6-25 数据类型数据类型 Visual Basic的数据类型主要分为三大类：的数据类型主要分为三大类： v 系统定义的基本数据类型系统定义的基本数据类型 v 自定义类型自定义类型 v 枚举类型枚举类型 VisualBasic程序设计基础程序设计基础程序设计基础程序设计基础2021-6-252021-6-25 基本数据类型基本数据类型 数据类型数据类型 字节数字节数 类型符类型符 取值范围取值范围 字节型（字节型（Byte） 1 0到到255 布尔型（布尔型（Boolean）2 True或或F

5、alse 整型（整型（Integer） 2 % -32,768到到32,767 长整型（长整型（Long） 4 & -2,147,483,648到到2,147,483,647 单精度浮点型（单精度浮点型（Single） 4 ! 负数从负数从-3.402823E38到到- 1.401298E-45 正数从正数从1.401298E-45到到 3.402823E38 双精度浮点型（双精度浮点型（Double） 8 # 负数从负数从-1.79769313486232D308到到 -4.947D-324 正数从正数从4.947D-324到到 1.79769313486232D308 货币型（货币型（Cu

6、rrency） 8 从从-922,337,203,685,477.5808到到 922,337,203,685,477.5807 字符串型（字符串型（String） 字符串长字符串长 度度 $ 定长字符串型（定长字符串型（String* 长度）长度） 字符串长字符串长 度度 $ 变体型（变体型（Variant）不定不定 对象型（对象型（Object） 4 VisualBasic程序设计基础程序设计基础程序设计基础程序设计基础2021-6-252021-6-25 基本数据类型基本数据类型 1字符串型（字符串型（String） 字符串中字母的大小写是有区别的。字符串中字母的大小写是有区别的。 例如

7、：例如：“ABC”与与“abc”是不相等的。是不相等的。 字符串中包含字符的个数称为字符串的长度，如果长度为字符串中包含字符的个数称为字符串的长度，如果长度为0则称之则称之 为空字符串。为空字符串。 例如：例如： abc 长度为长度为3的字符串的字符串 中华人民共和国中华人民共和国 长度为长度为7的字符串的字符串 由由4个空格组成的字符串，长度为个空格组成的字符串，长度为4 空字符串空字符串 程序代码中的字符串需要加上定界符双引号。程序代码中的字符串需要加上定界符双引号。 图 4.1 立即窗口 VisualBasic程序设计基础程序设计基础程序设计基础程序设计基础2021-6-252021-6

8、-25 基本数据类型基本数据类型 2数值型（数值型（Numeric） 整数类型整数类型 整型（整型（Integer） 以以2个字节存储整数。个字节存储整数。 长整型（长整型（Long） 以以4个字节存储整数。个字节存储整数。 字节型（字节型（Byte） 以以1个字节存储整数，取值范围为个字节存储整数，取值范围为0到到255。 VisualBasic程序设计基础程序设计基础程序设计基础程序设计基础2021-6-252021-6-25 基本数据类型基本数据类型 2数值型（数值型（Numeric） 实数类型实数类型 单精度浮点型单精度浮点型(Single) 以以4个字节存储实数，指数部分用个字节存储

9、实数，指数部分用E表示。表示。 例如：例如：123.456E+3 双精度浮点型（双精度浮点型（Double） 以以8个字节存储实数，指数部分用个字节存储实数，指数部分用D表示。表示。 例如：例如：123.456D-4 货币型（货币型（Currency） 以以8个字节存储实数，没有指数形式，精确到小数点后个字节存储实数，没有指数形式，精确到小数点后 4位，在小数点后位，在小数点后4位以后的数字将被舍去。位以后的数字将被舍去。 123.456103 123.45610-4 VisualBasic程序设计基础程序设计基础程序设计基础程序设计基础2021-6-252021-6-25 基本数据类型基本数

10、据类型 3日期型（日期型（Date） 可以表示的日期范围从公元可以表示的日期范围从公元100年年1月月1日到日到9999年年12月月31日。日。 日期型数据须以定界符日期型数据须以定界符“#”括起来。括起来。 例如：例如： #January 1,1993# #1 Jan 93# #1993-1-1# 4布尔型布尔型(Boolean) 又称为逻辑型，只有两个值，即真值又称为逻辑型，只有两个值，即真值(True)和假值和假值(False) 。 5变体型（变体型（Variant） 是一种可变的数据类型，可以用来表示除了定长字符串型和是一种可变的数据类型，可以用来表示除了定长字符串型和 自定义类型以外

11、的任何数据类型。自定义类型以外的任何数据类型。 6对象型（对象型（Object） 用来表示图形、用来表示图形、OLE对象或其他对象对象或其他对象 。 VisualBasic程序设计基础程序设计基础程序设计基础程序设计基础2021-6-252021-6-25 自定义类型自定义类型 用用Type语句定义的数据类型，又称为记录型。语句定义的数据类型，又称为记录型。 格式：格式： Public|Private Type 数据类型名数据类型名 数据类型元素名数据类型元素名 as 数据类型数据类型 数据类型元素名数据类型元素名 as 数据类型数据类型 End Type 例如：例如： Type Studen

12、t No as Integer Name as String*10 定义为定义为10个字符的定长字符串个字符的定长字符串 Sex as String*2 定义为定义为2个字符的定长字符串个字符的定长字符串 End Type VisualBasic程序设计基础程序设计基础程序设计基础程序设计基础2021-6-252021-6-25 枚举类型枚举类型 枚举类型，即将变量的取值一一列举出来。枚举类型，即将变量的取值一一列举出来。 格式：格式： Public|Private Enum 枚举名称枚举名称 成员名成员名1 =常数表达式常数表达式 成员名成员名2 =常数表达式常数表达式 End Enum V

13、isualBasic程序设计基础程序设计基础程序设计基础程序设计基础2021-6-252021-6-25 枚举类型枚举类型 说明：说明： 如果省略如果省略“常数表达式常数表达式”，在默认情况下，枚举中的，在默认情况下，枚举中的 第一个成员被初始化为第一个成员被初始化为0，其后的成员则被初始化为比，其后的成员则被初始化为比 其前面的成员大其前面的成员大1的数值。的数值。 例如：例如： Public Enum Workday Monday Tuesday Wednesday Thursday Friday Saturday Sunday End Enum VisualBasic程序设计基础程序设计

14、基础程序设计基础程序设计基础2021-6-252021-6-25 枚举类型枚举类型 说明：说明： 如果不省略如果不省略“常数表达式常数表达式”，可以用赋值语句给枚举中的，可以用赋值语句给枚举中的 成员赋值，所赋的值可以是任何长整型的数。成员赋值，所赋的值可以是任何长整型的数。 例如：例如： Public Enum Workday Monday=1 Tuesday Wednesday Thursday Friday Saturday Sunday End Enum VisualBasic程序设计基础程序设计基础程序设计基础程序设计基础2021-6-252021-6-25 常量和变量常量和变量 在

15、程序设计中需要将数据存储为常量或变量。在程序设计中需要将数据存储为常量或变量。 值不能被改变的量称为常量。值不能被改变的量称为常量。 值可以被改变的量称为变量。值可以被改变的量称为变量。 在程序中用常量和变量表示数据是重要的程序设计思想。在程序中用常量和变量表示数据是重要的程序设计思想。 常量分为：直接常量、符号常量、系统常量。常量分为：直接常量、符号常量、系统常量。 VisualBasic程序设计基础程序设计基础程序设计基础程序设计基础2021-6-252021-6-25 常量常量 1直接常量直接常量 直接常量就是在程序中给出具体数据的值。直接常量就是在程序中给出具体数据的值。 直接常量分为

16、数值常量、字符串常量、逻辑常量或日期常量。直接常量分为数值常量、字符串常量、逻辑常量或日期常量。 例如：例如： 5678，233.5E-6， 0.58D7 “this is a string”，True，#2004-11-18# 可以在数值的后面加上相应的类型说明符指明常量的类型。可以在数值的后面加上相应的类型说明符指明常量的类型。 例如：例如： 2.75!是一个单精度浮点型常量是一个单精度浮点型常量 11.25#是一个双精度浮点型常量。是一个双精度浮点型常量。 VisualBasic程序设计基础程序设计基础程序设计基础程序设计基础2021-6-252021-6-25 常量常量 2符号常量符号

17、常量 符号常量是用一些有意义的名字代替永远不变的值。符号常量是用一些有意义的名字代替永远不变的值。 格式：格式： Const 常量名常量名类型说明类型说明 = 表达式表达式，常量名，常量名类型说明类型说明 = 表表 达式达式 例如：例如： Const Pi = 3.1415926 Const Pi2 = Pi * 2, Pi4 = Pi * 4 Const tomorrow = #1/1/1995# Const num! = 1.25, max As Double = 2.65 VisualBasic程序设计基础程序设计基础程序设计基础程序设计基础2021-6-252021-6-25 常量常量

18、 3系统常量系统常量 系统定义的常量是与应用程序的对象、方法和属性一起系统定义的常量是与应用程序的对象、方法和属性一起 使用，由使用，由VBVB应用程序和控件提供的。一般以应用程序和控件提供的。一般以vbvb为前缀，例如，为前缀，例如， 要将文本框要将文本框Text1Text1的前景颜色设置为红色，可以使用下面的的前景颜色设置为红色，可以使用下面的 语句：语句： Text1.ForeColor=vbRedText1.ForeColor=vbRed 这里的这里的vbRedvbRed就是系统常量。这比直接使用就是系统常量。这比直接使用1616进制数来进制数来 设置要直观得多。设置要直观得多。 Vi

19、sualBasic程序设计基础程序设计基础程序设计基础程序设计基础2021-6-252021-6-25 变量变量 1变量的声明变量的声明 显式声明显式声明 显式声明是在使用变量前用声明语句声明变量。显式声明是在使用变量前用声明语句声明变量。 格式：格式：Dim 变量名变量名 类型说明类型说明 说明：说明： 关键字关键字Dim 还可以是还可以是Static、Private、Public或或Global。 “变量名变量名”应遵循标识符的命名规则。应遵循标识符的命名规则。 “类型说明类型说明”可以使用可以使用“As 类型类型”形式也可以使用形式也可以使用类型说明符类型说明符， 若未指定类型则为变体型

20、。若未指定类型则为变体型。 例如：例如： Dim var As Integer Public sum_1 As Double Dim tomorrow As Date Dim total！ Dim average Dim x VisualBasic程序设计基础程序设计基础程序设计基础程序设计基础2021-6-252021-6-25 例如：例如： Private Sub Command1_Click()Private Sub Command1_Click() a$ = a$ = 你好！你好！ Label1.Caption = a Label1.Caption = a End Sub End Su

21、b 声明符号声明符号数据类型数据类型含义含义 %Integer整型整型 &Long长整型长整型 $String字符型字符型 !Single单精度浮点型单精度浮点型 #Double双精度浮点型双精度浮点型 Currency货币型货币型 VisualBasic程序设计基础程序设计基础程序设计基础程序设计基础2021-6-252021-6-25 变量变量 说明：说明： 当定义变量为字符串型时，可以通过当定义变量为字符串型时，可以通过“String*长度长度” 来定义定长字符串型变量。来定义定长字符串型变量。 例如：例如： Dim name1 As String Dim name2 As String

22、*6 可以用一个可以用一个Dim语句定义多个变量，但必须指定每个语句定义多个变量，但必须指定每个 变量的数据类型，否则为变体型。变量的数据类型，否则为变体型。 例如：例如： Dim var1 As Integer, var2 As Integer Dim var1, var2 As Integer VisualBasic程序设计基础程序设计基础程序设计基础程序设计基础2021-6-252021-6-25 变量变量 1变量的声明变量的声明 隐式声明隐式声明 例如：例如： Private Sub Command1_Click() Var = 50 Print Var End Sub 采用强制变量声

23、明：采用强制变量声明： 在模块的声明段中加入语句在模块的声明段中加入语句 “Option Explicit” 。 选择选择“工具工具|选项选项”命令，选择命令，选择“编辑器编辑器”选项卡，再选项卡，再 选择选择“要求变量声明要求变量声明”复选框。复选框。 VisualBasic程序设计基础程序设计基础程序设计基础程序设计基础2021-6-252021-6-25 变量变量 2自定义类型的变量自定义类型的变量 自定义类型的变量与基本数据类型的变量的定义格式自定义类型的变量与基本数据类型的变量的定义格式 完全一样。完全一样。 例如：在例如：在3.2.2节中自定义了一个数据类型节中自定义了一个数据类型

24、Student， 下面语句定义了一个下面语句定义了一个Student类型的变量类型的变量lining。 Dim lining As Student 由于自定义类型包括多个元素，所以引用自定义类型由于自定义类型包括多个元素，所以引用自定义类型 的变量时应指定引用了哪个元素。的变量时应指定引用了哪个元素。 格式：变量名格式：变量名. 元素名元素名 例如：例如： lining.No lining.Name lining.Sex Type Student No as Integer Name as String*10 Sex as String*2 End Type VisualBasic程序设计基础

25、程序设计基础程序设计基础程序设计基础2021-6-252021-6-25 变量变量 3枚举类型的变量枚举类型的变量 枚举类型的变量与基本数据类型的变量的定义格式完全一样。枚举类型的变量与基本数据类型的变量的定义格式完全一样。 例如：在例如：在3.2.3节中定义了一个枚举类型节中定义了一个枚举类型Workday，下面语句定义，下面语句定义 并引用了一个并引用了一个Workday类型的变量类型的变量mywork。 Dim mywork As Workday mywork = Tuesday Print mywork VisualBasic程序设计基础程序设计基础程序设计基础程序设计基础2021-6

26、-252021-6-25 运算符和表达式运算符和表达式 运算符运算符 是表示数据之间运算方式的符号。是表示数据之间运算方式的符号。 操作数操作数 是参与运算的数据。是参与运算的数据。 表达式表达式 是由运算符和操作数组成的式子。是由运算符和操作数组成的式子。 例如：算术表达式例如：算术表达式“1 + 2”中，中，1、2 是操作数，是操作数，“+”是运是运 算符。算符。 需要两个操作数的运算符，称为需要两个操作数的运算符，称为双目运算符双目运算符 。 只需要一个操作数的运算符，称为只需要一个操作数的运算符，称为单目运算符单目运算符。 例如：例如：“-”作为负号时只需要一个操作数，是单目运算符。作

27、为负号时只需要一个操作数，是单目运算符。 VisualBasic程序设计基础程序设计基础程序设计基础程序设计基础2021-6-252021-6-25 算术运算符与算术表达式算术运算符与算术表达式 1算术运算符算术运算符 运算符运算符 运算运算 表达式举例表达式举例 表达式含义表达式含义 运算结果令运算结果令 x=5,y=2 乘方乘方 x y x的的y次方次方 25 - 负号负号 - y 负负y -2 * 乘法乘法 x * y x,y的乘积的乘积 10 / 除法除法 x / y x除以除以y 2.5 整除整除 x y x整除整除y 2 Mod 取模（取余）取模（取余） x Mod y x除以除以

28、y的余数的余数 1 + 加法加法 x + y x,y的和的和 7 - 减法减法 x - y x,y的差的差 3 例如：例如： ? 13.8 5.6 ? 11.5 Mod 5.1 执行除法后，将结果的小数位全部去掉。执行除法后，将结果的小数位全部去掉。 当操作数中含有小数时，先分别四舍五入，后整当操作数中含有小数时，先分别四舍五入，后整 除运算。除运算。 求两个数相除的余数。求两个数相除的余数。 当操作数中含有小数时，先将其四舍五入后，再当操作数中含有小数时，先将其四舍五入后，再 取余运算。取余运算。 结果为：结果为：2 结果为：结果为：2 VisualBasic程序设计基础程序设计基础程序设计

29、基础程序设计基础2021-6-252021-6-25 算术运算符与算术表达式算术运算符与算术表达式 2.算术表达式算术表达式 在书写表达式时，应注意与数学中的表达式写法的区别：在书写表达式时，应注意与数学中的表达式写法的区别： VB表达式不能省略乘号运算符，表达式不能省略乘号运算符， 如：数学中的表达式如：数学中的表达式b2-4ac，写成，写成VB表达式应为表达式应为b2-4*a*c。 VB表达式中一律使用圆括号，且左右必须配对。表达式中一律使用圆括号，且左右必须配对。 如：数学中的如：数学中的 (x+y)/(a-b)+cx，VB表达式应为表达式应为(x+y)/(a-b)+c)*x。 一个表达

30、式的运算次序由运算符的优先级决定，优先级高的先运一个表达式的运算次序由运算符的优先级决定，优先级高的先运 算，优先级低的后运算，优先级相同的按从左到右的次序运算。算，优先级低的后运算，优先级相同的按从左到右的次序运算。 算术运算符的优先级从高到低为：算术运算符的优先级从高到低为： 乘方乘方负数负数（乘、除）（乘、除）整除整除取模取模（加、减）。（加、减）。 例如：例如： ?- 2 2 ?3 3 2 ?4 Mod 8 / 2 ?3 * 2 3 / 2 结果为：结果为：-4 -4 结果为：结果为：13 13 结果为：结果为：0 0 结果为：结果为：3 3 VisualBasic程序设计基础程序设计

31、基础程序设计基础程序设计基础2021-6-252021-6-25 字符串运算符与字符串表达式字符串运算符与字符串表达式 1字符串运算符字符串运算符 字符串运算符只有字符串运算符只有“&”和和“+”，它们的功能是把字符串，它们的功能是把字符串 连接起来。连接起来。 例如：例如： ?Visual + Basic ?“Visual” & “Basic” ?123 & 456 ?123 + 456 ?abcd + 123 ?abcd & 123 2字符串表达式字符串表达式 例如：例如：abc & 123 & Left(abc,1) & 可以将其他类型的操作数强制转换为字符可以将其他类型的操作数强制转换

32、为字符 串后再连接。串后再连接。 结果为：结果为：VisualBasic VisualBasic 结果为：结果为：VisualBasic VisualBasic 连接运算，结果为：连接运算，结果为：123456 123456 加法运算，结果为：加法运算，结果为：579 579 操作类型不匹配出错操作类型不匹配出错 结果为：结果为：abcd123 abcd123 结果为：结果为：abc123a abc123a VisualBasic程序设计基础程序设计基础程序设计基础程序设计基础2021-6-252021-6-25 关系运算符与关系表达式关系运算符与关系表达式 1关系运算符关系运算符 运算符运算

33、符 运算运算 表达式举例表达式举例 运算结果运算结果 = 等于等于 abc = abd False 大于大于 34 12 True = 大于（或）等于大于（或）等于 34 = 12 True 小于小于 ADF ABFFalse = 小于（或）等于小于（或）等于 abc = abc True 不等于不等于 abc ABCTrue 关系运算符的比较规则：关系运算符的比较规则： 两个操作数都是数值型时，比较它们的数值大小。两个操作数都是数值型时，比较它们的数值大小。 两个操作数都是字符串型时，从左到右逐个字符比较两个操作数都是字符串型时，从左到右逐个字符比较 ASCIIASCII码值，直到遇到不同字

34、符为止。对于两个汉字字码值，直到遇到不同字符为止。对于两个汉字字 符，比较它们的拼音。符，比较它们的拼音。 常见字符的比较关系如下：常见字符的比较关系如下： “ ” “0 0” “9 9” “A A” “Z Z” “a a” “z z” 2 + 3 ?“xyz” = “XYZ” 结果为：结果为：False 结果为：结果为：False VisualBasic程序设计基础程序设计基础程序设计基础程序设计基础2021-6-252021-6-25 逻辑运算符与逻辑表达式逻辑运算符与逻辑表达式 1. 逻辑运算符逻辑运算符 Not 取反运算，即将取反运算，即将True变为变为False或或False变为变

35、为True。 例如：例如：? Not abc abd And 与运算，只有两个操作数的值都为与运算，只有两个操作数的值都为True时，结果为时，结果为 True，否则结果为，否则结果为False。 例如：例如： ? True And 1 2 ? 2 + 2 = 4 And False ? 3 5 And a = A Or 或运算，只有两个操作数的值都为或运算，只有两个操作数的值都为False时，结果为时，结果为 False，否则结果为，否则结果为True。 例如：例如： ? abc ABC Or 2 1 ? True Or 6 - 3 4 ? 6 5 Xor 8 5 Eqv 8 5 结果为：结

36、果为： True Imp蕴含运算，当第一个操作数的值为蕴含运算，当第一个操作数的值为True，第二个，第二个 操作数的值为操作数的值为False时，结果为时，结果为False，否则结果为，否则结果为 True。 例如：例如：?5 3 结果为：结果为：False 2逻辑表达式逻辑表达式 逻辑运算符的优先级由高到低为：逻辑运算符的优先级由高到低为： NotAndOrXorEqvImp。 XYNot XX And YX Or YX Xor YX Eqv YX Imp Y TTFTTFTT TFFFTTFF FTTFTTFT FFTFFFTT VisualBasic程序设计基础程序设计基础程序设计基础

37、程序设计基础2021-6-252021-6-25 日期运算符与日期表达式日期运算符与日期表达式 1日期运算符日期运算符 日期运算符只有日期运算符只有“+”和和“-”，它们的功能是对日期进，它们的功能是对日期进 行运算。行运算。 2日期表达式日期表达式 日期表达式包括以下操作：日期表达式包括以下操作： 例如：例如：? #2002-02-01# + 1 例如：例如：?#01/01/2002# - 2 ?#2002-02-02# - 2 ?#2001-02-03# - #2001-02-02# 结果为：结果为：2002-2-2 结果为：结果为：2001-12-30 结果为：结果为：2002-1-31

38、 结果为：结果为：1 VisualBasic程序设计基础程序设计基础程序设计基础程序设计基础2021-6-252021-6-25 各种运算符的优先级比较各种运算符的优先级比较 优先级优先级 运算符运算符 1 2-(取负取负) 3* / 4 5Mod 6+ - 7字符串连接字符串连接&和和+ 8= = = 9Not 10And 11Or 12Xor 13Eqv 14Imp 例如，一个混合运算表达式的运算顺序如例如，一个混合运算表达式的运算顺序如 下所示：下所示： 结果为：结果为：True VisualBasic程序设计基础程序设计基础程序设计基础程序设计基础2021-6-252021-6-25

39、例：判别某年是否是闰年，闰年的条件符合下面二者之一：例：判别某年是否是闰年，闰年的条件符合下面二者之一： (1)(1)能被能被4 4整除，但不能被整除，但不能被100100整除。整除。 (2)(2)能被能被400400整除。整除。 要求：单击按钮要求：单击按钮Command1Command1计算出计算出20042004年是否是闰年，并在年是否是闰年，并在 窗体的标签窗体的标签Lable2Lable2中显示结果。中显示结果。 VisualBasic程序设计基础程序设计基础程序设计基础程序设计基础2021-6-252021-6-25 界面设计：窗体界面中放置了两个标签界面设计：窗体界面中放置了两个

40、标签Lable1Lable1和和Lable2Lable2， 以及一个按钮以及一个按钮Command1Command1。分别设置其。分别设置其CaptionCaption属性：属性： 属性属性Form1Lable1Lable2Command1 Caption判断闰年判断闰年2004年是否是闰年？年是否是闰年？空空判断判断 单击单击Command1Command1时判断时判断20042004年是否是闰年，程序代码如下：年是否是闰年，程序代码如下： Private Sub Command1_Click()Private Sub Command1_Click() 单击按钮计算闰年单击按钮计算闰年 Di

41、m x As IntegerDim x As Integer Dim y As Boolean Dim y As Boolean x = 2004 x = 2004 y = (x Mod 4) = 0) And (x Mod 100) 0) Or y = (x Mod 4) = 0) And (x Mod 100) 0) Or (x Mod 400) = 0)(x Mod 400) = 0) Label2.Caption = y Label2.Caption = y End Sub End Sub VisualBasic程序设计基础程序设计基础程序设计基础程序设计基础2021-6-252021

42、-6-25 常用标准函数常用标准函数 函数是系统已经定义好的运算。函数是系统已经定义好的运算。 函数的调用格式：函数的调用格式： (参数参数1,参数参数2) 说明：说明： 每个函数都有函数名，通过函数名调用函数。每个函数都有函数名，通过函数名调用函数。 数学中函数的数学中函数的“自变量自变量”在程序设计语言中称为在程序设计语言中称为“参数参数”， 函数的运算结果称为函数的运算结果称为“返回值返回值”。 函数是以表达式的形式调用的，而不能单独作为一个语句。函数是以表达式的形式调用的，而不能单独作为一个语句。 例如：例如： a = Sin(b) z = Sin(x) + Cos(x + y) Vi

43、sualBasic程序设计基础程序设计基础程序设计基础程序设计基础2021-6-252021-6-25 数学函数数学函数 函数名函数名功能说明功能说明举例举例 Fix(x)Fix(x) 取整，截去小数部取整，截去小数部 分分 Fix(3.125)Fix(3.125)结果为结果为3 3，Fix(2.98)Fix(2.98)结果为结果为2 2， Fix(-2.6)Fix(-2.6)结果为结果为-2 -2 Int(x)Int(x) 求不大于求不大于x x的最大整的最大整 数数 Int(1.9)Int(1.9)结果为结果为1 1，Int(1.3)Int(1.3)结果为结果为1 1，Int(-Int(-

44、 2.5)2.5)结果为结果为-3 -3 Round(x,n)Round(x,n) 将将x x四舍五入，保留四舍五入，保留 n n位小数位小数 Round(1.9)Round(1.9)结果为结果为2 2，Round(1.916,2)Round(1.916,2)结果为结果为 1.921.92 Abs(x) Abs(x) 求绝对值求绝对值Abs(-3.5)Abs(-3.5)结果为结果为3.5 3.5 Sgn(x) Sgn(x) 求数字符号求数字符号 Sgn(-3)Sgn(-3)结果为结果为-1-1，Sgn(3)Sgn(3)结果为结果为1, Sgn(0) 1, Sgn(0) 结结 果为果为0 0 S

45、qr(x)Sqr(x)求平方根求平方根Sqr(25)Sqr(25)结果为结果为5 5 Exp(x)Exp(x)指数函数，求指数函数，求e ex xExp(0)Exp(0)结果为结果为1 1 Log(x)Log(x)求自然对数求自然对数Log(1)Log(1)结果为结果为0 0 Sin(x)Sin(x)正弦函数正弦函数Sin(0)Sin(0)结果为结果为0 0 Cos(x)Cos(x)余弦函数余弦函数Cos(0)Cos(0)结果为结果为1 1 Tan(x)Tan(x)正切函数正切函数an(0)an(0)结果为结果为0 0 Atn(x)Atn(x)反正切函数反正切函数Atn(0)Atn(0)结果为

46、结果为0 0 VisualBasic程序设计基础程序设计基础程序设计基础程序设计基础2021-6-252021-6-25 字符串函数字符串函数 函数名函数名 函数名功能说明函数名功能说明 Trim(Trim(字符串表达式字符串表达式) ) 删除字符串两端空格字符删除字符串两端空格字符 LTrim(LTrim(字符串表达式字符串表达式) ) 删除字符串左端空格字符删除字符串左端空格字符 RTrim(RTrim(字符串表达式字符串表达式) ) 删除字符串右端空格字符删除字符串右端空格字符 Left(Left(字符串表达式字符串表达式,n) ,n) 从字符串的左端截取从字符串的左端截取n n个字符个

47、字符 Right(Right(字符串表达字符串表达 式式,n) ,n) 从字符串的右端截取从字符串的右端截取n n个字符个字符 Mid(Mid(字符串表达字符串表达 式式,n,m) ,n,m) 从字符串的第从字符串的第n n个字符开始截取个字符开始截取m m个字符个字符 Len(Len(字符串表达式字符串表达式) ) 或或Len(Len(变量名变量名) ) 求字符串的长度，或求某个变量所占的字节数求字符串的长度，或求某个变量所占的字节数 LenB(LenB(字符串表达式字符串表达式) ) 求字符串所占的字节数求字符串所占的字节数 String(n,String(n,字符字符) )或或 Stri

48、ng(n,ASCIIString(n,ASCII码码) ) 产生由产生由n n个指定字符（或指定个指定字符（或指定ASCIIASCII码值对应字符）组成的码值对应字符）组成的 字符串字符串 VisualBasic程序设计基础程序设计基础程序设计基础程序设计基础2021-6-252021-6-25 字符串函数字符串函数 函数名函数名 功能说明功能说明 Space(n) Space(n) 产生由产生由n n个空格组成的字符串个空格组成的字符串 InStr(InStr(起始位置起始位置,字字 符串符串1,1,字符串字符串2 ,n) 2 ,n) 返回返回“字符串字符串2 2”在在“字符串字符串1 1”

49、中第一次出现的位置；若中第一次出现的位置；若 加上起始位置，表示从该位置开始查找，如果省略默认加上起始位置，表示从该位置开始查找，如果省略默认 从第一个字符开始查找；从第一个字符开始查找；n n表示字符串的比较方式，表示字符串的比较方式，0 0表表 示区分字母的大小写，示区分字母的大小写，1 1表示不区分字母的大小写，如果表示不区分字母的大小写，如果 省略默认为省略默认为0 0。如果给出参数。如果给出参数n n，则参数起始位置也必须，则参数起始位置也必须 给出。给出。 Ucase(Ucase(字符串表达式字符串表达式) ) 将字符串中的所有字母字符均转换成大写，非字母字符将字符串中的所有字母字

50、符均转换成大写，非字母字符 不变不变 Lcase(Lcase(字符串表达式字符串表达式) ) 将字符串中的所有字母字符均转换成小写，非字母字符将字符串中的所有字母字符均转换成小写，非字母字符 不变不变 Asc(Asc(字符串表达式字符串表达式) ) 求字符串表达式中第一个字符的求字符串表达式中第一个字符的ASCIIASCII码值码值 Chr(Chr(表达式表达式) ) 求以表达式的值为求以表达式的值为ASCIIASCII码的字符码的字符 Val(Val(字符串字符串) ) 将字符串转换为数值，转换时遇到第一个非数字字符则将字符串转换为数值，转换时遇到第一个非数字字符则 停止转换，但指数符号、小

51、数点和负号除外。停止转换，但指数符号、小数点和负号除外。 Str(Str(数值表达式数值表达式) ) 将数值转换为对应的字符串将数值转换为对应的字符串 VisualBasic程序设计基础程序设计基础程序设计基础程序设计基础2021-6-252021-6-25 字符串函数字符串函数补充补充 函数名函数名 功能说明功能说明 Split(c,d) Split(c,d) 将字符串分隔成字符数组将字符串分隔成字符数组 StrReverse(c) StrReverse(c) 将字符串反序将字符串反序 VisualBasic程序设计基础程序设计基础程序设计基础程序设计基础2021-6-252021-6-25

52、 转换函数转换函数 函数名函数名 功能说明功能说明 CInt(CInt(数值表达式数值表达式) ) 将数值强制转换为 将数值强制转换为IntegerInteger类型，第类型，第1 1位小数进行四舍位小数进行四舍 五入五入 CCur(CCur(数值表达式数值表达式) ) 将数值强制转换为 将数值强制转换为CurrencyCurrency类型，第类型，第5 5位小数进行四位小数进行四 舍五入舍五入 CDbl(CDbl(数值表达式数值表达式) ) 将数值强制转换为将数值强制转换为DoubleDouble类型类型 CLng(CLng(数值表达式数值表达式) ) 将数值强制转换为 将数值强制转换为Lo

53、ngLong类型，第类型，第1 1位小数进行四舍五位小数进行四舍五 入入 CSng(CSng(数值表达式数值表达式) ) 将数值强制转换为将数值强制转换为SingleSingle类型类型 CVar(CVar(数值表达式数值表达式) ) 将数值强制转换为将数值强制转换为VariantVariant类型类型 CStr(CStr(表达式表达式) ) 将表达式的值强制转换为将表达式的值强制转换为StringString类型类型 CDate(CDate(表达式表达式) ) 将表达式的值强制转换为将表达式的值强制转换为DateDate类型类型 CBool(CBool(表达式表达式) ) 表达式的值强制转换

54、为表达式的值强制转换为BooleanBoolean类型类型 CByte(CByte(表达式表达式) ) 将表达式的值强制转换为将表达式的值强制转换为ByteByte类型类型 VisualBasic程序设计基础程序设计基础程序设计基础程序设计基础2021-6-252021-6-25 时间函数时间函数 函数名函数名 功能说明功能说明 NowNow或或Now() Now() 返回系统当前的日期和时间返回系统当前的日期和时间 格式为：格式为：yyyy-mm-dd hh:mm:ss yyyy-mm-dd hh:mm:ss DateDate或或Date() Date() 返回系统当前的日期，格式为返回系统

55、当前的日期，格式为yyyy-mm-dd yyyy-mm-dd DateSerial(DateSerial(年年, ,月月, ,日日) ) 把年、月、日三个参数连接形成一个日期把年、月、日三个参数连接形成一个日期 DateValue(DateValue(日期字符串日期字符串) ) 返回一个日期返回一个日期 Day(Day(日期字符串日期字符串) ) 返回日期字符串中的日，结果为整型数返回日期字符串中的日，结果为整型数 WeekDay(WeekDay(日期字符串日期字符串) ) 求指定日期是星期几，结果为整型数，求指定日期是星期几，结果为整型数，1 1代表星期日，代表星期日，2 2代表星期一代表星期一 WeekDayName(WeekDayName(整数整数) ) 返回星期代号，例如返回星期代号，例如WeekDayName(1)WeekDayName(1)结果为：星期日结果为：星期日 Month(Month(日期字符串日期字符串) ) 返回日期字符串中的月份，结果为整型数返回日期字符串中的月份，结果为整型数 Year(Year(日期字符串日期字符串) ) 返回日期字符串中的年份，结果为整型数返回日期字符串中的年份，结果为整型数 Hour(Hour(时间字符串时间字符串) ) 返回