填空题

在程序的空白行处填写适当的语句，完成下列功能：依次自动将列表框List2中所有列表项目移入列表框List1中，并将移入List1中的项目从List2中删除。
Do While List2.ListCount
______
List2.RemoveItem()
Loop

【参考答案】

List1.AddItemList2.List(0)

<上一题目录下一题>

热门试题

填空题

下列是一个体操评分程序。设满分为10分，20位评委，除去一个最高分和一个最低分，计算平均分。 Private Sub Command1_Click() Max=0 Min=10 For i=1 To 20 n=Val(InputBox( 请输入分数 )) If n>Max Then Max=n If n s=s+n ______ s=s-Min-Max p=s 18 Print 最高分 ;Max; 最低分 ;Min Print 最后得分: ;p End Sub

填空题

假设有下列程序段： For i=1 To 3 For j=5 To 1 Step-1 Print i*i Next j Next i 则语句Print i*j的执行次数是______，i的值为______，j的值为______。

相关试题