- 1、本文档共19页,可阅读全部内容。
- 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
选择结构的程序可以用选择语句来表示。选择语句又称条件语句、分支语句或判断语句。选择语句能使程序在执行过程中,根据不同的结果,选择执行不同的处理。语句的主要形式是If语句。 2.6 选择结构程序设计 1.行If语句 行If语句必须在一行内写完。该语句的执行过程是:先计算条件表达式的值,如果条件表达式的计算结果是True,就执行Then后面的语句,否则执行Else后面的语句。如果Else和它的后随语句不出现,则条件表达式值为True时执行Then后面的语句,否则就什么也不执行,程序转向If语句后面的后继语句。行If语句格式如下: If 条件表达式 Then 语句1 Else 语句2 或 If 条件表达式 Then 语句 2.块If语句 块If语句的格式如下: If 条件表达式1 Then 语句块1 ElseIf 条件表达式2 Then 语句块2 …… ElseIf 条件表达式n Then 语句块n Else 语句块0 End If 说明: ①这儿的语句块可以由一个或多个语句组成。如果只有两种不同情形的分别处理,则中间所有的ElseIf部分都不必书写,只保留语句块1和语句块0相应的部分即可,即块If语句可以简化为以下格式: If 条件表达式1 Then 语句块1 Else 语句块0 End If ②块语句的执行过程是:先测试“条件表达式1”,如果该条件为“True”,则执行Then后面的“语句块1”;如果“条件表达式1”为False,则顺序测试每个ElseIf子句中的“条件表达式”,当发现某个“条件表达式”为True时,就执行与其相关的Then后面的“语句块”;如果所有的ElseIf“条件表达式”均为False,则执行Else后面的“语句块0”。 ③在块结构的条件语句中,ElseIf子句的数量没有限制,可以根据需要加入任意多个ElseIf子句。 ④在有些时候,块结构的条件语句中可能出现多个条件为True的情况,此时只能执行一个语句块,即当遇到第一个为True的条件时,执行相应语句后就跳出If结构,去执行下面的语句。 ⑤块结构的条件语句可以嵌套,即把一个If …Then…Else放在另一个If …Then…Else块内,嵌套必须完全“包住”,不能相互“骑跨”。 3.当条件表达式为True或False时进行处理的语句都只有一个时,可采用行If语句,也可采用块If语句;而如果分支中进行处理的语句不止一个时,必须采用块If语句。块条件形式的语句可以简化为: If 条件表达式 Then 语句块 End If 行If语句必须在一行内写完,最后没有End If;块If语句的ElseIf部分和Else语句部分是可选的,最后必须有End If。 4.Exit和End语句 使用Exit语句可以在程序执行过程中退出事件过程。如Exit Sub。使用End语句可以在程序执行过程中,关闭程序。示例如下: Private Sub Command1_Click() Dim a As Integer a = MsgBox(“你确定要关闭吗?”,1, “关闭”) If a = 1 Then Exit Sub 关闭程序,此处可用End End Else Print “留下” End If End Sub 本章节学习中需要掌握行If语句与块If语句的使用方法,并会使用If语句编写简单的选择结构的VB程序。难点是掌握块If语句的嵌套使用方法。考查方式为选择题与填空题。 1.有如下VB程序段: a = 5: b = 3 If Not b a Then a = a + b 该程序运行后,a的值是 ( ) A.5 B.3 C.8 D.0 A D 2.若x=1,执行语句If x = 1 Then y = x + 1 Else y = x – 1后,变量y的值是 ( ) A.-1 B.0 C.1 D.2 C 3.已知a、b、c为某三条线段的长度,判断这三条线段能否构成一个三角形的VB程序代码如下: Private Sub Command1_Click() a = 20 b = 13 c = 5 If a + b c And b + c a And c + a b Then MsgBox “能构成” Else MsgBox “构不成” End Sub 运行程序,单击命令按钮Command1后,结果是 ( ) A.弹出对话框中显示“能构成” B.弹出对话框中显示“构不成” C.出现“块If没有End If”的错误信息 D.出现“False”的错误信息 4.有如下VB程序段: Private Sub Command1_Clic
文档评论(0)