在窗体上画一个列表框、一个命令按钮和一个标签，其名称分别为Listl、Commandl和 Labell，通过属性窗口把列表框中的项目设置为：“第一个项目”、“第二个项目”、“第三个项目”、“第四个项目”。程序运行后，在列表框中选择一个项目，然后单击命令按钮，即可将所选择的项目删除，并在标签中显示列表框当前的项目数，运行情况如下图所示(选择“第三个项目”的情况)。下面是实现上述功能的程序，请填空。Private Sub Commandl Click()If Listl.ListIndex＞=______ThenListl.RemoveItem ______Labell.Caption=______ElseMsgBox “请选择要删除的项目”End IfEnd Sub
在窗体上画一个列表框、一个命令按钮和一个标签，其名称分别为Listl、Commandl和 Labell，通过属性窗口把列表框中的项目设置为：“第一个项目”、“第二个项目”、“第三个项目”、“第四个项目”。程序运行后，在列表框中选择一个项目，然后单击命令按钮，即可将所选择的项目删除，并在标签中显示列表框当前的项目数，运行情况如下图所示(选择“第三个项目”的情况)。下面是实现上述功能的程序，请填空。
Private Sub Commandl Click()
If Listl.ListIndex＞=______Then
Listl.RemoveItem ______
Labell.Caption=______
Else
MsgBox “请选择要删除的项目”
End If
End Sub
相关考题：
在窗体上画一个名称为Listl酌列表框，一个名称为Labell的标签，列表框中显示若干个项目。当单击列表框中的某个项目时，在标签中显示被选中项目的名称。下列能正确实现上述操作的程序是：______。A． Private Sub Listl_Click() Labell.Caption=Listl.ListIndex End SubB．Private Sub Listl_Click() Labell.Name=Listl.ListIndex End SubC．Private Sub Listl_click() Labell.Name=Listl.Text End SubD．Private Sub Listl_Click() Labell.Caption=Listl.Text End Sub
在窗体上绘制一个名称为List1的列表框，一个名称为Label1的标签，列表框中显示若干个项目。当单击列表框中的某个项目时，在标签中显示被选中的项目的名称。下列能正确实现上述操作的程序是 。A．Private Sub List1_Click()Labell.Caption=List.ListIndex End SubB．Private Sub List1_Click()Labell.Name=List1.ListIndex End SubC．Private Sub List1_Click()Labell.Name=List1.Text End SubD．Private Sub List1_Click()Labell.Caption=List.Text End Sub
在窗体上画一个名称为Listl的列表框，一个名称为Labell的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时，在标签中显示选中城市的名称。下列能正确实现上述功能的程序是______。A．Private Sub Listl_Click() Labell.Capfion=Listl.Listlndex End SubB．PrivateSubLial click() Labell.Name=Listl.Listlndex End SubC．PrivateSubListl click() Labell.Name=Listl.Text End SubD．Private Sub Listl_Click() Labell.Caption=Listl.Text End Sub
往窗体Form1上添加一个列表框控件List1，并编写如下代码： Private Sub Form_Load() For i=0T06 Listl.AddItem i Next i End Sub 为了在程序运行时，按住Ctrl键单击列表中的项目可以选中多个项目，可以设置Listl的属性______。A．Lial.ListB．Listl.ListlndexC．Listl.MultiSelectD．Listl.Text
在名称为Form1的窗体上画一个名称为Text1的文本框，通过属性窗口设置文本框属性，在文本框中显示“AAAA”(如图2—1所示)；再建立一个名称为Cmd1，标题为“清除”的命令按钮，编写适当的事件过程。要求程序运行后，如果单击“清除”命令按钮，则清除文本框中所显示的信息。注意：保存时必须存放在考生文件夹下，窗体文件名为sjt3.frm，工程文件名为sit3.vbp。2．在考生文件夹中有工程文件sit4.vbp，它包含一个窗体文件form1。在窗体上有一个列表框，名称为List1，一个文本框，名称为Text1，和一个命令按钮，名称为Command1，标题为“复制”。要求程序运行后，在列表框中自动建立四个列表项，分别为“项目1”、“项目2”、“项目3”、“项目4”。如果选择列表框中的一项，则单击“复制”按钮时，可以把该项复制到文本框中(程序运行结果如图2—2)。要求：编写程序，以实现试题要求的功能。注意：存盘时必须放在考生文件夹下，工程文件名为sjt4.vbp，窗体文件名为sjt4.frm。
在窗体上绘制一个名称为List1的列表框，一个名称为Labe11的标签，列表框中显示若干个项目。当单击列表框中的某个项目时，在标签中显示被选中项目的名称。下列能正确实现上述操作的程序是A．PriVate Sub List1_Click() Labell.CaptiOn=List.ListIndex End SubB．PriVate Sub List1_Click() Labell.Name=listl.ListIndex End SubC．Private Sub List1_Click() Labell.Name=Listl.Text End SubD．Private Sub List1_Click() Labell.Caption=List1.Text End Sub
在窗体上画一个列表框和一个命令按钮，其名称分别为Listl和Commandl，然后编写如下事件过程 Private Sub Form_Load() Listl.Addltem"Iteml" Listl.Addltem"Item2" Listl.Addltem"Item3" End Sub Private Sub Commandl_Click() Listl.List(Listl.ListCount)="AAAA" End Sub 程序运行后，单击命令按钮，其结果为______。A． 把字符串“AAAA”添加到列表框中，但位置不能确定B．把字符串“AAAA”添加到列表框的最后(即“Item3”的后面)C．把列表框中原有的最后一项改为“A从A”D．把字符串“AAAA”插入到列表框的最前面(即“Iteml”的前面)
在窗体上画一个名称为Lablel的标签和一个名称为Listl的列表框。程序运行后，在列表框中添加若干列表项。当双击列表框中的某个项目时，在标签Labell中显示所选中的项目，如图所示。请在______处填入适当的内容，将程序补充完整。Private Sub Form. load()Listl.AddItem “北京”List1.AddItem “上海”List1.AddItem “河北”End SubPrivate Sub ______()Labell.Caption=______End Sub
在窗体上画一个名称为Labell的标签和一个名称为Listl的列表框。程序运行后，在列表框中添加若干列表项。当双击列表框中的某个项目时，在标签Label中显示所选中的项目，如下图所示。请在______和______处填入适当的内容，将程序补充完整。Private Sub Form_Load()List1.AddItem "北京"List1.AddItem "上海"List1.AddItem "河北"End SubPrivate Sub List ______()LabeCaption = ______End Sub