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

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

admin2010-03-30  39
问题 在窗体上画一个列表框、一个命令按钮和一个标签。程序运行后，在列表框中选择一个项目，然后单击命令按钮，即可将所选择的项目删除，并在标签中显示列表框当前的项目数，下面是实现上述功能的程序，请填空。
   Private Sub Form_Load()
        List1.AddItem"AAAAA"
        List1.AddItem"BBBBB"
        List1.AddItem"CCCCC"
        List1.AddItem"DDDDD"
   End Sub
   Private Sub Commandl Click()
        Dim L As Integer
        L＝【  】
        If L＞=0 Then
            List1.RemoveItem【  】
            Label1.Caption＝【  】
        Else
            MsgBox"请选择要删除的项目"
        End If
   End Sub
选项
答案List1.ListIndex , L , List.ListCount
解析 属性ListIndex表示在程序运行时，选中列表项在列表中的编号，如选中第一项，其值为0，选中第二项，其值为1。列表框的方法有：AddItem方法、RemoveItem方法和 Clear方法。其中RemoveItem方法表示从列表框中删除项目。格式为：
   列表框名. RemoveItem序号
   其中序号是要删除项目的顺序号。
   分析题意可知[9]处应是一个序号，题中设置的整型变量L就是用来存放列表编号的，故[8]处应填List1. Listlndex。同时，删除项目格式中的序号应为L。属性ListCount用来记录列表框中的列表项目数。题中要求标签中显示列表框当前的项目数，故把List1.ListCount的值赋给标签的Caption属性即可实现此功能。
转载请注明原文地址:https://kaotiyun.com/show/Aomp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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