二级VISUAL BASIC-79
(总分100, 做题时间90分钟)
选择题
1. 
窗体上有名称为List1的列表框。以下能够将列表框当前选定的列表项替换为字符串“Basic”的语句是
A List1.AddItem"Basic"
B List1.List(List1.ListIndex)="Basic"
C List1.Text="Basic"
D 以上都可以
2. 
要想不使用Shift或Ctrl键就能在列表框中国时选择多个项目，则应把该列表框的MultiSelect属性设置为
A 0-None
B 1-Simple
C 2-Extended
D 3
3. 
visual basic还有人用
如果在列表框List1中没有选中项目，则List1.ListIndex的值为
A -1
B 0
C 1
D 2
4. 
设Label1、Command1、Text1、Check1分别为标签、命令按钮、文本框、复选框的名称，则以下属性设置语句中，运行时不会出错的是
A Label1.BackStyle=2
B Command1.Style=1
C Text1.ScrollBars=4
D Check1.Value=2
5. 
下列不包含滚动条的控件是
A 列表框
B 标签
C 组合框
D 文本框
6. 
为了删除列表框中的一个列表项，应使用的列表框方法是
A Move
B Remove
C Clear
D RemoveItem
7. 
以下不能设置Picture属性的控件是
A 窗体
B 列表框
C 复选框
D 命令按钮
8. 
设窗体上有1个名称为List1的列表框，程序运行时，如果选中了第3个列表项(最上面的列表项为第0个列表项)，则下面不成立的是
A List1.Selected(List1.ListIndex)的值为True
B List1.Selected(3)的值为True
C List1.List(3)的值为True
D List1.ListIndex的值为3
9. 
下列控件中，不响应Click事件的是
A 框架
B 标签
C 图像框
D 形状
10. 
设窗体上有一个名称为Check1的复选框，并有下面程序代码：
Private Sub Check1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
Check1.Value=1
End Sub
根据上面的事件过程，可以得出结论
A 鼠标单击该复选框，复选框的标题被改为“1”
B 鼠标右键单击该复选框，可以选中该复选框
C 鼠标左键单击该复选框，它被选中，右键单击它，取消选中
D 鼠标右键单击该复选框，它被选中，左键单击它，取消选中
11. 
设窗体上有一个名称为List1的列表框，并有若干列表项。下面语句中不能在所有列表项之后追加一个列表项的是
A List1.List(List1.ListCount)="VB程序"
B List1.List(List1.ListCount-1)="VB程序"
C List1.AddItem"VB程序"
D List1.AddItem"VB程序"，List1.ListCount
12. 
已知列表框控件List1中已放入若干表项，下列关于List1的叙述中错误的是
A 第一个表项的序号为0
B 没有选中任何一个表项时，ListIndex属性的值为-1
C 最后一个表项的序号为ListCount
D 可用MultiSelect属性设置是否可多选
13. 
判断复选框是否被选中的属性为
A Selected
B Checked
C Value
D Index
14. 
窗体上有1个名称为Label1的标签；1个名称为Listl，且含有若干表项的列表框。为了使得单击List1中某个表项时，在Label1中相应地显示该表项，应使用的程序代码为
A Private Sub List1_Click()Label1.Caption=List1.IndexEnd Sub
B Private Sub List1_Click()Label1.Caption=List1.ListCountEnd Sub
C Private Sub List1_Click()Label1.Caption=List1.TextEnd Sub
D Private Sub List1_Click()Label1.Caption=List1.SelectedEnd Sub
15. 
以下关于控件的叙述中，正确的是
A 列表框包含了组合框的全部功能
B 列表框兼有组合框和文本框的功能
C 列表框和组合框具有完全不同的功能
D 组合框兼有列表框和文本框的功能
16. 
判断单选按钮是否被选中的属性为
A Selected
B Checked
C Value
D Index
17. 
窗体上有名称为Command1的命令按钮，名称分别为List1、List2的列表框，其中List1的MultiSelect属性设置为1(Simple)，并有如下事件过程：
Private Sub Command1_Click()
For i=0 To List1.ListCount-1
If List1.Selected(i)=True Then
List2.AddItem Text
End If
Next
End Sub
上述事件过程的功能是将List1中被选中的列表项添加到List2中。运行程序时，发现不能达到预期目的，应做修改，下列修改中正确的是
A 将For循环的终值改为List1.ListCount
B 将List1.Selected(i)=True改为List1.List(i).Selected=True
C 将List2.AddItem Text改为List2.AddItern List1.List(i)
D 将List2.AddItem Text改为List2.AddItem List1.ListIndex
18. 
窗体上有一个名为List1的列表框和一个名为Command1的命令按钮，并有下面的事件过程：
Private Sub Command1_Click()
n%=List1.ListIndex
If n＞0 Then
ch$=List1.List(n)
List1.List(n)=List1.List(n-1):List1.List(n-1)=ch
End If
End Sub
程序运行时，选中1个列表项，然后单击Command1按钮，则产生的结果是