vb编程基础教程四

《vb编程基础教程四》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、VB编程基础教程四作者：不详　来源于：中国VB网　发布时间：2005-7-1控制结构概述有了控制结构就可控制程序执行的流程。如果未复选控制流语句，程序便从左至右、自顶向下地贯穿这些语句。有些简单程序可以只用单向流程来编写，有些流程可以依靠运算符的优先级来控制，但任何编程语言的效力和用途皆由其通过结构和循环改变语句顺序的能力而得。关于控制结构的详细信息，请参阅下面的主题：  判定结构用于分支的判定结构。循环结构用于重复处理的循环结构。使用控制结构在代码中运用控制结构的基础。判定结构VisualBasic过程能够测试条件式，然后根据测试结果执行不同的操作。VisualBasic支持的判

2、定结构有：If...ThenIf...Then...ElseSelectCaseIf...Then用If...Then结构有条件地执行一个或多个语句。单行语法和多行块语法都可以使用：IfconditionThenstatementIfconditionThenstatementsEndIfCondition通常是比较式，但它可以是任何计算数值的表达式。VisualBasic将这个值解释为True或False：一个为零的数值为False，而任何非零数值都被看作True。若condition为True，则VisualBasic执行Then关键字后面的所有statements。可以使用单

3、行或多行语法有条件地执行一个语句（下面两个例子等价）：IfanyDate

4、：Ifcondition1Then[statementblock-1][ElseIfcondition2Then[statementblock-2]]...[Else[statementblock-n]]EndIfVisualBasic首先测试condition1。如果它为False，VisualBasic就测试condition2，依次类推，直到找到一个为True的条件。当它找到一个为True的条件时，VisualBasic就会执行相应的语句块，然后执行EndIf后面的代码。作为一个选择，可以包含Else语句块，如果条件都不是True，则VisualBasic执行Else语句块。

5、If...Then…ElseIf只是If...Then...Else的一个特例。注意，可以使用任意数量的ElseIf子句，或者一个也不用。可以有一个Else子句，而不管有没有ElseIf子句。例如，应用程序可以根据菜单控件数组中哪个控件被单击而采取相应的动作：PrivateSubmnuCut_Click(IndexAsInteger)  IfIndex=0Then            '“剪切”命令。      CopyActiveControl        '调用通用过程。      ClearActiveControl  ElseIfIndex=1Then      '“复

6、制”命令。      CopyActiveControl  ElseIfIndex=2Then      '“清除”命令。      ClearActiveControl  Else                        '“粘贴”命令。      PasteActiveControl  EndIfEndSub注意，总是可以添加更多的ElseIf块到If...Then结构中去。但是，当每个ElseIf都将相同的表达式比作不同的数值时，这个结构编写起来很乏味。在这种情况下可以使用SelectCase判定结构。详细信息请参阅语言参考中的“If...Then...Else语句”。

7、SelectCaseVisualBasic提供SelectCase结构替代If...Then...Else，从而可在多个语句块中有选择地执行其中一个。SelectCase语句的能力与If...Then...Else语句类似，但对多重选择的情况，SelectCase语句使代码更加易读。SelectCase在结构的上方处理一个测试表达式并只计算一次。然后，VisualBasic将表达式的值与结构中的每个Case的值进行比较。如果相等，就执行与该Case相关联的语句块。Se