( 31 ) 窗体上有 List1 、 List2 两个列表框 , List1 中有若干列表项 ( 见图 ) , 并有下面的程序:Private Sub Comand1_Click ()For k=List1.ListCount-1 To 0 Step -1If List1.Selected ( k ) ThenList2.AddItem List1.List ( k )List1.RemoveItem kEnd IfNext kEnd Sub程序运行时,按照图示在 List1 中选中 2 个列表项,然后单击 Commandl 命令按钮,则产生的结果是A )在 List2 中插入了 “ 外语 ” 、 “ 物理 ” 两项B )在 List1 中删除了 “ 外语 ” 、 “ 物理 ” 两项C )同时产生 A )和 B )的结果D )把 List1 中最后 1 个列表项删除并插入到 List2 中
( 31 ) 窗体上有 List1 、 List2 两个列表框 , List1 中有若干列表项 ( 见图 ) , 并有下面的程
序:
Private Sub Comand1_Click ()
For k=List1.ListCount-1 To 0 Step -1
If List1.Selected ( k ) Then
List2.AddItem List1.List ( k )
List1.RemoveItem k
End If
Next k
End Sub
程序运行时,按照图示在 List1 中选中 2 个列表项,然后单击 Commandl 命令按钮,则产生的结果是
A )在 List2 中插入了 “ 外语 ” 、 “ 物理 ” 两项
B )在 List1 中删除了 “ 外语 ” 、 “ 物理 ” 两项
C )同时产生 A )和 B )的结果
D )把 List1 中最后 1 个列表项删除并插入到 List2 中
相关考题:
(18)设窗体上有一个列表框控件 List1,含有若干列表项。以下能表示当前被选中的列表项内容的是( )。A)List1.ListB)List1.ListIndexC)List1.TextD)List1.Index
(8)在程序的空白处填写适当的语句,完成下列功能:依次自动将列表框List2中所有列表项目移入列表框List1中,并将移入List1中的项目从List2中删除 Do While List2.ListCount _____________________ List2.RemoveItem 0 Loop
窗体卜有Listl、List2两个列表框,Listl中有若干列表项(见图),并有下面的程序:Private sub Commandl_Click()For k:Listl.ListCount_l To 0 step-1Tf Listl.Selected(k)ThenList 2.AddItern Listl.List(k)Listl.Removehem kEnd IfNext kEnd Sub程序运行时,按照图示在List1中选中2个列表项,然后单击Command1命令按钮,则产生的结果是A.在List2中插入了“外语”、“物理”两项B.在Listl中删除了“外语”、“物理”两项C.同时产生A)和B)的结果D.把Listl中最后1个列表项删除并插入到List2中
设窗体上有—列表框控件List1,且其中含有若干列表项。则以下能表示当前被选中的列表项内容的是A.List1.ListB.List1.List1ndexC.List1.IndexD.List1.Text
设窗体上有一个列表框控件List1,且其中含有若干列表项。则以下能表示当前被选中的列表项内容的是A.List1.ListB.List1.ListIndexC.List1.IndexD.List1.Text
设窗体上有一个列表框控件List1,且其中含有若干列表项,则以下能表示当前被选中的列表项内容的是 ______。A.List1.ListB.List1.ListIndexC.List1.IndexD.List1.Text
设窗体上有一个列表框控件List1,且其中含有若干列表项。则以下能够表示当前被选中的列表项内容的是______。A.List1. ListB.List1. ListIndexC.List1. IndexD.List1. Text
窗体上有List1、List2两个列表框,List1中有若干列表项(见图),并有下面的程序: Private Sub Command1_Click( ) For k=List1.ListCout-1 To 0 Step-1 If List1.Selected(k)Then List2.Addltem List1.List(k) List1.Removeltem k End If Next k End Sub程序运行时,按照图示在List1中选中2个列表项,然后单击Command1命令按钮,则产生的结果是( )。A.在List2中插入了“外语”、“物理”两项B.在List1中删除了“外语”、“物理”两项C.同时产生A和B的结果D.把List1巾最后1个列表项删除并插入到List2中
设窗体上有一个列表框控件List1,含有若干列表项。以下能表示当前被选中的列表项内容的是________。A.List1.TextB.List1.IndexC.List1.ListD.List1.ListIndex