VB控制结构.doc

文档介绍：1 在窗体上画一个命令按钮,然后编写如下事件过程:
Private mand1_Click()
   x=0
   Do Until x=-1
      a=InputBox("请输入A的值")
      a=val(a)
      b=InputBox("请输入B的值")
      b=Val(b)
      x=InputBox("请输入x的值")
      x=val(x)
      a=a+b+x
   Loop
   Print a
End Sub
程序运行后,单击命令按钮,依次在输入对话框中输入5、4、3、2、1、-1,输出结果为
A) 2          B) 3        C) 14        D) 15  
2 以下能够正确计算n!的程序是 
A) Private mandl_ClicK()
  n=5:x=1
  Do
    X=x*i
    i=i十1
  Loop While i<n
  Print x
  End Sub
B) Private mandl_Click()
  n=5: x=1:i=1
  Do
    X=X*i
    i=i十1
  Loop While i<n
  Print x
  End Sub 
C) Private mandl_Click() 
  n=5:x=1:i=1
  Do
    X=X*i
    i=i十1 
  Loop while i<=n 
  Print x 
  End Sub
D) Private mandl_C1ick()
  n=5:x=1:i=1
  Do
    X=X*i
    i=i十1
  loop While i>n
  Print x
  End Sub
3 mandl的命令按钮,一个名称为Labell的标签,然后编写如下事件过程:
Private mandl_C1ick()
    s = 0
       For i = 1 To 15
    x = 2 * i - 1
           If x Mod 3 = 0 Then s = s + 1
       Next i
   =s
End Sub
程序运行后,单击命令按钮,则标签中显示的内容是
A) 1        B) 5       C) 27        D) 45
4 在窗体上画一个命令按钮,mand1。然后编写如下程序:
Private mand1_Click()
  For I=1 To 4
      For J=0 To i
          Print Chr$(65+I);
         Next J
     Print
  Next I
  End Sub
程序运行后,如果单击命令按钮,则在窗体上显示的内容是
A) BB           B) A           C) B            D) AA