[单选题] Private Sub Command1_Click()
  x = 0
  Do While x < 50
    x = (x + 2) * (x + 3)
    n = n + 1
  Loop
  Text1.Text = Str(n)
  Text2.Text = Str(x)
End Sub
程序运行后，单击Command1按钮，在两个文本框中显示的值分别为（  ）。

1、[单选题]Private Sub Command1_Click()
    n = Text1.Text
    Select Case n
        Case 1 To 20
            x = 10
        Case 2, 4, 6
            x = 20
        Case Is < 10
            x = 30
        Case 10
            x = 40
    End Select
        Text2.Text = x
End Sub
程序运行后，如果在文本框Text1中输入10，然后单击命令按钮，则在Text2中显示的内容是（    ）。

• A、10
• B、20
• C、30
• D、40

• 点击查看答案
• 进入题库做题

2、[单选题]Private Sub Command1_Click()
  Dim i As Integer, n As Integer
  For i = 0 To 50
      i = i + 3
      n = n + 1
      If i > 10 Then Exit For
  Next i
  Text1.Text = Str(n)
End Sub
程序运行后，单击命令按钮，在文本框中显示的值是（    ）。

• A、2
• B、3
• C、4
• D、5

• 点击查看答案
• 进入题库做题

3、[单选题]Private Sub Command1_Click()
    Static x As Integer
    Static y As Integer
    Cls
    y = 1
    y = y + 5
    x = 5 + x
    Print x, y
End Sub
程序运行后，单击命令按钮Command1三次后，窗体上显示的结果为（      ）。

• A、15  16
• B、15  6
• C、15  15
• D、5  6

• 点击查看答案
• 进入题库做题

4、[判断题]Image控件和Picture控件都可以用LoadPicture函数把图形文件装入控件中。（ ）

• 点击查看答案
• 进入题库做题

5、[判断题]ADO模型中一般可通过Conection对象的Execute方法执行增加、删除、修改SQL语句。（ ）

• 点击查看答案
• 进入题库做题