当前位置: X题卡 > 所有题目 > 题目详情

设在窗体中有一个名称为List1的列表框,其中有若干个项目(如图)。要求选中某一项后单击Command1按钮,就删除选中的项,则正确的事件过程是______。

查看本题答案

你可能感兴趣的试题

Private Sub Command1_Click()  List1.Clear  End Sub  Private Sub Command1_Click()  List1.Clear List1.ListIndex  End Sub  Private Sub Command1_Click()  List1.Removeltem List1.ListIndex  End Sub  Private Sub Command1_Click()  List1.Removeltem  End Sub  
Private Sub List1_Click( )
Label1.Caption=List1.List1ndex
End Sub  
Private Sub List1_Click( )
Label1.Name=List1.List1ndex
End Sub  
Private Sub List1_Click( )
Label1.Name=List1.Text
End Sub  
PrivateSubList1_Click( )
Label1.Caption=List1.Text
End Sub  
Private Sub List1_Click()
Label1. Caption=List1. List1ndex
End Sub  
Private Sub List1_Click()
Label1. Name=List1. ListIndex
End Sub  
Private Sub List1_Click()
Label1. Name=List1. Text
End Sub  
Private Sub List1_Click()
Label1. Caption=List1. Text
End Sub  
For i=0 To List1.ListCount-1  ……  Next  For i=0 To ListCount-1  ……  Next  For i=1 To List1.listCount  ……  Next  For i=1 To ListCount  ……  Next  
PriVate Sub List1_Click()
Labell.CaptiOn=List.ListIndex
End Sub  
PriVate Sub List1_Click()
Labell.Name=listl.ListIndex
End Sub  
Private Sub List1_Click()
Labell.Name=Listl.Text
End Sub  
Private Sub List1_Click()
Labell.Caption=List1.Text
End Sub  
For i=0 To List1.ListCount-1   ……   Next  For i=0 To ListCount-1    ……   Next  For i=1 To List1.listCount   ……   Next  For i=1 To ListCount   ……   Next  
Private Sub Form1_Click()  Print List1.Text  End Sub  Private Sub Forml_Click()  List1.Print List1.Text  End Sub  Private Sub List1_Click()  Print List1.Text  End Sub  Private Sub List1_Click()  Print Form1.Text  End Sub  
Private Sub List1_Click() Label1.Caption=List1.ListIndex End Sub  Private Sub List1 Click() Label1.Name=List1.ListIndex End Sub  Private Sub List1_Click() Label1.Name=List1.Text End Sub  Private Sub List1_Click() Label1.Caption=List1.Text End Sub  
Private Sub List1_Click() Label1. Caption=List1. List1ndex End Sub  Private Sub List1_Click() Label1. Name=List1. ListIndex End Sub  Private Sub List1_Click() Label1. Name=List1. Text End Sub  Private Sub List1_Click() Label1. Caption=List1. Text End Sub  
Private Sub List1_Click()  Print List1.Text  End Sub  Private Sub Form1_Click()  Print List1.Text  End Sub  Private Sub List1_Click()  Print Form1.Text  End Sub  Private Sub Form1_Click()  List1.Print List1.Text  End Sub  
PriVate Sub List1_Click() LabelCaptiOn=LisListIndex End Sub  PriVate Sub List1_Click() LabelName=listListIndex End Sub  Private Sub List1_Click() LabelName=ListText End Sub  Private Sub List1_Click() LabelCaption=List1.Text End Sub  
List1. RemoveItem List1. Text  List1. RemoveItem List1. Clear  List1. RemoveItem List1. ListCount  List1. RemoveItem List1. ListIndex  
Private Sub Command1_Click()  List1 Clear  End Sub  Private Sub Command1_Click()  List1.Clear List1.List1ndex  End Sub  Private Sub Command1_Click()  List1.RemoveItem List1.List1ndex  End Sub  Private Sub Command1_Click()  List1.RemoveItem  End Sub  
Private Sub List1_Click( ) Label1.Caption=List1.List1ndex End Sub  Private Sub List1_Click( ) Label1.Name=List1.List1ndex End Sub  Private Sub List1_Click( ) Label1.Name=List1.Text End Sub  PrivateSubList1_Click( ) Label1.Caption=List1.Text End Sub  
For i=0 To List1.ListCount-1 …… Next  For i=0 To List1.Count-1 …… Next  For i=1 To List1.ListCount …… Next  For i=1 To List1.Count-1 …… Next  
Private Sub List1_Click() Label1.Caption = List1.ListIndex End Sub  Private Sub List1_Click() Label1.Name=List1.Lis tIndex End Sub  Private Sub List1_Click() Label1.Name=List1.Text End Sub  Private Sub List1_Click() Label1.Caption =List1.Text End Sub  
Private Sub List1_Click() LabelCaption=List1.ListIndex End Sub  Private Sub List1_Click() LabelName=List1.ListIndex End Sub  Private Sub List1_Click() LabelName=List1.Text End Sub  Private Sub List1_Click() Label Caption=List1.Text End Sub  
Private Sub List1 Click() Label1.Caption=List1.List- Index End Sub  Private Sub List1_Click() Label1.Name=List1. ListIn- dex End Sub  Private Sub List1 Click() Label1.Name=List1.Text End Sub  Private Sub List1_Click() Label1.Caption=List1.Text End Sub  

热门试题

更多