VB第四章理论课件
合集下载
vb课件第四章

2011-2-28
第4章 选择控件与分支程序设计 章
组合框是具有文本框控件与列表框控件特性的控件。组合框 系统的隐含名称为Combo1、Combo2等章
组合框属性 (1)Style属性 属性 当Style设置为0时(默认样式),是下拉式组合框。单击右侧的 箭头时打开选项列表,可从打开的列表中选择列表项目,选择 的列表项目将显示在文本框中。也可直接在文本框中输入文本, 在DropDown等事件过程中把文本框内容增加到组合框中。 当Style设置为1时,是简单组合框。这时文本框右侧无箭头按钮, 它看起来象一个文本框和一个标准列表框的结合,列表项始终 显示在列表框中。可以从列表中选择项,也可以直接在文本框 中输入文本。 当Style设置为2时,是下拉式列表框,它与下拉式组合框相似。 单击右侧的箭头时打开选项列表,可从打开的列表中选择列表 项目,选择的列表项目将显示在文本框中;通过输入可以快速 选择文本。与下拉式组合框不同的是:它不能在文本框中输入 新的内容。
2011-2-28
第4章 选择控件与分支程序设计 章
(2)Text属性 属性 返回列表框被选择的列表项目,是字符串类型。在Style为0 或1时可以键入文本。 组合框的(名称)属性系统隐含为Combo1,Combo2等。 在列表框中的属性同样适于组合框。
2011-2-28
第4章 选择控件与分支程序设计 章
Select Case 测试表达式 Case 表达式列表 表达式列表1 语句序列1 语句序列 Case 表达式列表 表达式列表2 语句序列2 语句序列 ········· Case 表达式列表 表达式列表n 语句序列n 语句序列 [Case Else 语句序列n+1] 语句序列 End Select
2011-2-28
VB第四章1PPT课件

下面以5个数为例说明冒泡法排序的步骤:
86
64
684
465
485
561
581
16
18
8
4
41
51
Байду номын сангаас14
15
5
6
6
8
8
第一轮
第二轮
第三轮
第四轮
本节结束
感谢聆听本课程,课件可任意 编辑,请下载后调整使用
Thank you for listening to my class and have a good life
1.数组的类型 用户可以声明任意类型(数据的基本类型)的数组。
2.数组的维数 一维数组:s(1)、s(2) ···一维数组中的下标又称为(Index)。 二维数组:s(1,1)、 s(1,2) 、s(1,3)、 s (i, j) 例如学生的成绩单 三维数组: s(1,1,1)、 s(1,1,2) 多维数组
1.数组元素的输入 数组元素可以通过赋值语句输入,或在运行时通过inputbox函 数输入,在元素较多情况下一般用for循环语句。 例1:利用数组a()存放姓名
例2:随机产生10个两位数,放入数组。
例3:设有一个5×5的方阵,其中元素是由计算机随机生成 的小于100的整数
2.数组元素的输出 数组元素可以在窗体或图片框中使用print方法输出,也可
第四章 数组
一、数组的概念
数组是一组用一个统一的名称表示的、顺序排列的变量。 数组中的变量称为数组元素,用数字(下标)来标识它们,因 此数组元素又称为下标变量。
例如:把我们班的学生的学号用一个数组来表示 s(47)
说明: ① 数组的命名 ② 下标必须用括号括起来 ③ 下标可以是常数、变量或表达式,但必须是整数。 ④ 下标的最大值和最小值分别成为数组的上界和下界。
86
64
684
465
485
561
581
16
18
8
4
41
51
Байду номын сангаас14
15
5
6
6
8
8
第一轮
第二轮
第三轮
第四轮
本节结束
感谢聆听本课程,课件可任意 编辑,请下载后调整使用
Thank you for listening to my class and have a good life
1.数组的类型 用户可以声明任意类型(数据的基本类型)的数组。
2.数组的维数 一维数组:s(1)、s(2) ···一维数组中的下标又称为(Index)。 二维数组:s(1,1)、 s(1,2) 、s(1,3)、 s (i, j) 例如学生的成绩单 三维数组: s(1,1,1)、 s(1,1,2) 多维数组
1.数组元素的输入 数组元素可以通过赋值语句输入,或在运行时通过inputbox函 数输入,在元素较多情况下一般用for循环语句。 例1:利用数组a()存放姓名
例2:随机产生10个两位数,放入数组。
例3:设有一个5×5的方阵,其中元素是由计算机随机生成 的小于100的整数
2.数组元素的输出 数组元素可以在窗体或图片框中使用print方法输出,也可
第四章 数组
一、数组的概念
数组是一组用一个统一的名称表示的、顺序排列的变量。 数组中的变量称为数组元素,用数字(下标)来标识它们,因 此数组元素又称为下标变量。
例如:把我们班的学生的学号用一个数组来表示 s(47)
说明: ① 数组的命名 ② 下标必须用括号括起来 ③ 下标可以是常数、变量或表达式,但必须是整数。 ④ 下标的最大值和最小值分别成为数组的上界和下界。
VB第4章电子讲稿 (选择结构)

