VB计算机二级培训重点概要4.docVIP

第五讲 常用控件 重点1 选择结构 1.单分支结构(If…Then语句)格式： (1)单行 If〈条件〉Then〈语句〉 (2) 多行 If〈条件〉Then 〈语句块〉 End If 2.双分支结构(If…Then…Else语句)格式： (1)单行 If 〈条件〉 Then 语句1 Else 语句2 (2)多行 If〈条件〉Then 〈语句块1〉 Else 〈语句块2〉 End If 课上例题： 例2：两个文本框text1,text2 在text1中输入字母，text2中会自动动态计数，直到text1中出现.时停止计数 Private Sub Text1_Change() If Right(Text1.Text, 1) . Then Text2.Text = Len(Text1.Text) Else Text1.Enabled = False Text2.Enabled = False End If End Sub (3)IIf函数 格式：result=IIf（条件，True 部分，False 部分）??注：?其中，“result”是函数的返回值，“条件”是一个逻辑表达式。当“条件”为真时，IIf函数返回“True部分”，否则返回“False部分”。“True部分”或“False部分”可以是表达式、变量或其他函数。 课上例题 例3：设a=“a”，b=“b”，c=“c”，d=“d”，执行语句x=IIf（（ab） Or （cd），“A”，“B”）后，x的值为（?D? ）。???? A．“a”????? B．“b”????? C．“B”????? D．“A” 3.块结构条件语句 块结构条件语句一般格式如下：????If 条件1 Then???? 语句块1????[ElseIf 条件2 Then ???? 语句块2]????[ElseIf 条件3 Then ???? 语句块3]????……????[Else???? 语句块n]????End If? 课上例题： 例5： 函数A（）、B（）、C（）分别实现三种不同的功能，令X=1、Y=-4、Z=0，那么下述代码的功能是（?A ）。???? If （X0）Then???? A（）??? ?ElseIf （Y10）Then???? B（）?? ?ElseIf （Z3）Then??? ? C（）???? End If ????A．执行函数A（）??B．执行函数B（）?? C．执行函数C（）?D．以上都不正确 重点2：多分支控制结构 情况语句(Select Case ) Select Case〈测试表达式〉 Case〈表达式列表1〉 〈语句块1〉 Case〈表达式列表2〉 〈语句块2〉 …… Case〈表达式列表n〉 〈语句块n〉 ［Case Else 〈语句块n+1〉］ End Select 注意：“表达式列表”可以采用下述形式： （1） 表达式[，表达式] （2） 表达式 To 表达式(前=后) （3） Is关系运算表达式 (Is后只能跟关系运算符，并且条件只能是简单条件，不能用逻辑运算符将两个或多个简单条件组合在一起。) （4）三种形式的混用，用逗号分隔 课上例题： 例6：以下Case语句中错误的是（ C　）。 A) Case 0 To 10 B) Case Is10 C) Case Is10 And Is50　　 D) Case 3,5,Is10 重点3：循环结构 1.For循环 格式： For〈循环变量〉=〈初值〉To〈终值〉［Step 步长］ 〈循环体〉 ［Exit For］ Next〈循环变量〉 功能： 当循环变量的值在初值到终值范围内时，执行一次循环体中的语句块，并使初值增加一个步长。当循环变量的值不在初值到终值范围内时，就退出循环，执行Next后面的语句。 循环次数 课上例题： 例：Private Sub form_click() Dim i As Integer, j As Integer j = 10 For i = 1 To j Step 2 i = i + 1 j = j - i Next i Print i, j End Sub 窗体上显示结果为__13_ ，__-16___ 解题思路： 第一次执行循环体后 I和j的值：2 ， 8 第二次执行循环体后 I和j的值：5 ， 3 第三