VB第三章相关归纳.docVIP

1、IF结构 ·行IF语句 n格式：IF 条件 THEN 语句1 [ ELSE 语句2 ] n ·块IF语句 格式：If 条件 Then 语句1 [ Else 语句2] End If ·多分支IF语句 其中ElseIf的用法，实际上是将Else行后面的IF行合并，减少一个End IF行。 2、情况选择结构 “测试表达式”可以是数值型或字符串型表达式 一个算术表达式 一组枚举表达式 多个数值（表达式1 To 表达式2） 关系运算符Is表达式 情况选择结构格式如下： Select Case 测试表达式 [ Case 表达式列表1 [语句块1] ] [ Case 表达式列表2 [语句块2] ] ... [Case Else [语句块n+1] ] End Select 执行流程： ① 自上而下顺序地判断测试表达式的值与表达式列表中的哪一个匹配，如有匹配则执行相应语句块，然后转到End Select的下一语句。 ② 若所有的值都不匹配，执行Case Else所对应的语句块，如省略Case Else，则直接转移到End Select的下一语句。 3、On Error GoTo语句 举例说明： Private Sub Command1_Click() On Error GoTo Err001 Print 1 / Text1.Text Exit Sub 为防止没有出错情况下错误地执行下一语句，退出Sub过程。 Err001: MsgBox 除数不能为0，请输入X的值 End Sub 4、For/Next语句 格式：FOR 控制变量X = 初值e1 TO 终值e2 [STEP 步长e3]? 循环体 ???? ?NEXT 控制变量X 例如，计算1～100之间奇数和的程序段可编写为： For n=1 to 99 step 2 ??s=s+n Next n 也可以写作：For n=99 to 1 step -2: s=s+n: Next n ※在For/Next结构中： ??(1)?步长缺省值为1。 ??(2)?循环变量取值不合理，则不执行循环体。如下列循环一次也不执行。 ????For n=99 to 1 step 2 ?????s=s+n ??Next n ??(3)?循环体中可以出现语句“Exit For”，用于将控制转移到Next后一语句。 (4)?循环正常结束（未执行Exit For等控制语句）后，控制变量为最后1次取值加步长。 5、While/Wend语句 格式：While 条件 ??????循环体 ??????Wend 功能：当条件为真（True）时执行循环体。 While/Wend结构的特点是：先判断条件、后执行循环体，常用于编制某些循环次数预先未知的程序。 6、Do/Loop语句 格式1：Do [{While|Until}条件]??先判断条件、后执行循环体 ????????????循环体 ??????? Loop 格式2：Do??先执行循环体、后判断条件 ????????????循环体 ????????Loop [{While|Until}条件] ?(1)?选项“While”当条件为真时执行循环体，选项“Until”当条件为假时执行循环体。 ?(2)?循环体中可以出现语句“Exit Do”，将控制转移到DO/LOOP结构后一语句。 7、多重循环 ①每个循环必须有一个唯一的循环变量 ②内层循环变量与外层循环额循环变量同名 ③内层循环必须完全放在外层循环体内，内外循环不得交叉 例： 代码： Private Sub Form_Click() Dim I As Integer, j As Integer, a As String For I = 1 To 9 For j = I To 9 a = I * j = I * j Print Tab(9 * (j - 1) + 1); a; Next j Print Next I End Sub 8、数组及其应用 (1)数组声明 数组也是变量（成组的变量），因此也必须遵循“先声明、后引用”的规则。如果把先前所介绍的变量称为简单变量，那么关于简单变量的声明方式、初始值同样适用于数组（第4章关于变量作用域、生存期的详细介绍，也同样适用于数组）。 ·例如，下列语句声明： y是Single类型数组，数组y的元素有y(0)、y(1)、y(2)、y(3)、y(4)、y(5)；Integer类型数组m的元素有m(0)、m(1)、m(2)、m(