1、能够获得一个文本框中被选取文本的内容的属性是______。
A：SelStart
B：SelLength
C：SelText
D：Text
参考答案：C
2、在窗体上画一个文本框，其名称为Text1，为了在程序运行后隐藏该文本框，应当使用的语句为：______。
A：Text1.Enabled = False
B：Text1.Hide
C：Text1.Clear
D：Text1.Visible = False
参考答案：D
3、对于语句If x=1 Then y=1, 下列说法正确的是____。
A：x=1和y=1 均为赋值语句
B：x=1和y=1 均为关系表达式
C：x=1为赋值语句，y=1为关系表达式
D：x=1为关系表达式，y=1 为赋值语句
参考答案：D
4、以下变量名中，______是不符合Visual Basic的命名规范的。
A：_mnu_Open_234
B：Abc901
C：price_
D：K
参考答案：A
5、MsgBox 函数返回值的类型是__________。
A：数值或字符串
B：字符串
C：变体
D：整型数值
参考答案：D
6、VB一共有设计、运行和中断三种模式，要使用调试工具应该______。
A：进入中断模式
B：进入运行模式
C：进入设计模式
D：不用进入任何模式
参考答案：A
7、设a=6，则执行
x=IIF(a>5,-1,0)
后，x的值为______。
A：-1
B：6
C：0
D：5
参考答案：A
8、可以同时删除字符前导和尾部空白的函数是______。A：Mid
B：Rtrim
C：Trim
D：Ltrim
参考答案：C
9、以下语句的输出结果是______。
Print Format$("32548.5","000,000.00")
A：32,548.5
B：32548.5
C：032,548.50
D：32,548.50
参考答案：C
10、设有如下声明：
Dim X As Integer
如果Sgn(X)的值为-1，则X的值是______。
A：等于0的整数
B：大于0的整数
C：整数
D：小于0的整数
参考答案：D
11、在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()
For i = 1 To 4
x = 4
For j = 1 To 3
x = 3
For k = 1 To 2
x = x + 6
Next k
Next j
Next i
Print x
End Sub
程序运行后，单击命令按钮，输出结果是______。
参考答案：15# 15 #15 #15
12、执行下面的程序段后，S的值为______。
s=5
For i=2.6 To 4.9 Step 0.6
s=s+1
Next i
参考答案：9
13、下列表达式有错误,正确的写法应该是______。
[(a+b)+c]/80-5÷(d+e)
参考答案：(a+b+c)/80-5/(d+e)#（a+b+c）/80-5/（d+e）
14、表示x 是5的倍数或是9的倍数的逻辑表达式为__________
参考答案：x Mod 5 = 0 Or x Mod 9 = 0#x Mod 9 = 0 Or x Mod 5 = 0
15、以下程序的功能是:从键盘上输入若干个数字，当输入负数时结束输入，统计出若干数字的平均值，输出结果。请填空。
Private Sub Form_click()
Dim x, y As Single
Dim z As Integer
x = InputBox("Enter a score")
Do while x>=0
y = y + x
z = z + 1
x = InputBox("Enter a score")
Loop
If z = 0 Then
z = 1
End If
y = ______
Print y
End Sub
参考答案：y/z
VB考试二
1、列表框中的列表项的数目可以通过以下哪个属性的值获得______。
A：ListIndex
B：ListCount
C：Count
D：Index
参考答案：B
2、在窗体上画一个名称为List1的列表框，一个名称为Label1的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时，在标签中显示选中城市的名称。下列能正确实现上述功能的程序是______。
A：Private Sub List1_Click()
Label1.Caption=List1.Text
End Sub
B：Private Sub List1_Click()
=List1.ListIndex
End Sub
C：Private Sub List1_Click()
=List1.Text
End Sub
D：Private Sub List1_Click()
Label1.Caption=List1.ListIndex
End Sub
参考答案：A
3、在列表框中当前被选中的列表项的序号是由下列哪个属性表示______。
A：Listindex
B：Index
C：List
D：Tabindex
参考答案：A
4、为了清除列表框中的所有内容，应使用的方法是：______。
A：Clear
B：Remove
C：RemoveItem
D：Cls
参考答案：A
5、在窗体上画一个名称为List1的列表框，为了对列表框中的每个项目都能进行处理，应使用的循环语句为______。
A：For i=1 To List1.ListCount
……
NEXT
B：For i=0 To List1.Count-1
……
NEXT
C：For i=0 To List1.ListCount-1
……
NEXT
D：For i=1 To List1.Count
……
NEXT
参考答案：C
6、设有如下程序：
Option Base 0
Private Sub Form_Click()
Dim a
Dim i As Integer
a = Array(1, 2, 3, 4, 5, 6, 7, 8, 9)
For i = 0 To 3
Print a(5 - i);
Next
End Sub
程序运行后，单击窗体，则在窗体上显示的是______。
A：6 5 4 3
B：5 4 3 2
C：4 3 2 1
D：7 6 5 4
参考答案：A
7、设执行以下程序段时依次输入1、3、5，执行结果为______。
Dim a(4) As Integer, b(4) As Integer
For K = 0 To 2
a(K + 1) = Val(InputBox("请输入数据"))
b(3 - K) = a(K + 1)
Next K
Print b(K)
A：0
B：3
C：5
D：1
参考答案：D
8、在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：Private Sub Command1_Click()
Dim i As Integer,j As Integer
Dim a(10,10) As Integer
For i=1 To 3
For j=1 To 3
百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，免费范文网，提供经典小说英语学习2010计算机等级考试二级VB预测题在线全文阅读。
相关推荐：