网友您好, 请在下方输入框内输入要搜索的题目:

题目内容 (请给出正确答案)

在窗体上画一个列表框、一个命令按钮和一个标签,其名称分别为Listl、Commandl和 Labell,通过属性窗口把列表框中的项目设置为:“第一个项目”、“第二个项目”、“第三个项目”、“第四个项目”。程序运行后,在列表框中选择一个项目,然后单击命令按钮,即可将所选择的项目删除,并在标签中显示列表框当前的项目数,运行情况如下图所示(选择“第三个项目”的情况)。下面是实现上述功能的程序,请填空。

Private Sub Commandl Click()

If Listl.ListIndex>=______Then

Listl.RemoveItem ______

Labell.Caption=______

Else

MsgBox “请选择要删除的项目”

End If

End Sub


参考答案

更多 “ 在窗体上画一个列表框、一个命令按钮和一个标签,其名称分别为Listl、Commandl和 Labell,通过属性窗口把列表框中的项目设置为:“第一个项目”、“第二个项目”、“第三个项目”、“第四个项目”。程序运行后,在列表框中选择一个项目,然后单击命令按钮,即可将所选择的项目删除,并在标签中显示列表框当前的项目数,运行情况如下图所示(选择“第三个项目”的情况)。下面是实现上述功能的程序,请填空。Private Sub Commandl Click()If Listl.ListIndex>=______ThenListl.RemoveItem ______Labell.Caption=______ElseMsgBox “请选择要删除的项目”End IfEnd 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