[单选题]

在窗体上有一个名称为List1列表框和一个名称为Command1的按钮,List1的MultiSelect属性设置为2。当单击Command1按钮时,将会把所有选中的选项全部删除。下列程序缺少的一句是______。Private Sub Command1_ Click () for i = List1. ListCount- 1 To 0 Step- 1 if ______ = True then List1. RemoveItem i End if Next iEnd Sub

A.List1.Select(i)

B.List1.Sort(i)

C.List1.List(i)

D.Ltst1.Select(List1.Listindex)

参考答案与解析:

相关试题

窗体上有一个命令按钮Command1和一个列表框List1,其中List1有0、

[单选题]窗体上有一个命令按钮Command1和一个列表框List1,其中List1有0、1、2、3、4的内容,有下列程序: Private Sub Command1_Click() Dim i,s For i=0 To List1.ListCount s=s+List1.List(i) Next i Print s End Sub 程序运行后,单击命令按钮,则窗体上显示的是A.0B.10C.01234D.程序出错

  • 查看答案
  • ( 21 ) 在窗体上画一个名称为List1 的列表框,一个名称为 Label1

    [单选题]( 21 ) 在窗体上画一个名称为List1 的列表框,一个名称为 Label1 的标签,列表框中显示若干城市的名称 。 当单击列表框中的某个城市名时 , 该城市名从列表框中消失 , 并在标签中显示出来 。 下列能正确实现上述操作的程序是A. ) Private Sub List1_Click()Label1.Caption = List1.ListIndexList1.RemoveItem List1.TextE.nd SubB. ) Private Sub List1_Click()Labe

  • 查看答案
  • 在窗体上画一个列表框和一个命令按钮,其名称分别为List1和Command1,然

    [单选题]在窗体上画一个列表框和一个命令按钮,其名称分别为List1和Command1,然后编写如下事件过程:Private Sub Form_Load()List1.AddItem "Item 1"List1.AddItem "Item 2"List1.AddItem "Item 3"E.nd SubPrivate Sub Command1_Click()List1.List(List1.ListCount) = "AAAA"E.nd Sub程序运行后,单击命令按钮,其结果为( )。A.

  • 查看答案
  • 在窗体上画一个列表框和一个命令按钮,其名称分别为List1和Command1,然

    [单选题]在窗体上画一个列表框和一个命令按钮,其名称分别为List1和Command1,然后编写如下事件过程:PrivateSub Form_Load()List1.AddItem "Item1"List1.AddItem "Item2"List1.AddItem "Item3"E.nd SubPrivate Sub Command1_Click()List1.List(List1.Listcount) ="AAAA"E.nd Sub程序运行后,单击命令按钮,其结果为A.把字符串"AAA

  • 查看答案
  • 在窗体上画一个列表框和一个命令按钮,其名称分别为List1和Command1,然

    [单选题]在窗体上画一个列表框和一个命令按钮,其名称分别为List1和Command1,然后编写如下事件过程。Private Sub Form_load()List1.AddItem "Itern 1"List1.AddItem "Itern 2"List1.AddItem "Itern 3"E.nd SubPrivate Sub Command1_Click()List1.List(List1.Listcount)="AAAA"E.nd Sub程序运行后,单击命令按钮,其结果为A.把字符

  • 查看答案
  • 在窗体上画一个列表框和一个命令按钮,其名称分别为List1和Command1,然

    [单选题]在窗体上画一个列表框和一个命令按钮,其名称分别为List1和Command1,然后编写如下事件过程 Private Sub Form_Load() List1.Addltem"Iteml" List1.Addltem"Item2" List1.Addltem"Item3" End Sub Private Sub Command1_click() List1.List(List1.ListCount)="AAAA" End Sub 程序运行后,单击命令按钮,其结果为______。A

  • 查看答案
  • 在窗体上画一个列表框和一个命令按钮,其名称分别为List1和Command1,然

    [单选题]在窗体上画一个列表框和一个命令按钮,其名称分别为List1和Command1,然后编写如下事件过程。 Private Sub Form_Load() List1.AddItem "Item 1" List1.AddItem "Item 2" List1.AddItem "Item 3" End Sub Private Sub Command1_Click() List1.List(List1.Listcount)="AAAA" End Sub 程序运行后,单击命令按钮,其结果为A

  • 查看答案
  • 在窗体上绘制一个名称为List1的列表框,一个名称为Label1的标签,列表框中

    [单选题]在窗体上绘制一个名称为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()La

  • 查看答案
  • 在窗体上画一个名称为List1的列表框,一个名称为Labell的标签,在列表框中

    [单选题]在窗体上画一个名称为List1的列表框,一个名称为Labell的标签,在列表框中显示若干项内容。当单击列表框中的某项内容时,该项内容能在标签中显示出来。下列能够正确实现上述功能的程序是A.Private Sub List1_Click() Labell.Caption=List1.ListIndex End SubB.Private Sub List1_Click() Labell.Name=List1.ListIndex End SubC.PrivateSubListl click() Lab

  • 查看答案
  • 在窗体上画一个名称为List1的列表框,一个名称为Labell的标签。列表框中显

    [单选题]在窗体上画一个名称为List1的列表框,一个名称为Labell的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时,在标签中显示选中城市的名称。 下列能正确实现上述功能的程序是 ______。A.Private Sub List1_Click() Label1.Caption=List1.ListIndex End SubB.Private Sub List1_click() Label1.Name=List1.ListIndex End SubC.Private Sub List1

  • 查看答案
  • 在窗体上有一个名称为List1列表框和一个名称为Command1的按钮,List