更多"设窗体上有一个列表框控件List1，含有若干列表项。以下能表示当前被选"的相关试题:
[单项选择]设窗体上有一个列表框控件List1，含有若干列表项。下列能表示当前被选中的列表项内容的是( )
A. List1.List
B. List1.ListIndex
C. List1.Text
D. List1.Index
[单项选择]
设窗体上有一个名为List1的列表框，并编写下面的事件过程：
Private Sub List1_Click（ ）
Dim ch As String
ch=List1. List(List1. ListIndex)
List1. RemoveItem List 1. ListIndex
List1. AddItem ch
End Sub
程序运行时，单击一个列表项，则产生的结果是（）。
A. 该列表项被移到列表的最前面
B. 该列表项被删除
C. 该列表项被移到列表的最后面
D. 该列表项被删除后又在原位置插入
[填空题]窗体上有两个控件：一个是驱动器列表框Drive1，另一个是目录列表框Dir1，现在要使目录列表框跟随驱动器列表框的变化而变化，则需在Drive1_Change事件过程中填入语句 【7】 。
[单项选择]窗体上有一个命令按钮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
[填空题]在窗体上画一个驱动器列表框、一个目录列表框和一个文件列表框，其名称分别为Dhvel、 Dirl和File1。为了使它们同步操作，必须触发Drive1_Change（ ）事件和Dir1_Change（ ）事件，在这两个事件中执行的语句分别是 【8】 和 【9】 。
[单项选择]在窗体上画一个驱动器列表框、一个目录列表框和一个文件列表框，其名称分别为 Drive1、Dir1和File1。当改变目录列表框的内容时，要求文件列表框中显示当前选中的文件夹中的内容，则在Dir1_ Change事件过程中应使用的语句是______ 。
A. Dirve1.Drive=Dir1.Path
B. Dir1.Path=Drive1.Drive
C. Dir1.Path=File1.Path
D. File1.Path=Dir1.Path
[单项选择]窗体上有一个列表框和一个文本框，编写下列两个事件过程：
Private Sub Form Load（ ）
List1.Addltem"北京"
List1.Addltem"天津"
List1.Addltem"上海"
Text1.Text=""
End Sub
Private Sub List1 Click（ ）
Print Text1.Text+List1.Text
End Sub
程序运行后，在文本框中输入“中国”，然后单击列表框中的“北京”，则输出结果是( )。
A. 中国北京
B. 中国天津
C. 中国上海
D. 北京中国
[单项选择]设在窗体Form1上有一个列表框List1，其中有若干个项目。要求单击列表框中的某一项时，把该项显示在窗体上，正确的事件过程是( )
A. Private Sub List1_Click()
B. Private Sub Form1_Click()
C. Private Sub List1_Click()
D. Private Sub Form1_Click()
[单项选择]设在窗体Form1上有一个列表框List1，其中有若干个项目。要求单击列表框中某一项时，把该项显示在窗体上，正确的事件过程是______。
A. Private Sub Form1_Click()
B. Private Sub Forml_Click()
C. Private Sub List1_Click()
D. Private Sub List1_Click()
[单项选择]窗体上有一个列表框和一个文本框，编写如下两个事件过程：
Private Sub Form_Load（ ）
List1.AddItem“Beijing"
List1.AddItem "Tianjin"
List1.AddItem”Shanghai”
Text1.Text=“”
End Sub
Private Sub List1_Db1Click（ ）
x=List1.Text
Print x+Text1.Text
End Sub
程序运行后，在文本框中输入“China”，然后双击列表中的“Shanghai”，则输出结果为( )。
A. China Beijing
B. China Tianjing
C. China Shanghai
D. Shanghai China
[填空题]
窗体上有一个名称为List1的列表框，一个名称为Text1的文本框，一个名称为Labe11、
Caption属性为"Sum"的标签，一个名称为Command1、标题为“计算”的命令按钮。程序运行后，将把1～100之间能够被7整除的数添加到列表框中。如果单击“计算”按钮，则对List1中的数进行累加求和，并在文本框中显示计算结果，如下图所示。以下是实现上述功能的程序，请填空。
Pfivate Sub Form_Load（ ）
Fori=1 To 100
If iMod7=0 Then
[6]
End If
Next
End Sub
Private Sub
Commandl_Crick（ ）
Sum=0
Fori=0 To
List1.List Count-1或14
Sum=Sum+ [7]
Next
Textl:Text=Sum
End Sub
[填空题]窗体上有一个名称为List1的列表框，一个名称为Text1的文本框，一个名称为Label1、Caption属性为“Sum”的标签，一个名称为Command１、标题为“计算”的命令按钮。程序运行后，将把1～100之间能够被7整除的数添加到列表框中。如果单击“计算”按钮，则对 List１中的数进行累加求和，并在文本框中显示计算结果，如图所示。以下是实现上述功能的程序，请填空。[*]Private Sub Form_Load( )
For i=1 To 100
If i Mod 7=0 Then
【3】
End Ibf
Next End Sub Private Sub Command1_Click( )
Sum=0
For i=0 To 【4】
Sum=Sum+ 【5】
Next
Text1．Text=Sum
End Sub