表达式表通常是一个具体值(如Case 1),每一个 值确定一个分支。还有三种方法可以确定设定值:
(1)一组值(用逗号隔开)。示例: Case 1,3,5 ′表示条件在1,3,5范围内取值 (2)表达式1 TO 表达式2。示例: Case 60 To 80 ′表示条件取值范围为60~80 (3)Is关系式。示例: Case Is<5
Private Sub Command1_Click() Dim score As Integer, temp As String score = Val(Text1.Text) temp = "成绩等级为:" If score < 0 Then Label2.Caption = "成绩出错" ElseIf score < 60 Then Label2.Caption = temp + "不及格" ElseIf score <= 79 Then Label2.Caption = temp + "及格" ElseIf score <= 100 Then Label2.Caption = temp + "优良" Else Label2.Caption = "成绩出错" End If End Sub
Dim h As Integer Show '使print输出在窗体上的内容可见 h = Hour(Time) '取系统的时间 FontSize = 30 : ForeColor = RGB(255, 0, 0) BackColor = RGB(255, 255, 0) If h < 12 Then Print "早上好!" Else If h < 18 Then Print "下午好!" Else Print "晚上好!" End If End If
课件:VB第4章

通用过程
2021/6/23
类模块:本书不涉及
17
1. 局部变量(Dim, Static定义) 在过程内定义的变量,作用域为所在过 程(子程序)
2021/6/23
18
2. 模块变量(Dim, Private定义) 作用域为该窗体或该标准模块 3. 全局变量(Public, Global定义) 作用域为该工程中的所有模块
Const PI# = 3.1415926535 Const PI As Double = 3.1415926535 Private: 私有的,表明该常量只在本过程或窗体中使用。 Public: 公共的,表明该常量可在多个模块中公用,必须在标
准模块中定义。
2021/6/23
13
3. 系统常量
VB中预定 义的,一 般以vb字 母开头, 可在对象 浏览器中 查看。
2021/6/23
14
4.2.2 变量
1. 命名规则
同C语言,不同点:
• 最后一个字符可以是类型说明符
• 不区分大小写
Var1$,Var2%,Var3!
var1 = “abc”, var2 = 5, var3 = 3.25
2. 变量的类型和定义
• 用类型说明符: Var2%
• Dim: Dim 变量名 As 类型,Dim Var2 As
Integer
• Static: Static Var2 As Integer
• Public: Public Var3 As Single
2021/6/23
15
2021/6/23
16
4.3变量的作用域
4.3.1局部变量与全局变量
VB应用程序
窗体模块 标准模块
2021/6/23
类模块:本书不涉及
17
1. 局部变量(Dim, Static定义) 在过程内定义的变量,作用域为所在过 程(子程序)
2021/6/23
18
2. 模块变量(Dim, Private定义) 作用域为该窗体或该标准模块 3. 全局变量(Public, Global定义) 作用域为该工程中的所有模块
Const PI# = 3.1415926535 Const PI As Double = 3.1415926535 Private: 私有的,表明该常量只在本过程或窗体中使用。 Public: 公共的,表明该常量可在多个模块中公用,必须在标
准模块中定义。
2021/6/23
13
3. 系统常量
VB中预定 义的,一 般以vb字 母开头, 可在对象 浏览器中 查看。
2021/6/23
14
4.2.2 变量
1. 命名规则
同C语言,不同点:
• 最后一个字符可以是类型说明符
• 不区分大小写
Var1$,Var2%,Var3!
var1 = “abc”, var2 = 5, var3 = 3.25
2. 变量的类型和定义
• 用类型说明符: Var2%
• Dim: Dim 变量名 As 类型,Dim Var2 As
Integer
• Static: Static Var2 As Integer
• Public: Public Var3 As Single
2021/6/23
15
2021/6/23
16
4.3变量的作用域
4.3.1局部变量与全局变量
VB应用程序
窗体模块 标准模块
VB第四章

