【课件教程】第4章 程序控制结构与过程 Visual Basic 计算机二级VB编程学习
合集下载
VB教程完整版第4章Visual Basic的基本控制结构PPT课件
第4章：Visual Basic基本控制结构
5
17.08.2020
第4章：Visual Basic基本控制结构
6
17.08.2020
3. If…Then…ElseIf语句（多分支结构） 当要处理的实际问题有多个条件时，就
要用到该语句结构。
语句格式如下：
If <条件表达式1> Then <语句块1>
17.08.2020
第4章：Visual Basic基本控制结构
14
4.3 循环结构 循环结构是根据某一条件（即循环条件）反
复执行某一段程序（即循环体）。循环体被反复 执行的次数称为循环次数。VB中提供了两种类型 的循环语句：计数型循环语句和条件型循环语句。
4.3.1 For…Next 语句 该语句是计数型循环语句，用于循环次数已知
13
Select Case 语句和If…Then…ElseIf语句 的区别
可以看出，对于多分支选择结构，用Select Case 语句比用If…Then…ElseIf语句更为 直观，程序可读性强。两者的区别在于： Select Case 语句只对单一表达式求值，并 根据求值结果执行不同的语句块，而 If…Then…ElseIf语句可以对不同的表达式 求值。所以，当对多个条件进行判断时， 只能用If…Then…ElseIf语句。
Select Case 语句的格式如下： Select Case 测试表达式
Case 表达式值1 <语句块1>
Case 表达式值2 <语句块2>
…
[Case Else <语句块n+1>]
End Select
第4章：Visual Basic基本控制结构
Visual Basic第4章 Visual_Basic程序控制
4.3选择结构程序设计
选择结构又称为分支结构，根据条件有选择执行某一
分支。VB中用于选择结构的语句有IF语名和SELECT语句。
4.3 选择结构程序设计
◆If 语句是选择结构主要使用的语句。 ◆If 语句有三种形式：行If语句, 块If语句,多路分 支If语句。 1）行结构的 If 语句 格式： If <条件 > Then < 语句 1>[ Else < 语句 2>] 功能：如果条件成立，执行Then后面的语句，否则执 行Else后面语句或下一条语句。
4.2 顺序结构程序设计
InputBox 函数中，若处于中间位置上的某个参数被省略 时，分隔参数的逗号不能省略。 InputBox 函数的返回值是字符串类型在实际应用中，常 用赋值语句来调用 InputBox 函数。例如语句：。 X=InputBox(" 输入变量 X 的值", "输入数据",20)4.2 顺序结构程序设计
2 ）消息框函数 MsgBox 和 MsgBox 语句 （ 1 ） MsgBox 函数 用于发布和接收简单的用户信息。 一般格式： MsgBox(<提示字符串>[,按钮][,消息框标题]) 功能： MsgBox 函数产生一个对话框来显示消 息，当用户单击其中的某个按钮后，将返回一个整型 数，以确定用户单击了哪个按钮。 消息框按钮组合及按钮返回值见教材表 4.2 与表 4.3
例 4.1 用赋值语句修改控件的属性。 要求：单击 Command1 ，标签中显示 "计算机" ； 单击 Command2 ，则标签中显示 "计算机" 界面 设置如图所示。
4.2 顺序结构程序设计
本例事件过程：
C语言教程第4章程序的控制结构.ppt
图
printf("please enter year，capital:");
编
scanf("%d%lf"，&n，&capital);
程
deposit=capital*pow(1+rate，n)；
printf("deposit=%lf\n",deposit);
}
2020/4/12
14
C语言大学实用教程
画 出
输入n和captial
流
程
depoist=captial*(1+rate)n
图
输出depoist
结束
2020/4/12
13
C语言大学实用教程 #include <math.h>
()
#include <stdio.h>
3
main()
根{
据
int n;
流
double rate=0.0225；
程
double capital，deposit；
C语言大学实用教程
简单分支选择（单分支）结构
条件成立否 no yes 语句A
条件表达式
Hale Waihona Puke .T..F.语句
格式：
2020/4/12
if (表达式) 语句/语句组；
20
C语言大学实用教程
双分支选择结构
条件表达式
.T.
.F.
语句1
语句2
格式： If (表达式) 语句1/语句组1； else 语句2/语句组2；
2020/4/12
4
C语言大学实用教程
算法的描述方法
第04章 Visual Basic 程序控制结构
Print方法
(1)Tab函数
语法格式：Tab（n）
功能： 可选的 n 参数是在显示或打印列表中的下一个表达 式之前移动的列数。若省略此参数，则 Tab 将插入点 移动到下一个打印区的起点。当 Print 方法与 Tab 函 数一起使用时，打印的外观将会被分割为均匀、定宽的 列。各列的宽度等于选用字体内以磅数为单位的所有字 符的平均宽度。
标题
提示信息 缺省值
InputBox函数
参数 用法 提示信息参数是必须的。若包含多行， 可在各行之间用chr（13）（回车符）、 chr（10）（换行符）或chr（13）& chr(10)来分隔 对话框的标题，是可选的 文本框里的缺省值，是可选的
提示信息
标题
缺省值
X坐标,Y坐标 X坐标，y坐标决定输入框的位置
MsgBox函数
MsgBox函数的语法格式如下： [Action＝]MsgBox（提示信息，显示类型，标题） 说明： （1）提示信息显示在提示框内； （2）显示类型为对话框所显示的效果； （3）Action获取用户所选择按钮对应的返回值。
MsgBox函数
数值 符号常量 意义
0
1
vbokonly
vbokcancel
MsgBox函数
（2）若返回值不需要做进一步的判断则可以省略“Action ＝”，同时使用MsgBox函数的时候不用圆括号。 例如： x = MsgBox("是否退出？", vbOKCancel, "提示") 在弹出的对话框中若选择“确定”按钮，则x＝1，否 则x等于2。
Print方法
(2)Spc函数或Space[$]函数
语法格式：Spc(n)或Space(n) 功能：跳过n个空格后再输出下一个输出项。
计算机vb二级经典课件
VB控制结构分： 控制结构分： 控制结构分
(a) (b) (c)
假 真 A B A 条件 B 真 L 假 条件
(a) 顺序结构
(b) 选择结构
(c) 循环结构
一、选择控制结构 1、单行结构条件语句 、
格式： 格式： (1) If 条件 Then 语句 (2) If 条件 Then 语句 Else 语句 语句1 语句2 (3) If 条件 Then 语句 ElseIf 条件 Then 语句 …… Else 语句 语句1 语句2 语句n (3) ２、块结构条件语 If 条件 then 条件1 (2) (1) 语句块1 语句块 elseif 条件 then 条件2 If 条件 then 条件1 If 条件 then 语句块2 语句块 语句块1 语句块 elseif 条件3 then 条件 语句块 语句块3 语句块 Else End if …… 语句块2 语句块 Else 语句块n 语句块 End if End if
。
程序运行后，单击窗体，在窗体输出如下结果， 程序运行后，单击窗体，在窗体输出如下结果， 请填空。 请填空。
在窗体上画个名称为Command 1的命令按钮然 例:在窗体上画个名称为 在窗体上画个名称为 的命令按钮然 后编写如下事件过程：(2009年3月考题 后编写如下事件过程： 年 月考题) 月考题 Private Sub Commandl_Click（） （） c=1234 cl=Trim(Str(c)) For i=1 To 4 Print_____ NeXt End Sub 程序运行后，单击命令按钮， 程序运行后，单击命令按钮，要求在窗体上显 示如下内容： 示如下内容： 1 12 123 1234 B 则在横线处应填入的内容为 A）Right(c1, i) B）Left(c1, i) ） ） C）Mid(c1, i, 1) D）Mid(c1, i, i) ） ）
第4章VisualBasic程序控制结构
Private Sub Form_Click() Dim L As Single, s As Single，v As Single r = 1.8: h = 4 Const pi = 3.14159 L = 2 * pi * r s = pi * r * r v=s*h Print "圆周长="; Format(L, "0.000") Print "圆面积="; Format(s, "#.###") Print "圆柱的体积="; Format(v, "#.###") End Sub
4.1.3注释语句
为了提高程序的可读性，通常应在程序的适当位置加上必要的注释，
Visual Basic中的注释是“Rem”或“’”，一般格式为：
Rem
’
例如：Rem 交换变量a和b的值
c = a ´c
a = b:b = c
说明：
注释语句是非执行语句，仅对程序的有关内容起注释作用，它不
被解释和编译，但在程序清单中能被完整地列出。
赋值语句是在任何程序设计中最基本、最常用的语句。 它的作用是把计算右边表达式的运算结果赋值给左端的变量，Visual Basic使用赋值号“=”来赋值。
格式： [Let] 变量名=表达式 [Let] [<对象名.>]<属性名>=<表达式> 其中：Let表示赋值语句的关键字，通常可以省略。 功能：赋值语句具有计算和赋值的双重功能，它首先计算右端 的表达式，并把结果赋值给左边的变量，Visual Basic使用赋值号“=” 来赋值。 表达式：其类型应与变量名的类型一致，即同时为数值型或同 时为字符型等等。当两边同为数值型，但精度不同时，强制转换成 左边的精度，然后赋值。
4.1.3注释语句
为了提高程序的可读性，通常应在程序的适当位置加上必要的注释，
Visual Basic中的注释是“Rem”或“’”，一般格式为：
Rem
’
例如：Rem 交换变量a和b的值
c = a ´c
a = b:b = c
说明：
注释语句是非执行语句，仅对程序的有关内容起注释作用，它不
被解释和编译，但在程序清单中能被完整地列出。
赋值语句是在任何程序设计中最基本、最常用的语句。 它的作用是把计算右边表达式的运算结果赋值给左端的变量，Visual Basic使用赋值号“=”来赋值。
格式： [Let] 变量名=表达式 [Let] [<对象名.>]<属性名>=<表达式> 其中：Let表示赋值语句的关键字，通常可以省略。 功能：赋值语句具有计算和赋值的双重功能，它首先计算右端 的表达式，并把结果赋值给左边的变量，Visual Basic使用赋值号“=” 来赋值。 表达式：其类型应与变量名的类型一致，即同时为数值型或同 时为字符型等等。当两边同为数值型，但精度不同时，强制转换成 左边的精度，然后赋值。
程序的控制结构培训教材经典课件(PPT48页)
random库解析
• 对random库的引用方法与math库一样，可采用下面两种方式实现 import random 或 from random import *
• 使用random库的一些例子如下，请读者注意，这些语句每次执行 后的结果不一定一样：
random库解析
random库解析
• 生成随机数之前可以通过seed()函数指定随机数种子，随机种子一 般是一个整数，只要种子相同，每次生成的随机数序列也相同。这种 情况便于测试和同步数据，例如：
遍历循环: for语句
• Python通过保留字for实现“遍历循环”，基本使用方法如下： for <循环变量> in <遍历结构>: <语句块>
• 之所以称为“遍历循环”，是因为for语句的循环执行次数是根据遍 历结构中元素个数确定的。遍历循环可以理解为从遍历结构中逐一提 取元素，放在循环变量中，对于每个所提取的元素执行一次语句块。
输入：抛点数 处理：计算每个点到圆心的距离，统计在圆内点的数量 输出：π值
π的计算
π的计算
• 上述代码中，random()函数随机返回一个在[0,1)之间的浮点数， 用两个随机数给出随机抛点(x,y)的坐标。sqrt()函数来自于数学库 math，用来求解输入数据的平方根。第一次调用clock()函数启动一 个新的计时器，第二次调动clock()函数返回启动计时器后的时间。
• 程序执行后的效果如下：
• 如果通过while实现一个计数循环，需要在循环之前对计数器idx进 行初始化，并在每次循环中对计数器idx进行累加，如上述代码第4行 。相比for循环，循环变量逐一取自遍历结构，不需要程序维护计数 器
循环保留字: break和continue
Visual Basic程序设计教程电子课件——程序设计基础
6
2.1.2 如何学习Visual Basic
2．编程实验对能力提高最重要
学习Visual Basic与学习下棋有很多相似，值得类比、 借鉴。
学下棋必须先学各棋子的移动规则，但记住了“马走日、 象走田”并不意味着你就会下棋了，必须要勤于对奕并潜 心钻研。学习Visual Basic必须先了解Visual Basic语 言的基本规则，而更重要的是在实际应用中逐步提高编程 能力。
有懂不懂的问题。有此认识，才能避免进入许多初 学者都易于陷入的误区，从而使我们的学习获得事 半功倍的效果。
时常有学生为没有用心去记因此没有记住这些 规则而苦恼，经常有学生用一句“一点都不懂”来 表达此时的心情，是非常有害的，使得学习 Visual Basic迟பைடு நூலகம்才得以入门，从而耽误了宝贵 的学习时间。
4
2.1.1 计算机高级语言与语言处理系 统
再譬如，可以在一行上写上这样的两条语句“x=5: y=x*7.3”，但决不允许写成“x=5, y=x*7.3”，因为 Visual Basic的规则是一行上的多条语句之间必须用冒号 间隔。
(2) 语言处理系统开发者必须根据这套规则去设计、 制作语言处理系统，对于用户严格按照相应语言的规定编 写的程序，该系统应能够处理它并最终生成该程序的可执 行文件。
关于Visual Basic语言我们只能了解并熟记，我们只 能遵守规则而不能去创造规则，我们学习的意义在于用高 级语言编写程序去解决实际问题。
5
2.1.2 如何学习Visual Basic
1．语言规则要熟记 学习Visual Basic首先要做到熟记Visual
Basic语言的规则。 对于规则，只有记得住与记不住的问题，而没
若计算圆柱体的体积并存入变量v，声明v为Single 类型，半径和圆周率也采用Single类型，则结果v具有6位 有效数字；如果要求计算结果具有更高的精确度，可以考 虑采用Double类型声明v与相关变量。
2.1.2 如何学习Visual Basic
2．编程实验对能力提高最重要
学习Visual Basic与学习下棋有很多相似，值得类比、 借鉴。
学下棋必须先学各棋子的移动规则，但记住了“马走日、 象走田”并不意味着你就会下棋了，必须要勤于对奕并潜 心钻研。学习Visual Basic必须先了解Visual Basic语 言的基本规则，而更重要的是在实际应用中逐步提高编程 能力。
有懂不懂的问题。有此认识，才能避免进入许多初 学者都易于陷入的误区，从而使我们的学习获得事 半功倍的效果。
时常有学生为没有用心去记因此没有记住这些 规则而苦恼，经常有学生用一句“一点都不懂”来 表达此时的心情，是非常有害的，使得学习 Visual Basic迟பைடு நூலகம்才得以入门，从而耽误了宝贵 的学习时间。
4
2.1.1 计算机高级语言与语言处理系 统
再譬如，可以在一行上写上这样的两条语句“x=5: y=x*7.3”，但决不允许写成“x=5, y=x*7.3”，因为 Visual Basic的规则是一行上的多条语句之间必须用冒号 间隔。
(2) 语言处理系统开发者必须根据这套规则去设计、 制作语言处理系统，对于用户严格按照相应语言的规定编 写的程序，该系统应能够处理它并最终生成该程序的可执 行文件。
关于Visual Basic语言我们只能了解并熟记，我们只 能遵守规则而不能去创造规则，我们学习的意义在于用高 级语言编写程序去解决实际问题。
5
2.1.2 如何学习Visual Basic
1．语言规则要熟记 学习Visual Basic首先要做到熟记Visual
Basic语言的规则。 对于规则，只有记得住与记不住的问题，而没
若计算圆柱体的体积并存入变量v，声明v为Single 类型，半径和圆周率也采用Single类型，则结果v具有6位 有效数字；如果要求计算结果具有更高的精确度，可以考 虑采用Double类型声明v与相关变量。
第4章程序的控制结构PPT课件
{
语句;
表达式3;
}
22
注意
在for和while语句之后一般没有分号 有分号表示循环体就是分号之前的内容（空循
环体）
while (i < 100); i++;
for (i = 0; i < 100; i++); printf("%d", i);
for通常ቤተ መጻሕፍቲ ባይዱ一个循环变量控制循环的次数，不 要在循环体内改变这个变量
else部分可以没有。 if (表达式) 语句1; 语句3
当表达式值为0时，直接执行语句3
if-else嵌套使用时，注意else和谁配对的问 15
else-if
if的一种扩展形式
if (表达式) 语句1;
else if (表达式) 语句2;
else if (表达式) 语句3;
…………
else
}
20
while
while (表达式) { 语句; }
只要表达式的值为非0，就重复执行语句， 直到表达式值为0时止
21
fforor(表达式1; 表达式2; 表达式3)
{ 语句;
} 首先执行表达式1。如果表达式2的值为非0，
就重复执行语句和表达式3，直到表达式2的值 为0时止
相当于： 表达式1; while (表达式2)
用3种方法编程：
算法1：用不带else子句的if语句编程
17
switch
多路选择 switch (表达式)
{ case 常数1: 语句序列1; case 常数2: 语句序列2; ………… default: 语句序列3;
}
default可以没有，但最好不省略
《Visual Basic NET程序设计》课件第4章 程序设计结构
grade="及格"
Else
grade="不及格"
End If
方法二:
If mark >= 90 Then
grade="优"
Eiself mark >= 80 And mark < 90 Then
grade="良"
Elself mark >= 70 And mark < 80 Then
grade="中"
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles Button1.Click
Dim a, b, c, dt, x1, x2 As Single
grade="良"
Eiself mark >= 90 Then
grade="优"
Else
grade="不及格"
End If
4. If语句的嵌套
If语句的嵌套是指If或Else后面的语句块中又包含If语句。其语句形式如下：
If 条件1 Then
If 条件2 Then
100元以上者，按九五折优惠；在200元以上者，按九折优惠；在300元以上者，按八五折优惠；在
500元以上者，按八折优惠。则可以根据顾客购物款数计算出优惠价。
Else
grade="不及格"
End If
方法二:
If mark >= 90 Then
grade="优"
Eiself mark >= 80 And mark < 90 Then
grade="良"
Elself mark >= 70 And mark < 80 Then
grade="中"
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles Button1.Click
Dim a, b, c, dt, x1, x2 As Single
grade="良"
Eiself mark >= 90 Then
grade="优"
Else
grade="不及格"
End If
4. If语句的嵌套
If语句的嵌套是指If或Else后面的语句块中又包含If语句。其语句形式如下：
If 条件1 Then
If 条件2 Then
100元以上者，按九五折优惠；在200元以上者，按九折优惠；在300元以上者，按八五折优惠；在
500元以上者，按八折优惠。则可以根据顾客购物款数计算出优惠价。
VisualBasic的基本控制结构Pptppt文档
4.2.1 If语句
4. If 语句的嵌套 If语句的嵌套是指If或 Else后面的语句块中又包含If语
句。下面是常见的双分支选择结构中的嵌套If结构的形式：
If <条件表达式1> Then
If <条件表达式1> Then
…
…
If <条件表达式11> Then Else
… End If
… If <条件表达式11> Then
4.2 选择结构
4.2 选择结构
选择结构是根据某个条件决定执行哪部 分程序，可以用If语句或Select Case语句实 现。其中If语句根据分支的多少分为单分支 、双分支和多分支If语句。Select Case语句 使程序只能根据某一个条件的不同取值来决 定执行哪部分程序。大部分情况下两种语句 间可以相互替换。
VisualBasic的基本控制结构Ppt
4.1 顺序结构
4.1 顺序结构
顺序结构是程序设计中最基本、最简单的结构，在此 结构中，程序按照语句出现的先后顺序依次执行。顺序结 构是任何程序的基本结构，即使在选择结构和循环结构中 也包含有顺序结构。
语句1
语句n
4.1 顺序结构
【例4.1】 单击窗体，在窗体上输出两行不同格式 的文字。
4.2.1 If语句
1. If…Then语句（单分支语句） 语句格式如下：
(1) If <条件表达式> Then <语句块>
End If
条件表达 式
True
语句块
False
(2) If <条件表达式>Then <语句>
其中条件表达式可以是任意类型的，语句块可以是一条或
相关主题
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
↸
例如： 例如：
☺ InputBox(“请输入字母”，“输入对话框”，“wuxi”) 请输入字母” 输入对话框” 请输入字母
例 4-3
输入圆的半径，计算其周长和面积。（P64 .4-2）
↸
3、消息框函数（Msgbox）
在windows中，如果操作有误，通常会在屏幕上显示一个 对话框，提示用户进行选择，然后系统根据选择确定其后的 操作。例如：
1、使用文本框输入数据 使用文本框输入数据
利用文本框接收用户通过键盘输入的内容， 利用文本框接收用户通过键盘输入的内容，而用 户输入的内容是保存在文本框的Text文本属性中，要 文本属性中， 户输入的内容是保存在文本框的 文本属性中 获取Text文本属性的值即用户输入的内容，可通过赋 文本属性的值即用户输入的内容， 获取 文本属性的值即用户输入的内容 值语句实现： 值语句实现：A = Text1.Text
说明:
格式:<变量>=MsgBox(<提示信息>[,<对话框类型>][,<对话框标题>])
↸
•<提示信息>：字符串表达式，用于指定显示在对话框中 的信息，要在提示信息中对文本信息进行换行，可以使用 回车符Chr(13)、换行符Chr(10)或是回车与换行符的组合 Chr(13)&Chr(10)。 • <对话框类型>：数值型数据，是可选项，用来指定对话 框中出现的按钮和图标的种类及数量，该参数的值由三类 数值相加产生，这三类数值分别表示按钮的类型、显示图 标的种类及默认按钮的位置 • <对话框标题>：字符串表达式，是可选项，它显示在对 话框的标题栏中，如果省略，则在标题栏中显示应用程序 名。
↸
显示“终止” 显示“终止”、“重试”、“忽略”按 重试” 忽略” 钮 显示“ 显示“是”、“否”、“取消”按钮 取消” 显示“ 显示“是”、“否”按钮 显示“重试”、“取消”按钮 显示“重试” 取消” 显示停止图标 x 显示询问图标 ? 显示警告图标 ！ 显示信息图标i 显示信息图标 第一个按钮是默认按钮 第二个按钮是默认按钮 第三个按钮是默认按钮
2、注释语句
↸
通常在程序代码中的适当位置加上必要的文字说明， 通常在程序代码中的适当位置加上必要的文字说明， 以提高程序的可读性 格式1： 格式 ：Rem 注释内容 格式2： 注释内容 格式 ：'注释内容 注释语句是非执行语句， 注释语句是非执行语句，仅仅对相应位置上的代码 起到注释作用 格式1中的关键字 中的关键字Rem和注释内容之间必须用空格隔 格式 中的关键字 和注释内容之间必须用空格隔 注释内容中可以包含任意字符(西文 中文等)， 西文、 开；注释内容中可以包含任意字符 西文、中文等 ， 在使用时，遵循语句书写的规范；格式2的注释语句 在使用时，遵循语句书写的规范；格式 的注释语句 在使用时较格式1更加灵活 更加灵活， 在使用时较格式 更加灵活，可以不用加语句间的分 隔符， 隔符，直接出现在某行语句后面进行注释
二、数据输入
↸
不管多么复杂的问题，一般在解决时， 不管多么复杂的问题，一般在解决时，都可分为 三个步骤： 输入数据、 数据处理、 三个步骤：①输入数据、②数据处理、③输出结果
VB的输入输出有着十分丰富的内容和形式，它提供 了多种手段，并可通过各种控件实现输入输出操作，使输 入输出更加灵活、多样、方便、直观。
一、几个常用语句 1、赋值语句Let 赋值语句Let
↸
赋值语句的一般形式是 [Let]<变量名 对象名 属性名> [Let]<变量名>|<对象名.属性名> = 表达式 变量名>|<对象名. 变量名为任何合法的VB变量名 变量名， 变量名为任何合法的 变量名，而表达式可以为任何类 型的表达式， 表示赋值 通常省略. 表示赋值， 型的表达式，Let表示赋值，通常省略 赋值语句的执行步骤和作用是先计算赋值号 赋值号(=)右边表达式 赋值语句的执行步骤和作用是先计算赋值号 右边表达式 的值，然后将表达式的值赋给左边的 变量名>. 赋给左边的< 的值，然后将表达式的值赋给左边的<变量名>. 使用赋值语句可给变量或属性赋值。 使用赋值语句可给变量或属性赋值。对变量进行赋值就是 将数据放入指定变量的内存空间。 将数据放入指定变量的内存空间。而对属性进行赋值就是 设置或改变对象的属性值 ☺ StudentNum = 30 number% = StudentNum * 4 + 20 Form1.Caption = "Input data" Label1.BackColor = RGB(255,0,0)
例题4 例题4-2
由用户输入两个数， 由用户输入两个数，实现两数的求和程序
↸
分析： 分析： 文本框接收用户的输入 相加”按钮的Click事件过程中编写主要功能代码： 事件过程中编写主要功能代码： 在“相加”按钮的 事件过程中编写主要功能代码 (1)利用赋值语句从文本框的 利用赋值语句从文本框的Text属性取得数据；(2)求和； 属性取得数据； 求和 求和； 利用赋值语句从文本框的 属性取得数据 (3)通过给标签的 通过给标签的Caption属性赋值实现结果的显示 通过给标签的 属性赋值实现结果的显示 Private Sub CmdAdd_Click() Dim a As String, b As String, c As Single a = Text1.Text : b = Text2.Text c = Val(a) + Val(b) '利用 函数实现字符串到数值的转换 利用Val函数 函数实现字符串到数值的转换 利用 Label1.Caption = Label1.Caption & a & "+" & b & "=" & CStr(c) '通过标签显示两数求和结果 通过标签显示两数求和结果 End Sub
3)变量名或对象属性名的类型应与表达式的类型相容.
↸
即变量名或对象属性名能够正确存取赋值号右边的表达式 的值. 的值 例如
Dim A As Integer, B As Single, C As Double, S As String A = 100 S = "123.45 " A= S S=A B = 12345.67 A= B C = 123456.789 B=C S = "abc” A= S ‘B=123456.8 单精度有效数字为 位 单精度有效数字为7位 ‘A=12346 四舍五入后取整 ‘A=123 ‘S=“123”
2、输入框函数（Inputbox） 输入框函数（Inputbox）
↸
InputBox函数产生一个对话框，作为输入数据的界面， 等待用户输入正文或按下按钮，并返回所输入的内容。 格式:<变量>=InputBox(<提示信息>[,<对话框标题>][,<默认值>])
说明: • <提示信息>：字符串表达式。在对话框内显示提示信息，提示用户输入 的数据的范围、作用等。如果要显示多行信息，则可在各行行末用回车符 Chr(13)、换行符Chr(10)、回车换行符的组合Chr(13)&Chr(10)或系统常量 vbCrLf来换行。 • <对话框标题>：字符串表达式，可选项。运行时该参数显示在对话框的 标题栏中。如果省略，则在标题栏中显示当前的应用程序名。 • <默认值>：字符串表达式，可选项。显示在对话框上的文本框中，在没 有其他输入时作为缺省值。如果省略，则文本框为空。
VB提供的MsgBox函数可以实现此功能，它可以向用户传送 信息，并可以接收用户在对话框上的选择，以此作为程序继 续执行的依据。
↸
功能：在对话框中显示消息，等待用户单击按钮，并返回一个 整数告诉用户单击了哪个按钮。
格式:<变量>=MsgBox(<提示信息>[,<对话框类型>][,<对话框标题>])
4.1 顺序结构
↸
在VB中，采用 中 采用OOP，程序的执行是事件驱动的， ，程序的执行是事件驱动的 但就某个过程而言， 但就某个过程而言，过程本身代码的执行仍采用顺 序结构， 序结构，即按照语句代码出现的先后次序执行
顺序结构的语句主要是赋值语句、 顺序结构的语句主要是赋值语句、输入输出语句等 在VB中有赋值语句，没有输入输出语句 中有赋值语句， 中输入输出功能可以通过文本框等控件和 在VB中输入输出功能可以通过文本框等控件和 中输入输出功能可以通过 Print方法来实现， VB提供了专门用于用户交互的 方法来实现 提供了专门用于用户交互的 方法来实现， 提供了专门用于 函数和过程来实现此功能 函数和过程来实现此功能
4、卸载对象语句 Unload
从内存中卸载窗体或控件 格式： <对象名 对象名> 格式：Unload <对象名> Unload Form1 ‘卸载窗体 卸载窗体Form1 卸载窗体 Unload Me ‘卸载当前窗体 卸载当前窗体
5、结束语句 End
↸
该语句用来结束一个应用程序的执行， 该语句用来结束一个应用程序的执行，即强迫中止 应用程序，卸载该程序中的所有窗体，凡是由Open 应用程序，卸载该程序中的所有窗体，凡是由 语句打开的文件被关闭， 语句打开的文件被关闭，并且释放程序所占用的内 存 格式： 格式：End End语句不调用 语句不调用Unload、QueryUnload或任何其 语句不调用 、 或任何其 代码， 它Visual Basic代码，只是生硬地终止代码执行。在 代码 只是生硬地终止代码执行。 执行时， 语句会重置所有模块级别 执行时，End语句会重置所有模块级别变量和所有 语句会重置所有模块级别变量和所有 模块的静态局部变量 若要保留这些变量的值， 的静态局部变量。 模块的静态局部变量。若要保留这些变量的值，改 为使用Stop语句，则可以在保留这些变量值的基础 语句， 为使用 语句 上恢复执行