当前位置:首页 » VB程序题 » 正文

VB程序题:设计一个选课的运行界面如图E.6所示。它包含2个列表框,左边为已开设的课程名称,通过Form1_Load事件加入,并按拼音字母排序;当单击某课程名称后,将该课程加入到右边列表框,并在左边列表框中删除该课程。当右边课程已满5门时,不允许再加入,出现如图E.7所示的界面。

图E.6

 

解题,代码如下:
Private Sub Form_Load()
    List1.Clear
    List1.AddItem "大学计算机基础"
    List1.AddItem "C/C++程序设计"
    List1.AddItem "VB程序设计"
    List1.AddItem "Web程序设计"
    List1.AddItem "多媒体技术与应用"
    List1.AddItem "数据库技术与应用"
    List1.AddItem "网络技术与应用"
    List1.AddItem "硬件技术基础"
    List1.AddItem "软件技术技术基础"
End Sub

Private Sub List1_Click()
    If List2.ListCount >= 5 Then
        MsgBox ("超过5门课程,不能再选")
        Exit Sub
    Else
        List2.AddItem List1.Text
        List1.RemoveItem List1.ListIndex
    End If
End Sub


图E.7:

 

Visual Basic程序设计教程(第3版) (龚沛曾等编)课后实验源码

来源:济亨网

本文链接:http://www.wb98.com/post/85.html

本站文章搜索:

<< 上一篇下一篇 >>

文章搜索

Tags列表

跟你相关

湘公网安备 43011102000514号 - ICP备08100508号