列表

详情



  阅读以下应用说明以及用Visual Basic开发过程中所编写的程序代码,将应填入(n)处的字句写在答题纸的对应栏内。
【应用说明】
  某应用程序在运行过程中的一个界面如下图所示:

  在“供选课程”列表框(名为List1)中选择某个课程后,再单击“>”按钮(名称为cmdSelect),就能将该课程复制到“所选课程”列表框(名称为List2)中(但要注意不要出现重复项);如果单击“>>”按钮(名称为cmdSelAll),就能将全部供选课程名复制到列表框List2中(注意应先删除List2中的已选项);如果在“所选课程”列表框中选中某个课程,再单击“<”按钮(名称为cmdDelete),就会从List2中删除该课程(未选课程时应不做处理);如果单击“<<”按钮(名称为cmdDelAll),就会从List2中删除所有已选课程。

【Visual Basic程序代码】
  Private Sub CmdSelect_Click()
    For i = 0 To List2.ListCount - 1
    If List1.Text = List2.List(i)Then Exit Sub ‘不要重复选择
   Next i
    List2.AddItem    (1)      ‘在List2中增添List1中所选的项
  End Sub
    Private Sub CmdSelAll_Click()
    List2.Clear    ‘先删除List2中的己有项
    For i=0 To (2)       ‘对List1中所有各项做循环处理
    List2.Addlte (3)   ‘将该项增添到List2中
   Next i
  End Sub 
  Private Sub CmdDelete_Click()
    If List2.ListIndex >= 0 Then   ‘如果List2中有选中的项
    List2.RemoveItem (4)       ‘则删除所选的项
   End If
  End Sub
  Private Sub CmdDelAll_Click()
    (5)
  End Sub

参考答案:

详细解析:

上一题