软题库 移动APP 扫码下载APP 随时随地移动学习 培训课程
当前位置:信管网 >> 在线考试中心 >> 信息系统项目管理师题库 >> 试题查看
试卷名称 2006年上半年程序员考试下午真题试题(案例分析)
考试中心《2006年上半年程序员考试下午真题试题(案例分析)》在线考试
试卷年份2006年上半年
试题题型【分析简答题】
试题内容

阅读以下应用说明以及用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



相关试题

推荐文章
合作网站内容