编程思路:
求最大公约数可以使用“辗转相除法”,其步骤是: 1 以大数m作为被除数,小数n作为除数,相除后余数为r。 2 若r不为零,则 继续相除得到新的r。若r仍不为零,则 重复此过程,直到r=0。 3 最后的n就是最大公约数。 4 最小公倍数=
第4章 过程与变量的作用范围
编程步骤: (1)新建一工程,在窗体上添加两个命令按钮并设置有 关对象属性如(p160)图4-11(左)所示。
编写命令按钮单击事件过程如下: Private Sub Command1_Click() Dim a As Long, b As Long Dim c As Long, d As Long a = Val(Text1.Text) b = Val(Text2.Text) c = Hef(a, b) ‘调用函数过程求最大公约数 Text3.Text = Str(c) d = a * b / c ‘计算最小公倍数 Text4.Text = Str(d) End Sub
第4章 过程与变量的作用范围
2 标准模块(.bas)
简单的应用程序一般最少有一个窗体,这时所有 的程序过程代码都存放在该窗体模块中。实际的应用 程序常常有多个窗体模块。在多窗体模块的应用程序 中,有些变量或过程需要在多个不同的窗体中使用, 为了避免在不同的窗体模块中重复书写相同的代码, 可以创建标准模块。标准模块可分为:
(2)直接使用过程名: <过程名> [ <实参表>]
第4章 过程与变量的作用范围
2 函数过程(Function过程)的创建与调用
Visual Basic函数分为内部函数和外部函数,外部函数是用 户根据需要用Function关键字定义的函数过程,与子过程不 同的是函数过程将返回一个值 。 函数过程的创建 与通用过程一样,函数过程也是一个独立的过程,可以读 取参数、执行一系列语句并改变其参数值。与通用过程不同 的是,函数过程通过其函数名返回一个值到调用的过程。通 用过程不能通过过程名返回值,而只能通过参数返回值。函 数过程的语法格式是:
vb 课件 第四章

Visual Basic程序设计
第四章 基本的控制结构
4.1 顺序结构 4.2 选择结构 4.3 循环结构 4.4 其他辅助控制语句 4.5 综合应用 4.6 程序调试 4.7 常见错误
2011年10月9日星期日
商丘师范学院计算机科学系
Visual Basic程序设计
4.1 顺序结构
顺序结构就是各语句按出现的先后次序 执行。 一般的程序设计语言中, 执行 。 一般的程序设计语言中 , 顺序结构的 语句主要是赋值语句、输入/输出语句等 输出语句等。 语句主要是赋值语句、 输入 输出语句等 。在 VB中也有赋值语句;而输入 输出可以通过文 中也有赋值语句; 中也有赋值语句 而输入/输出可以通过文 本 框 控 件 、 标 签 控 件 、 InputBox 函 数 、 MsgBox函数或过程及 函数或过程及Print方法等来实现。 方法等来实现。 函数或过程及 方法等来实现
①
当表达式值的精度与变量的精度不一致时, 当表达式值的精度与变量的精度不一致时,强制转换成左边 的精度, 中的结果为3 的精度,如m% = 10/3 ,则m中的结果为 中的结果为 当表达式是数字字符串,左边变量是数值类型, 当表达式是数字字符串,左边变量是数值类型,自动转换为 数值类型再赋值,但表达式有非数字字符时,则出错。 数值类型再赋值,但表达式有非数字字符时,则出错。 例如: 例如: n%=“123” n%=“12a3”
④ ⑤
⑥
⑦
2011年10月9日星期日
商丘师范学院计算机科学系
Visual Basic程序设计
4.1.2 数据的输入与输出
1.标签和文本框控件 1.标签和文本框控件 标签可以输出信息,文本框即可输入也可输出信息。 标签可以输出信息,文本框即可输入也可输出信息。 输入对话框InputBox函数 2. 输入对话框 函数 InputBox[$](Prompt, [Tiltle], [Default], [Xpos], [Ypos]) 其中: 其中: 1) Prompt: 字符串,长度不超过 字符串,长度不超过1024个字符,用来提示用户输入。 个字符, 个字符 用来提示用户输入。 文本可自动换行。如想强制插入回车换行则用: 文本可自动换行。如想强制插入回车换行则用: Chr$(13)+Chr$(10)或常数 或常数vbCrLf。 或常数 。 2) Title:字符串,对话框标题,显示在对话框顶部的标题区。 :字符串,对话框标题,显示在对话框顶部的标题区。 3) Default: 字符串,用来显示输入缓冲区的默认信息。 字符串,用来显示输入缓冲区的默认信息。 4) Xpos,Ypos:是两个整数值,确定对话框在屏幕上的位置;如 , :是两个整数值,确定对话框在屏幕上的位置; 果省略,则对话框显示在屏幕中心线向下约1/3处 果省略,则对话框显示在屏幕中心线向下约 处。
第四章 基本的控制结构
4.1 顺序结构 4.2 选择结构 4.3 循环结构 4.4 其他辅助控制语句 4.5 综合应用 4.6 程序调试 4.7 常见错误
2011年10月9日星期日
商丘师范学院计算机科学系
Visual Basic程序设计
4.1 顺序结构
顺序结构就是各语句按出现的先后次序 执行。 一般的程序设计语言中, 执行 。 一般的程序设计语言中 , 顺序结构的 语句主要是赋值语句、输入/输出语句等 输出语句等。 语句主要是赋值语句、 输入 输出语句等 。在 VB中也有赋值语句;而输入 输出可以通过文 中也有赋值语句; 中也有赋值语句 而输入/输出可以通过文 本 框 控 件 、 标 签 控 件 、 InputBox 函 数 、 MsgBox函数或过程及 函数或过程及Print方法等来实现。 方法等来实现。 函数或过程及 方法等来实现
①
当表达式值的精度与变量的精度不一致时, 当表达式值的精度与变量的精度不一致时,强制转换成左边 的精度, 中的结果为3 的精度,如m% = 10/3 ,则m中的结果为 中的结果为 当表达式是数字字符串,左边变量是数值类型, 当表达式是数字字符串,左边变量是数值类型,自动转换为 数值类型再赋值,但表达式有非数字字符时,则出错。 数值类型再赋值,但表达式有非数字字符时,则出错。 例如: 例如: n%=“123” n%=“12a3”
④ ⑤
⑥
⑦
2011年10月9日星期日
商丘师范学院计算机科学系
Visual Basic程序设计
4.1.2 数据的输入与输出
1.标签和文本框控件 1.标签和文本框控件 标签可以输出信息,文本框即可输入也可输出信息。 标签可以输出信息,文本框即可输入也可输出信息。 输入对话框InputBox函数 2. 输入对话框 函数 InputBox[$](Prompt, [Tiltle], [Default], [Xpos], [Ypos]) 其中: 其中: 1) Prompt: 字符串,长度不超过 字符串,长度不超过1024个字符,用来提示用户输入。 个字符, 个字符 用来提示用户输入。 文本可自动换行。如想强制插入回车换行则用: 文本可自动换行。如想强制插入回车换行则用: Chr$(13)+Chr$(10)或常数 或常数vbCrLf。 或常数 。 2) Title:字符串,对话框标题,显示在对话框顶部的标题区。 :字符串,对话框标题,显示在对话框顶部的标题区。 3) Default: 字符串,用来显示输入缓冲区的默认信息。 字符串,用来显示输入缓冲区的默认信息。 4) Xpos,Ypos:是两个整数值,确定对话框在屏幕上的位置;如 , :是两个整数值,确定对话框在屏幕上的位置; 果省略,则对话框显示在屏幕中心线向下约1/3处 果省略,则对话框显示在屏幕中心线向下约 处。
VB课件(新)第四章数组

