2. 计算机
  3. 在窗体上画一个列表框、一个命令按钮和一个标签。程序运行后，在列表框中选择一个项目，然后单击命令按钮，即可将所选择的项目删除，并在标签中显示列表框当前的项目数。 下面是实现上述功能的程序，请填空。 Private Sub Form_Load()

在窗体上画一个列表框、一个命令按钮和一个标签。程序运行后，在列表框中选择一个项目，然后单击命令按钮，即可将所选择的项目删除，并在标签中显示列表框当前的项目数。 下面是实现上述功能的程序，请填空。 Private Sub Form_Load()

admin2009-02-13  32
问题 在窗体上画一个列表框、一个命令按钮和一个标签。程序运行后，在列表框中选择一个项目，然后单击命令按钮，即可将所选择的项目删除，并在标签中显示列表框当前的项目数。
   下面是实现上述功能的程序，请填空。
   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=【  】
      If L1 ＞=0 Then
         List1.RemoveItem【  】
         Labell.Caption=【  】
   Else
         MsgBox("请选择要删除的项目")
      End If
   End Sub
选项
答案List1.ListIndex , L1 , List1.ListCount
解析 本题提供的程序包括两个事件过程，其中Form Load事件过程用来向列表框中添加项目，而Command1_Click事件过程删除列表框中被选择的项目，并在标签中显示列表框当前的项目数，需要填空的代码在这个事件过程中。为了删除列表框中指定的项目，可以使用RemoveItem方法，其格式为：列表框名称．RemoveItem  索引值
  其中的“索引值”是项目的地址，列表框中的项目从0开始计数，被选择的项目索引值就是列表框的ListIndex属性。为了删除列表框中被选择的项目，必须先确定该项目的索引值，即列表框的 ListIndex属性，然后就可以用RemoveItem方法将其删除。本题中的第1个空是被选择的项目索引值，应为List1.ListIndex，并将它赋给变量L1；第2个空是RemoveItem方法的参数，即“索引值”，由于该值已保存在变量u中，因此应填入 L1第3个空是列表框中当前的项目数，它就是列表框的ListCount属性。
转载请注明原文地址:https://jikaoti.com/ti/kTq0FFFM
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)