vb控制结构综合练习

A) 0 B) 1 C) ””D) False 控制结构4．设a=6，则执行x=IIf(a>5,-1,0)后，x的值一、选择题为________。

种基本结构1.VB的3种结构化程序设计的3A) 5 B) 6 C) 0 D) –1

是________。5．下面程序段的运行结果是________。

A) 选择结构、过程结构、顺序结构cj=85

递归结构、选择结构、顺序结构B)

晉挠??吠敨?橤尽屁

过程结构、转向结构、递归结构C)

晉挠??吠敨?橤尽层

D) 选择结构、顺序结构、循环结构晉挠??吠敨?橤尽屃

2.段函数表用If语句示分晉挠??吠敨?橤尽屄3?1x?x?1?x)(f表________ ，以下?311x?x?晉挠??吠敨?橤尽居?示方法不正确。Print dj=;dj

A) f=x^3+1A) dj=B B) dj=C C) dj=D D) dj=E

1 If x>=1 Then f=s^3-

-B) If x>=1 Then f=x^31

If x<1 Then f=x^3+1

-1C) If x>=1 Then f=x^3

f=x^3+16．下列语句正确的是________。

D) If x<1 Then f=x^3+1 Else A) If K<3*N And k>N Then N=k^3

F=x^31-B) If K<3*N And k>N Then N=k3

。执行下面的程序段后显示结果是3.________ C) If K<3*N : k>N Then N=k^3 Private Sub

Form_Click() D) If K<3*N And k>N Then N=k**3 Dim m ，则下列L=True，z=6.0，，7．设X=2.0y=8.0是的值为True中达BasicVisual 表式If m Then Print m Else Print m+1 。________ End Sub A)

X+Z>Y AND L．

B) NOT(YNOT L Private Sub Command1_Click()

For I=1 To 4 C) NOT L OR (L=Y+X=Z)

For J=0 To I D) Y+X>=Z+X AND (L AND FALSE) Print Chr(65+I); 2000元以上（含月收入在20008．要判断”的职元）”5000元）且元以下（不含5000 Next J ________。工，应使用的逻辑表达式是Print A) M>=2000 AND M<=5000

Next I B) M>=2000 OR M<=5000End Sub C) M>=2000 AND M<5000单击命令按钮后，运行结果________。D) M>=2000 OR M<5000A) BB B) A 9．下列程序段的执行结果为________。CCC BB -60)*Rnd+60)x=Int((69 DDDD CCC Select Case x EEEEE DDDD Case Is>90 牐湩? 优秀C) B D) AA Case 80 To 89

CC BBB 良好牐湩? DDD CCCC Case 60 To 79 EEEE DDDDD

牐湩?合格11．在窗体上画一个名称为Text1的文本框Case Else和一个名称为Command1的命令按钮，然后编写如下事件过程：不合格牐湩?

Private Sub Command1_Click()End Select

Dim i As Integer,n As Integer D) 合格C) 良好B) 优秀A) 不合格For i=0 To 50 ．在窗体上画一个命令按钮，名称为10。然后编写如下程序：运行结果Command1 i=i+3 ________。n=n+1 If i>10 Then Exit For

Next 13．阅读下面的程序段：

For i=1 To 3 Text1.Text=Str(n)

For j=1 To i End Sub

For k=j To 3 在文本框中显程序运行后，单击命令按钮，________。示的值是a=a+1

D) 5 A) 2B) 3 C) 4 Next k

然后编写如12．在窗体上画一个命令按钮，Next j 下事件过程：Next i Private Sub Command1_Click()执行上面的三重循环后，a的值为________。For i=1 To 4 D) 21 B) 9 C) 14A) 3 x=4属性．在窗体上画一个文本框（其Name14 For j=1 To 3 ），然后编写如下事件过程：为Text1 x=3 Private Sub Form_Load() For k=1 To 2 Text1.Text=\

x=x+6 Text1.SetFocus

Next k For i=1 To 10

Next j Sum=Sum+i

Next i Next i Print x Text1.Text=Sum End Sub End Sub程序运行后，单击命令按钮，输出结果是。上述程序的运行结果是________ 。________ 55 Text1A)在文本框中输出D) 538 C) 157 B) 15 A) 7 中输出0Text1B)在文本框

出错C)

sum=0# 在文本框Text1中输出不定值D)

For n=1 To 10 ．有如下程序：15 For k=1 To 4a=10

b=4 捳牯?湉異?硯尨请输入一门课的成绩) -2For j=1 To 20 Step

sum=sum+score a=a+5 Next k b=b+4ave=sum/4 Next j 牰湩屴第??个人的平均成绩

为：;ave Print a;bNext n 运行后，输出的结果是________。上述程序运行后结果不正确，调试中发现有B) 60 24 C) 110 44D) 55 40 A) 10 4一条语句出现在程序中的位置不正确。这条语句是________。16．有如下程序：A) sum=0# B) sum=sum+score d$=\C) ave=sum/4 D) 牰湩屴第??人的均分：②尽扡摣履;ave

- For i=Len(a) To 1 Step 118．下列程序的输出结果是________。d=d+Mid(a,i,1)Dim y As Integer Next i

y=10

Print d$While y<>0

运行后，输出的结果是________。y=y-1

D) ecadbC) acebdB) edcbaA) abcde

Wend

事件程序的功能是：17．Command1_Click在Print y= ; y 门课程的成绩。计名学生10按顺序读入4 算出每位学生的平均分并输出，程序如下： 1 随机值D) y=-C) y=B) y=1A) y=0

Dim n As Integer,k As Integer 。．以下程序的输出结果是19________As As score Dim Single,ave As Single,sun Dim m As Integer Single

m=1 Print m

While m<=3 Next n

Loop While m<50 m=m+1End Sub Print m;A) 4 B) 8 Wend C) 12 D) 16

A) 2 B) 2 3C) 2 3 4 D) 2 3 4 522．在窗体上画两个名称分别为Text1、Text2的文本框和一个名称为Command1的命令________。20．下面的程序运行结果是按钮，然后编写如下事件过程：Private Sub Form_Click()Private Sub Command1_Click()

m=0 Dim x As Integer,n As Integer

Do Until 0 x=1

m=m+1 n=0