…, {表达式n1,表达式n2, … ,表达式nm} }
语法说明: 1、不能在显式赋初值时,定义数组每个维度的大小 2、数据类型1 与 数据类型2 必须兼容 3、表达式: 可以是常量、变量 4、数组的大小由初值的个数决定
数组的初始化
2、显式初始化: 即声明数组的同时,为数组元素赋初值
一维数组声明并初始化语法格式: Dim 数组名 ( ) As 数据类型 = New 数据类型 (数组大小 ) { [表达式1, 表达式2,…, 表达式n ] } 二维数组声明并初始化语法格式: Dim 数组名 ( , ) As 数据类型 = New 数据类型 ( , ) {
定长数组的声明举例
Dim A(9) AS Integer Dim B(0 to 9) as single Dim c% (0 to 3) Dim d(100), f% (0, 30) Dim g (0 to 4, 0 to 5), h(11) as double
数组的初始化
1、隐式初始化:
数值型:0 字符型:空串("”) 日期型:01/01/0001 00:00:00 对象型:Nothing
mark(0, 4) mark(1, 4) mark(2, 4) mark(3, 4) mark(4, 4)
mark(0, 5) mark(1, 5) mark(2, 5) mark(3, 5) mark(4, 5)
声明了一个整型的二维数组 mark;共占据5×6个整型变量 的内存空间 。二维数组内存分配以行为单位连续分配
Char1 = UCase(Chr(Int(Rnd() * 128))) If Char1 = "A" Then a += 1 If Char1 = "B" Then b += 1 If Char1 = "C" Then b += 1 …… If Char1 = "Y" Then y += 1 If Char1 = "Z" Then z += 1 Next MsgBox("各个字母(不区分大小写)的出现频率:A 是" & a & ",B是" & b & ",C是" & c & ",”……”)
语法说明: 1、不能在显式赋初值时,定义数组每个维度的大小 2、数据类型1 与 数据类型2 必须兼容 3、表达式: 可以是常量、变量 4、数组的大小由初值的个数决定
数组的初始化
2、显式初始化: 即声明数组的同时,为数组元素赋初值
一维数组声明并初始化语法格式: Dim 数组名 ( ) As 数据类型 = New 数据类型 (数组大小 ) { [表达式1, 表达式2,…, 表达式n ] } 二维数组声明并初始化语法格式: Dim 数组名 ( , ) As 数据类型 = New 数据类型 ( , ) {
定长数组的声明举例
Dim A(9) AS Integer Dim B(0 to 9) as single Dim c% (0 to 3) Dim d(100), f% (0, 30) Dim g (0 to 4, 0 to 5), h(11) as double
数组的初始化
1、隐式初始化:
数值型:0 字符型:空串("”) 日期型:01/01/0001 00:00:00 对象型:Nothing
mark(0, 4) mark(1, 4) mark(2, 4) mark(3, 4) mark(4, 4)
mark(0, 5) mark(1, 5) mark(2, 5) mark(3, 5) mark(4, 5)
声明了一个整型的二维数组 mark;共占据5×6个整型变量 的内存空间 。二维数组内存分配以行为单位连续分配
Char1 = UCase(Chr(Int(Rnd() * 128))) If Char1 = "A" Then a += 1 If Char1 = "B" Then b += 1 If Char1 = "C" Then b += 1 …… If Char1 = "Y" Then y += 1 If Char1 = "Z" Then z += 1 Next MsgBox("各个字母(不区分大小写)的出现频率:A 是" & a & ",B是" & b & ",C是" & c & ",”……”)
VB第4章 语言基础PPT课件

4.2 代码编写机制
一、原则: 要求规范、结构清晰; 培养良好的编程习惯;
二、语句格式: <语句定义符> [语句体]
例如: print “ok!”
三、书写规范
1、续行标记与语句之间分隔符: 例1,一个语句分写在多行上:
Dim name As string, _ stu_number,computer,english _
通用过程:
不同层次的对象有相同的操作,可 以共享某段程序代码,将此代码段作 为通用过程。
通用过程是由事件过程或其它通用 过程调用而执行的。
通用过程被所有窗体共享。
二、什么是模块
模块=各种过程+各种对象属性+其他 1、三种类型模块:
窗体模块(.frm) 标准模块(.bas) 类模块 (.cls)
2、窗体模块
每个窗体都有一个相对应的窗体 模块。窗体模块包含: 用于处理发生在窗体中的各个对象的 事件过程; 包含窗体及窗体中各个控件对象的属 性设置以及相关的说明。
3、标准模块
被多个窗体共享的代码,应当被组织到所 谓的“标准模块”之中。文件的扩展名 是.BAS。
标准模块中保存的过程都是通用过程;还 包含有相关的说明。
-922,337,203,685,447.5808 ~
922,337,203,685,447.5807
Object对象型数
4 Byte
任何对象引用
Variant变体型数
>=16 Byte
数值型可达Double型的范围;
字符型可达变长字符串型的串长度
三、VB的常量
1、数值常量:P44
由正负号、数字和小数点组成。
标准模块中代码不只能用于一个应用程序, 还可供其他应用程序重复使用。
vb配套电子教案--VB4PPT教学课件

在程序运行的过程中,有时需要显示一些简单的信息 如警告或错误等,此时可以利用“消息对话框”来显示 这些内容。当用户接收到信息后,可以单击按钮来关闭 对话框,并返回单击的按钮值。
2020/12/10
11
4.2 数据输入
4.2.1 赋值语句LET
赋值语句的一般格式为:
[Let]〈名称〉=〈表达式〉 说明:
2
②〈表达式列表〉是一个或多个表达式,可以是数值表达式或字符
串。对于数值表达式,将输出表达式的值;对于字符串,则照原样输 出。如果省略“表达式列表”,则输出一个空行。
Print 2+4
' 输出值6
Print "A+B="
' 字符串必须放在双引号内
输出数据时,数值数据的前面有一个符号位,后面有一个空格,而 字符串前后都没有空格。
4.1.2 输出文本到图片框
图片框(PictureBox)控件可以输出图形、图像和文本, 还可以像窗体一样作容器包含其他的控件。不仅如此,图 片框控件具有窗体的上述属性和方法,因此前面的例子完 全适用于图片框。
【例4-2】
2020/12/10
4
4.1.3 使用标签控件
标签(Label)主要是用来显示(输出)文本信息,不能 作为输入信息的界面。也就是标签控件的内容只能用 Caption属性来设置或修改,不能直接编辑。它是VB中最 常用的输出文本信息的工具。
②〈消息框类型〉指定对话框中出现的按钮和图标,一般有3个参数。 其取值和含义见表4-4、表4-5、表4-6。这3种参数值可以相加以达到所 需要的样式。
2020/12/10
6
表4-4 参数1——出现按钮
值
常量
说明
2020/12/10
11
4.2 数据输入
4.2.1 赋值语句LET
赋值语句的一般格式为:
[Let]〈名称〉=〈表达式〉 说明:
2
②〈表达式列表〉是一个或多个表达式,可以是数值表达式或字符
串。对于数值表达式,将输出表达式的值;对于字符串,则照原样输 出。如果省略“表达式列表”,则输出一个空行。
Print 2+4
' 输出值6
Print "A+B="
' 字符串必须放在双引号内
输出数据时,数值数据的前面有一个符号位,后面有一个空格,而 字符串前后都没有空格。
4.1.2 输出文本到图片框
图片框(PictureBox)控件可以输出图形、图像和文本, 还可以像窗体一样作容器包含其他的控件。不仅如此,图 片框控件具有窗体的上述属性和方法,因此前面的例子完 全适用于图片框。
【例4-2】
2020/12/10
4
4.1.3 使用标签控件
标签(Label)主要是用来显示(输出)文本信息,不能 作为输入信息的界面。也就是标签控件的内容只能用 Caption属性来设置或修改,不能直接编辑。它是VB中最 常用的输出文本信息的工具。
②〈消息框类型〉指定对话框中出现的按钮和图标,一般有3个参数。 其取值和含义见表4-4、表4-5、表4-6。这3种参数值可以相加以达到所 需要的样式。
2020/12/10
6
表4-4 参数1——出现按钮
值
常量
说明
916035-Visual Basic大学应用教程-VB课件第4章

5
VB程序设计与数据库应用
4.1.4 多分支语句(Select Case语句)
在某些情况下,对某个条件判断后可能出 现多种取值的情况,需要使用多分支选择 结构语句来完成。
在多分支结构中,只有一个用于判断的表 达式,根据表达式的不同计算结果,执行 不同的语句序列。
6
VB程序设计与数据库应用
4.2 循环结构程序设计
选择结构能根据指定条件的当前值在两条或多
条程序路径中选择一条执行,它为处理多种复
杂情况提供了便利条件。VB中选择结构语句
包含If语句和Select Case语句两种。
2
VB程序设计与数据库应用
4.1.1 单行If语句
单行结构条件语句,是一种双分支选择结构其格 式为: If<条件>Then<语句序列1> [Else<语句序列2>
4
VB程序设计与数据库应用
4.1.3 IIf函数
IIf 函 数 可 用 来 执 行 简 单 的 条 件 判 断 操 作 , 它 和 “If…Then…Else”语句有类似的功能。格式为: Iif (<条件>,<True部分>, <False部分>)
其中“条件”是一个逻辑表达式。当“条件”为真 时,IIf函数返回“True部分”,若“条件”为假, 则 返 回 “ False 部 分 ” 。 这 里 “ True 部 分 ” 和 “False部分”可以是表达式、变量或其他函数。
Sub过程和Function过程 过程参数的传递和过程的嵌套。
15
VB程序设计与数据库应用
4.4.1 Sub 过程
在程序设计中,如果某个功能的程序段需要多 次重复使用,可把这个程序段独立出来组成一个 程序,叫子程序,也称为子过程。
第四章 价键理论(VB)配位场理论

(5) 晶体场稳定化能(CFSE) CFSE是衡量配合物稳定性的一个重要因素! 三.分子轨道理论(MOT) 晶体场理论在解释光谱序列、有机烯配合物的形 成、羰基配合物的稳定性等问题上表现为无能 为力! 分子轨道理论认为:在配合物中,配体与中心离 子/原子间不仅有静电作用,还有共价键的生 成,即(n-1)d、ns、np轨道与配体分子轨道间 的组合而生成键或-配键。但是其计算往往 很困难!
dz2 -4.28D q dxz,dyz -5.14D q
d orbital
(4)d轨道中电子的排布 • 分裂能和成对能P 的大小既可从理论上近似算出,也可通过光谱 求得。 例:[Ti(H2O)6]3+ d1电子,在20300cm-1的吸收峰 对应的是:(t2g)1(eg)0 (t2g)0(eg)1 成对能P:由两部分组成,一是克服迫使两个电 子占据同一轨道所需能量,即库仑作用;二是 交换能的损失,即交换积分。 • 电子的填充则根据分裂能与成对能之间的大小 确定d电子是高自旋还是低自旋!
对于八面体,当t2g、eg不是全满、半满或全空时, 一般都会发生姜-泰勒效应。 使八面体出现拉长或压扁的八面体,一般发生在 d1-d9电子组态上 对于正四面体配合物也会发生姜-泰勒效应! 八面体发生畸变的d电子结构
八 面 体 高自旋 畸变 小畸变 (t2g)1;(t2g)2; (t2g)4(eg)2;(t2g)5(eg)2 3 1 6 3 (t ) (e ) ;(t ) (e ) 大畸变 2g g 2g g Cr2+ ; Cu2+
2. 晶体场理论(CFT) CFT与VBT都诞生于三十年代。在五十年代因衍 射、光谱、核磁、激光等技术的发展,使VBT 在解释配合物的电子光谱、振动光谱及热动力 学性质时遇到困难,使得CFT又得到了发展。
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
选择结构:即在程序执行过程中,根据条件判断结 果,执行某一事件
第一节 If语句
使用IIF函数
IIf函数主要用于简单的条件判断中。
IIf函数格式为: 变量名=IIf(<条件表达式>,<真部分>,<假部分>) 规则: 该函数在运行时,首先计算“条件”的 值,如果条件的值为TURE——则IIF函数的 返回值(函数值)就是“真部分”的值” ; 否则,IIF函数的返回值(函数值)就是“假 部分”的值。
块结构条件语句IF…THEN…ELSE…END IF 语法结构为: If <条件> Then <语句块1> [Else <语句块2>] End If
真
条件
假
1
2
1. If…Then结构
例1:输入两个数,分别放在x和y变量中,比较它们大小,
然后将大数放在x中,小数放在y中。 …… x%=Text1.text Y%=Text2.text If x < y Then t=x x=y y=t End If Print x, y ……
假定X的值是5,则在执行以下语句时,其输出结果为 “result”的语句是:
A. Select case x B. Select case x case 10 to 1 case is>5,is<5 Print “result” Print “result” End select End select C. Select case x D. Select case x case IS>5,1,3 to 10 case 1,3,is>5 Print “result” Print “result” End select End select
1、表达式 [,表达式] 情况语句的执行过程是:
• 其中: 1、测试表达式可以是数值或字符串表达式 2、Case 后的表达式值的范围可以是 a、常数或常量表达式 b、可以是用“,”分开的值 (如:1,3,5 或” a”,”b”,”c”) c、可以是一段范围的值 (如:1 To 5 或 “a” To “k”) d、可以是 Is 关系表达式 (如:Is < 0,不能出现Is>0 and is<10) 注意:Select …… Case 语句必须 和 End Select 语句配对使用 <测试表达式>与<表达式值>的数据类型要相同
多分支条件语句Select Case
在 VB中,多分支结果程序通过情况语句来实 现,情况语句也称为Select语句或Case语句,它 根据一个表达式的值,在一组相互独立的可选语 句序列中挑选要执行的语句序列。
多分支条件语句Select Case
语法格式:
Select Case <测试表达式> 选对“测试表达式”求值, Case 2,4,6,8 Case <表达式1> 然后测试该值与哪一个 2、表达式 To 表达式 Case <语句1> 子句中的“表达式”相匹配; Case 1 to 5 Case <表达式2> 如果找到了,则执行与该 3、Is 关系运算表达式,关 Case 子句有关的语句块,并 <语句2> 系运算符 把控制转移到 End Select后 ……… Case Is<12 and is>15 面的语句。 [Case Else Case Is<a+b <语句 n+1>] End Select 功能:根据测试表达式的值,决定程序的流向。
多分支语句功能: • 先对<测试表达式>求值 ,然后查找该值与哪一个 Case子句中的<表达式列表>相匹配。 • 找到之后就执行该Case语句,然后执行end Else 后 的语句块。 • 如有多个Case 后的表达式值与测试表达式值相符,则 只执行第一个与之相符的语句块; • 如果所有 Case 后的表达式值都不满足测试表达式值, 则执行 Case Else 后的语句块。然后执行end Else 后的语句块。
第四节 单选按钮和复选框 单选按钮
1. 用途 单选钮(OptionButton)也称作选 择按钮。一组单选钮控件可以提供一组 彼此相互排斥的选项,任何时刻用户只 能从中选择一个选项,实现一种“单项 选择”的功能,被选中项目左侧圆圈中 会出现一黑点。
单选按钮
2. 重要属性 (1) Caption:文本标题。设置单选钮的文本注释内容。 (2) Alignment属性: 该属性用来设置单选按钮控件标题的显示方式,可 以在设计时设置,也可以在运行期间设置 0:—Left Justify(缺省)控件钮在左边,标题显示在 右边。 1:—Right Justify 控件钮在右边,标题显示在左 边。 (3)Value 属性
多分支结构可以处理两个或 两个以上分支。其语句形式为: If <条件1> Then <语句块1> ElseIf<条件2> Then <语句块2> … [Else <语句块n+1>] End If
•
• • •
1、首先判断条件1,如果条件1为真,则执 行语句1,语句1执行完后,执行End if语 句。 2、如果条件1为假,则判断条件2,如果条 件2为真,则执行语句2,语句2执行完后执 行End if语句。 3、如果条件2为假,则判断条件3,如果条 件3为真,则执行语句3,语句3执行完后执 行End if语句。 4、依次类推,如果前面的条件全部为假, 则执行Else后的语句n.
x<y
T
F
两个变量的值互换:
②
x
y
①
③
2. If…Then…Else 结构
格式:If 条件 Then A组语句 Else B组语句 END If
条件 T A组语句
F
B组语句
执行规则:条件成立,执行A组语句, 条件不成立,执行B组语句
例: If score >= 60 Then Print “祝贺你考试通过!” Else Print “考试未通过.” End If
注意: (1)不管有多少个分支,程序执行了一个分支 后,其余分支不再执行。 (2)elseif 不能写成else if (3)若多分支中有多个表达式同时满足,则只 执行第一个与之匹配的语句块。
设有函数 1 (x<0) 则下列能正确 If x<0 then r=1 else r=2 end if B. If x<0 then r=1 Elseif (x>=0) then r=2 else r=1 C.Print (iif(x>0,1,2)) D.r=iif(x<0,1,2)
if 语句的嵌套
if <表达式1> then if <表达式11> then …… End if …… End if 注意:对于嵌套,为增强可读性,应采用缩进式书写。 IF语句形式如果不在一行写,必须与END IF 配对,多个IF嵌套,END IF与它最接近的IF配对。
IF语句的嵌套
多分支结构(If…Then…ElseIf语句)
第四章 选择结构程序设计
本章主要内容:
• • • • • • 4.1 If语句 4.2 多分支条件选择语句Select Case 4.3 计时器控件 4.4单选按钮和复选框 4.5框架控件 4.6命令按钮
本章重点:
1、If语句和Select Case语句的使用。 2、各个控件的常用属性、事件、方法。
2. 重要属性 Caption、Alignment、Style与单选钮相同
• 复选框的Value 属性与单选按钮不同,其值为数值型 数据,可取 0 , 1 , 2 检查框与单选按钮Value 属性的比较 单选钮 True: 单选钮被选定 False: 单选钮未被选定, 复选框 0--Unchecked:未被选定 1--Checked:选定 2--Grayed:灰色,禁止选择
单行结构条件语句If…Then…Else 语句
语法格式: If <条件> Then [<语句序列1>][ Else <语句序列2>]
功能: 如果“条件”为True,则执行“语句序列1”,否则执行 “else”部分。其中的”else“部分是可选的,当省略时,If 语句简化为: If <条件> Then [<语句序列1>] 其功能为:如果“条件”为True,则执行“语句序列1”, 否则执行下一行程序。
例在窗体画一个命令按钮,一个文本框,然后编写如下事
件过程 程序运行后,在文本框中输入3,然后单击命令按钮,则 以下叙述中确的是()
• Private sub command1_click() X=val(text1.text) Select case x case 1,3 y=x*x case is>=10,is<=-10 y=x Case -10 to 10 Y=-x End select End sub A.执行y=x*x B.执行y=x C.先执行y=x*x ,再执行y=x D.出错
3. 事件
Click 事件是单选钮控件最基本的事件,一般情况用 户无需为单选钮编写Click事件过程,因为当用户单击单选 钮时,它会自动改变状态。 例:设计一个简易血型选择器,由四个单选按钮和一个命令按 钮以及一个文本框组成。选中血型后单击“选择”按钮,结果 显示在文本框中。
复选按钮
1. 用途 复选框控件可以提供多个 选项,它们彼此独立工作,所 以用户可以同时选择任意多个 选项,实现一种“不定项选择 ”的功能。选择某一选项后, 该控件将显示 √ ,而清除此选 项后,√消失。 复选框
在窗体上画两个标签,编写如下过程: private sub form_click() x=-5:s=-5 select case x case is >0 y=x+1 case is >=0 y=x+2 case else Y=x+3 End select Label1.caption=x Label2.caption=y End sub 程序运行后,单击窗体,标签1和标签2中显示的内容分别是 A. -5和-2 B. -5和-4 C. -5和-3 D. -5和-5