《VB程序设计语言基础课件》由会员分享，可在线阅读，更多相关《VB程序设计语言基础课件（43页珍藏版）》请在金锄头文库上搜索。
1、序,VB程序设计基础,学习程序设计的基本方法： 多练 模仿,第 3 章,1,1,程序中的大部分实际工作是采用程序代码来处理的 任何一个程序设计语言都有一套严格的编程规定 本章主要内容 数据类型 常量与变量 表达式 常用内部函数 程序代码编写规则,第3章 Visual Basic 程序设计基础,1,2,1,3,3.1 数据类型,数据是程序处理的对象。为了更好地处理各种各样的数据，VB定义了多种数据类型。 数值型 数据类型 字符型(String) 逻辑型(Boolean) 日期型(Date,Time) 对象型(Object) 变体型(Variant),整数：整型(Integer) /长整型(Lon
2、g) 字节型(Byte) 浮点型：单(Single)/双精度(Double) 货币型(Currency),3.1.1 数值型数据（Numeric) 整型(Integer)和长整型(Long)不带小数的数，表示正整数、负整数和零。整型数（%）: 在计算机中占两个字节。数值范围是215-1即-3276832767， 超过这个数值范围，会“溢出”程序错误。 例如 56，-675=-675%， 长整型数( 两种形式的常量：直接常量和符号常量。 1. 直接常量 在程序代码中直接给出的数据。 直接常量有： 字符串常量，数值型常量，布尔型常量和日期型常量。 例如：123，-263， “Visual Basi
3、c” ， “12.57 ”，“ ”， #2002-7-29 12:30:00 pm#， 数值型常数大多数都是十进制的(基数为10)，但有时我们也会用十六进制数(基数为16)或者八制数(基数为8)。 各种数值常数表示和实例如下： 十进制数：例如，123，-456，0 ； 八进制数：用前缀 逻辑或 (OR) 要使一个事件发生，只要具备一个以上条件（包括一个条件），这个事件就会发生。 使用正逻辑：AB=1逻辑非（NOT）一个事件产生的结果是它的反。逻辑异或（Xor） 当两个事件的值互为相反时，结果为真。 逻辑等（Eqv) 当两个事件的逻辑值相同时，结果为真。 逻辑蕴含(Imp) 当第一个的值为真，第
4、二个的值为假时，结果为假。否则结果都为真。,3.4 表达式,3.4 表达式,1,21,2. 例如 32 And Not 4a AND x=a OR x=b (开区间用或运算）；,3.4 表达式,x,a b,x,a b,x,1,22,日期表达式是用运算符(+或-)将算术表达式、日期型常量、日 期型变量和函数连接起来的式子。 有以下3种运算方式：(1)两个日期型数据相减，其结果是一个数值型数据(相差的 天数)。 例如：#8/8/2001# - #6/3/2001# 的结果为：66 (2)日期型数据加上天数，其结果为一个日期型数据。 例如：#12/1/2000#+31 的结果为：#01/01/200
5、1# (3)日期型数据减去天数，其结果为一个日期型数据。 例如：#12/1/2000#-32 的结果为：#10/30/2000# (4) 详见P40 表3-9 常用日期和时间函数,3.5 日期表达式,1,23,3.6.3 日期和时间函数,1,24,在VB中，有两类函数：标准函数和用户自定义函数。 标准函数是VB系统事先定义好的： 有数学函数、转换函数，字符串函数，日期函数等。 3.5.1 数学函数：详见P39页表 3-7 常用数学函数。必须熟记。,3.6.1 常用数学运算函数,1,25,例如 给定一个两位正整数(如36)，交换个位数和十位数的位置，把处理后的数显示在窗体上。编写的窗体单击事件过
6、程代码如下： Private Sub Form_Click() Dim x As Integer, a As Integer Dim b As Integer, c As Integer x = 36 a = Int(x / 10) 求十位数 b = x Mod 10 求个位数 c = b * 10 + a 生成新的数 Print 处理后的数: ; c End Sub 运行程序后单击窗体，输出结果是： 处理后的数：63,1,26,把上述程序改为以下形式，效果是否一样？,Private Sub Form_Click() Dim x As Integer, a As Integer Dim b A
7、s Integer, c As Integer x = 36 a = x 10 求十位数 b = x 10 * a 求个位数 c = b * 10 + a Print 处理后的数: ; c End Sub,想一想,通常，解决某个问题的程序方法有多种，我们应该从中选择较优的一种方法。,1,27,编写的窗体单击事件过程代码如下： Private Sub Form_Click() Dim a As Integer, b As Integer, c As Integer Randomize 初始化随机数生成器 a = Int(90 * Rnd + 10) 产生10,99区间内的随机整数 b = Int
8、(90 * Rnd + 10) c = a + b 求两数之和 Print 产生的两个随机数: ; a, b Print 和数: ; c End Sub 运行程序后单击窗体，输出结果是： 产生的两个随机数：56 71 和数：127,例如 通过随机函数产生2个两位正整数，求这2个数 之和并显示出来,再次运行程序，单击窗体后输出另一组结果是： 产生的两个随机数：18 37 和数：55,1,28,例如：将下列数学表达式转换成VB表达式：,3.6.1 常用数学运算函数,1,29,先从字符串a中找出某个指定字符(本例为空格)，再以此字符为 界拆分成两个字符串。编写的窗体单击过程代码如下： Private
9、 Sub Form_Click() Dim a As String, b As String, c As String, n As Integer a = VisualFoxPro 表示空格 n = InStr(a, ) 查找空格位置 b = Left(a, n - 1) 取左边部分 c = Mid(a, n + 1) 取右边部分 Print b 显示左边部分 Print c 显示右边部分 End Sub 程序运行后单击窗体，输出结果是：VisualFoxPro,例如 使用字符串函数示例,1,30,Private Sub Form_Click() Dim a As String, b As S
10、tring, c As String, n As Integer a = VisualFoxPro 表示空格 n = InStr(a, ) 查找空格位置 b = Left(a, n - 1) 取左边部分 c = Right( _, _ ) 取右边部分 Print b 显示左边部分 Print c 显示右边部分 End Sub 程序运行后单击窗体，输出结果是： Visual FoxPro,若用 Right函数来代替 Mid函数, 应如何改动？,答案：a, Len(a)-n,想一想,1,31,(1)数据类型转换函数 在实际的应用程序设计中，有时要进行各种数据的类型的强制转换，就要用到类型转 换函数
11、，将一个表达式转换成某种指定的数据类型。见书P43页表3-13,3.6.4 转换函数,1,32,3.7 VB语法规则,3.7.1 程序代码编写规则 VB中的程序语句是执行具体操作的指令。 由VB定义符（关键字）、属性、表达式以及VB可识别符号的组合而成。 例如 下列两个语句：(1) Print a 2 * b 语句定义符 表达式(2) Text1.Text “VB程序设计” 对象名 属性名 赋值号 表达式 (3) 有些简单的语句只有一个语句定义符。 示例： End Print,1,33,3.7.2 语句形式和语法 建立程序语句时必须遵守的构建规则称为语法。 本书的VB命令一些约定： 统一约定符
12、号如下： 方括号，可选项 多项中选一项 竖线用来分隔多个选择 , 表示同类项目的重复出现。 3.7.3 VB程序的书写规则 在编写程序代码时，要遵守一定的规则。 (1) 一行可以写多条语句，用冒号分隔。 Sum=Sum+x : Count=Count+1 (2) 一条语句写成多行 使用续行符(一个空格后面跟随一个下划线“_”)，将长语句分成多行。例如：Print Text1.Text & Text2.Text & Text4.Text &_ & Left(Text3.Text，3) (3)不区分大小写字母 VB不区分应用程序代码字母的大小写 。,3.7 VB语法规则,1,34,(4) 各关键字
13、之间，关键字和变量名、常量名、过程名之间一定要有空格分隔。 示例 Private Sub Form_Click() (5)对于程序中出现的嵌套，使用向右缩格的方式书写程序代码。可以反映代码的逻辑结构和嵌套关系。 例如 Private Sub Form_Click() x=4 If x=1 End If End Sub (6)严格按照VB规定的格式和符号编写程序。 与其他高级语言一样，在VB中使用的分号、引号、括号等符号都是英文状态下的半角符号，而不能使用中文状态下的全角符号。 许多程序错误都是由此而起!,3.7 VB语法规则,1,35,3.7.4 VB支持结构化的程序设计方法 其程序结构清晰，
14、可读性好，也易于查错和修改。 结构化程序设计方法五种结构：， 顺序结构、选择结构、循环结构、模块结构、递归结构 其中顺序结构、选择结构、循环结构称三种基本结构： 具有一个入口，一个出口的特点。,3.8结构化程序的基本结构,1,36,现在我们开始学习顺序结构程序设计的一些语句 3.9.1 赋值语句 格式：Let变量名=表达式 功能：先计算赋值号右边的表达式值，并把结果（值）赋值给左边的一个变量。 例如 Let Textl.Text=”你好!” 用Let语句给文本框Text1的Text属性赋值 Let label1.caption=“变量X的值是:“ 例如 给MyStr变量赋值 Dim MyStr
15、 As String 定义变量MyStr为字符型变量 MyStr=”Hello World“ 将字符串赋给变量MyStr 说明: (1)“=”是赋值号,它是给变量或某个对象属性赋值的符号。 与关系运算符“=”(等于)不同； 没有数学上“相等”的含义，以后我们经常会用到表达式： n=n+1, 实际的功能是n+1n, s=s+n相当于 s(原值)+n s(新值) (2)只有当值是与变量兼容的数据类型时，该值才可以赋给变量或属性，否则会强制将该值转换成变量的数据类型。 例如 Private Sub Form_Click() Show Dim a as integer: a = 56.7878: Print a End Sub,3.9
