更多"窗体上有一个按钮和一个列表框(Sorted属性为True)，执行下列过"的相关试题:
[单项选择]窗体上有一个命令按钮Command1和一个列表框List1。先选择列表框中的某一个项目，然后单击命令按钮，将该项目从列表框中删除。程序如下：
Privat Sub Command1_Click（ ）
Dim In As Intger
In=______
List.Remove In
End Sub
则在程序的空白处的语句是( )
A. List1.Index
B. List1.ListIndex
C. List1.Text
D. List1.ListCount
[单项选择]窗体上有一个命令按钮Command1和一个列表框List1，其中List1有0、1、2、3、4内容，有下列程序：
Private Sub Command1_Click(
)
Dim i， s
For i = 0 To List1.ListCount
s = s + List1.List(i)
Next i
Print s
End Sub
程序运行后，单击命令按钮，则窗体上显示的是________。
A. 0
B. 10
C. 01234
D. 程序出错
[单项选择]窗体上有一个命令按钮Command1和一个列表框List1，其中List1有0、1、2、3、4的内容，有下列程序：
Private Sub Command1_Click（ ）
Dim i，s
For i=0 To List1．ListCount
s=s+List1．List(i)
Next i
Print s
End Sub
程序运行后，单击命令按钮，则窗体上显示的是
A. 0
B. 10
C. 01234
D. 程序出错
[单项选择]在窗体上画一个列表框、一个文本框和一个按钮，然后编写如下事件过程：
Private Sub Form_Load（ ）
List.AddItem“357”
List.AddItem“246”
List.AddItem”123”
List.AddItem”456”
TEXT1.Text="
End Sub
Private Sub Command1_C1ick（ ）
List.Listindex=3
Print List.Text+Text1.Text
End Sub
程序运行后，在文本框中输入“789”，然后双击列表框中“456”，则输出结果为( )。
A. 789123
B. 456789
C. 789456
D. 12345
[填空题]在窗体上画一个列表框、一个命令按钮和一个标签。程序运行后，在列表框中选择一个项目，然后单击命令按钮，即可将所选择的项目删除，并在标签中显示列表框当前的项目数。
下面是实现上述功能的程序，请填空。
Private Sub Form_Load（ ）
List1.AddItem "AAAAA"
List1.AddItem "BBBBB"
List1.AddItem "CCCCC"
List1.AddItem "DDDDD"
End Sub
Private Sub Command1_Click（ ）
Dim L1 As Integer
L1= 【12】
If L1 ＞=0 Then
List1.RemoveItem 【13】
Labell.Caption= 【14】
Else
MsgBox("请选择要删除的项目")
End If
End Sub
[单项选择]在窗体上画一个列表框、一个文本框及一个按钮，然后编写如下两个事件过程。
Private Sub Form_Load（ ）
List.Addltem"357"
List.Addltem"246"
List.Addltem"123"
List.Addltem"456"
Text1.Text=""
End Sub
Private Sub Command1_C/ick（ ）
List. ListIndex=3
Print List.Text+Text1.Text
End Sub
程序运行后，在文本框中输入“789”，然后双列表框中的“456”，则输出结果为______。
A. 789123
B. 456789
C. 789456
D. 1245
[单项选择]在窗体上有一个名称为List1列表框和一个名称为Command1的按钮，List1的MultiSelect属性设置为2。当单击Command1按钮时，将会把所有选中的选项全部删除。下列程序缺少的一句是______。Private Sub Command1_ Click （ ） for i = List1. ListCount- 1 To 0 Step- 1 if ______ = True then List1. RemoveItem i End if Next iEnd Sub
A. List1.Select(
B. List1.Sort(
C. List1.List(
D. Ltst1.Select(List1.Listinde
[单项选择]在窗体．上画一个列表框、一个文本框及一个按钮，然后编写如下事件过程： Prirate Sub Form_Loab（ ） List.Addltem"357" Llst.Addltem"246" List.Addltem"123" List.Addltem"456" TEXTl.Text="" End ub Private Sub Commandl_Click（ ） List.LiSdndex=3 Print List.Text+Textl.Text End Sub 程序运行后，在文本框中输入“789”，然后双列表框中的“456”，则输出结果为 ( )。
A. 789123
B. 456789
C. 789456
D. 1245
[单项选择]在窗体上有一个名称为List1的列表框和一个名称为Command1的命令按钮，并编写有如下事件过程：
Private Sub Form_Load（ ）
List1.AddItem "Item1":List1.AddItem"Item2":List1.AddItem"Item3"
End Sub
Private Sub Command1_Click（ ）
List1.List(List1.ListCount)="New Item"
End Sub
程序执行时，单击命令按钮，其结果为( )。
A. 把字符串“New Item”添加到列表框中，但位置不能确定
B. 把列表框中原有的最后一项改为“New Item”
C. 把字符串“New Item”添加到列表框的最后(即“Item3”的后面)
D. 把字符串“New Item”插入到列表框的最前面(即“Item1”的前面)
[填空题]窗体上有两个控件：一个是驱动器列表框Drive1，另一个是目录列表框Dir1，现在要使目录列表框跟随驱动器列表框的变化而变化，则需在Drive1_Change事件过程中填入语句 【7】 。
