没有合适的资源?快使用搜索试试~ 我知道了~
Visual Basic中的过程控制完整版.doc
需积分: 2 0 下载量 167 浏览量
2024-01-18
12:01:44
上传
评论
收藏 203KB DOC 举报
温馨提示
试读
18页
Visual Basic中的过程控制完整版.doc
资源推荐
资源详情
资源评论
Visual Basic 中的过程控制
如果不使用程序流程控制语句,程序的执行是简单的从上到下顺序执行的单向流程。这种程序结构所完成的
工作功能有限。
过程控制可以分为三个主要的部分:转支(Branching,也称跳转)、循环(Iteration)和条件执行(Condtion
execution)。
转支是最基本的一种过程控制,它实际上就是一种跳转的机制,从程序中的一个代码段跳到另一个代码段,
而不执行中间的步骤。
循环是指在程序中重复执行一套指令,并且当达到一定次数或者条件时停止。在 VB 中有三种循环指令。
条件执行是指在程序中,当某些条件为真时,允许执行一系列指令,如果条件为假,则执行另外的指令。这
就给程序提供了逻辑判断能力。
一、跳转控制
跳转——从程序的某一行到另一行的直接转移。
它有两种形式:无条件跳转和有条件跳转。
无条件转向语句“Goto”的一般形式:
Goto 语句标号(或行号)
注意:
1)语句标号或行号必须存在,否则会出现错误。Goto 语句标号的命名规则与变量名相同。
2)“标号”是一个以冒号结尾的标识符;“行号”是一个整形数,它不以冒号结尾。例如:
Start:
是一个标号,而
1200
是一个行号。
例(见教材 P62):
Sub Form_Click ()
Print "She is "
Goto Message
Print "not"
Message:
Print "a beautiful girl ."
End Sub
本语句不易实现结构化程序设计,所以不提倡使用。
二、条件结构
在 VB 过程中可以进行条件测试,然后根据测试结果去执行不同的操作。VB 提供以下几种格式的条件语句:If
语句、Select Case 语句。
1、If 语句
(1)If 条件 Then 语句 1 [Else 语句 2]
这种语句称为单行条件语句。如果条件为真,执行 Then 后面的语句;如果条件为假,则执行 Else 后面的语
句(语句 2)。
说明:
� 语句 1 和语句 2 都可以是若干条语句(语句之间用“:”号隔开);
� 单行语句必须写在一个程序行内;
� 其中“Else 语句 2”可以省略,省略格式的功能是:当 If 后的条件成立时,执行 Then 后面的语句,
若不成立,则执行条件语句的下一个程序行。
例如:
Private Sub Command1_Click()
Dim intAge As Integer
intAge = InputBox("aaa", "bb")
If intAge > 23 Then Print "您已经超龄,无法入选国奥队!"
End Sub
(2)If 条件 Then
语句块 1
[Else
语句块 2]
End If
这种结构称为简单块 If 结构。它是这样执行的:
如果条件为真,执行 Then 后面的语句块 1,否则,则执行 Else 后面的语句块 2;若不写 Else 部分,则执行 End
If 后面的语句。
例如:
If intAge >23 then
Print"您已经超龄,无法入选国奥队"
Print "感谢您对中国足球的关怀"
End If
(3)If 条件 1 Then
语句块 1
Else If 条件 2 Then
语句块 2
:
:
Else If 条件 n Then
语句块 n
[Else
默认语句块]
End If
这种结构称为块 If 结构。它是这样执行的:
先测试条件 1,如果条件 1 成立,则执行 Then 后面的语句块 1;如果条件 1 不成立,则继续检测条件 2,如
果条件 2 成立,则执行 Then 后面的语句块 2;……。如此测试下去。如果所有条件都不成立,则执行 Else
后面的默认语句块(如果存在的话,否则,跳到 End If 下一条语句执行)。这里的 n>=2。
注意:
在判定结构中使用的“条件”通常是比较语句(关系运算符,如>、<、<>、=等)。如果要使用更加复杂的条
件,可以使用逻辑运算符(And、Or、Not)来连接几个比较语句,例如:
If intAge<23 And strCountry="china" And intSkill>10 Then
Print "欢迎您到国奥队来!"
:
:
End If
2、 Select Case
与 If…Then…E1se 语句相似,Visual Basic 还提供了 Select Case 结构来实现多分支结构,从而对在多个
语句块中有选择地执行其中—个。Select Case 语句的能力与 If…Then…E1se 语句类似,但对多重选样的情
况,Select Case 语句使代码更加清楚易懂,而且执行也比较快速。Select Case 的语法结构是:
Select Case 测试条件
Case 表达式 1
语句序列 1
[Case 表达式 2
语句序列 2]
:
:
:
[Case Else
默认序列 ]
End Select
Select Case 在结构的上方处理一个测试表达式并只计算一次(在 Select Case 语句中如果不止一个 Case 与
测试表达式相匹配,则只对第一个匹配的 Case 执行与之相关联的语句块)。然后 VB 将表达式的值与结构中
的每个 Case 的值进行比较,如果相等,就执行与该 Case 相关联的程序段;如果都不相等则执行 Case Else
对应的默认程序段;如果这时没有定义 Case Else 子句,则不执行任何分支退出(即执行 End Select 语句的
下一条语句)。Case Else 虽然是选择性的,但是最好使用,以防遗漏测试数据。
Case 后的表达式不仅可以是一个值,还可以是几个值的列表。当列表中有多个值时,就用逗号把值隔开。如
下面的例子:
Select Case WeekDay(Date)
Case l,2,3,4
Dayname="工作日"
Case 5
Dayname="加班"
Case E1se
Dayname="周末"
End Select
Case 后的表达式也可以用 To 关键字,指定一个范围。如果是数值,较小的数值必须显示在 To 之前;如果
是字符串常量,必须按字母的顺序写出。例如:
Case -5 To 1
Csse "dvark" To "kear"
剩余17页未读,继续阅读
资源评论
勾月禅心
- 粉丝: 685
- 资源: 6702
上传资源 快速赚钱
- 我的内容管理 展开
- 我的资源 快来上传第一个资源
- 我的收益 登录查看自己的收益
- 我的积分 登录查看自己的积分
- 我的C币 登录后查看C币余额
- 我的收藏
- 我的下载
- 下载帮助
最新资源
- 信呼OA系统2.1.7版源码
- 3122080306 邹子轩 实验报告二.docx
- 基于STM32 NUCLEO板设计彩色LED照明灯(纯cubeMX开发)(大赛作品,文档完整,可直接运行)
- 发那科工业机器人保养大全
- Sphere.h
- REMD固有时间尺度分解信号分量可视化(Matlab完整源码和数据)
- 嵌入式系统双单片机STC89C52+STC15W104多功能学习板电路图可扩展 适用于单片机初学者和教学
- 基于STM32蓝牙控制小车系统设计(硬件+源代码+论文)大赛作品
- XILINXFPGA源码基于Spartan3火龙刀系列FPGA开发板VGA测试例程
- Java聊天室的设计与实现【尚学堂·百战程序员】
资源上传下载、课程学习等过程中有任何疑问或建议,欢迎提出宝贵意见哦~我们会及时处理!
点击此处反馈
安全验证
文档复制为VIP权益,开通VIP直接复制
信息提交成功