纠错
全专业资料、题库、学位、网课
最高直省2344元
上千+科次精品网课
买网课即送全真模考题库
五千+科次教材资料
电子资料满三件9折
五千+科次在线题库
全真呈现历年考试试题
1、[单选题]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
程序运行后,单击命令按钮,在文本框中显示的值是( )。
2、[单选题]Private Sub Command1_Click()
Dim A(1 To 5) As Integer
Dim x As Integer
For i = 1 To 5
A(i) = i
Next i
i = 1
Do While x < 2
A(i) = A(i) * x
x = x + 1
i = i + 1
Loop
Text1.Text = A(1)
Text2.Text = A(2)
End Sub
程序运行后,单击Command1后按钮,文件框Text1、Text2中的结果是( )。
3、[单选题]Private Sub Form_Click()
Dim i As Integer, k As Integer
Static c As Integer
For i = 1 To 6
If i Mod 2 = 0 Then
k = k + 2
Else
c = c + 3
End If
Next i
Print k, c
End Sub
程序运行后,连续两次单击窗体,在窗体上显示的值是( )。
4、[单选题]Private Sub Form_Click()
For i = 1 To 10 Step 2
y = y + i
Next i
Print i
End Sub
程序运行后,单击窗体,在窗体上显示的值是( )。
5、[判断题]ADO模型中一般可通过Conection对象的Execute方法执行增加、删除、修改SQL语句。( )
Copyright © 2010 - 2023 湖南求实创新教育科技有限公司 All Right Reserved.
温馨提示:如您需要的资料本网暂时没有,请于工作日08:00-18:00,点击这里,联系客服及时补充资料。