VB 神童教程第二章第九节——综合示例三

作者: 来源:网络文章时间:2005-12-13 14:46:31

VB 神童教程第二章第九节——综合示例三(1) 前面我们学了列表框控件（ListBox）与组合框控件（ComboBox），本节将就它们制作一个简单的应用程序。

一、程序界面：界面如图一

20030507-36.gif>
图一

    二、程序目的：

    两个列表框，左列表框（LstLeft）罗列了一些歌手名字，右列表框（LstRight）初始状态为空；点击向右按钮（CmdRight），可以将左列表框中的指定选项移动到右边列表框；点击全部向右按钮（CmdAllRight），可以将左列表框中所有的内容搬到右列表框中；点击向左按钮（CmdLeft），可以将右列表框中选定的表项移动到左列表框中；点击全部向左按钮（CmdAllLeft），可以将右列表框中的所有内容移动到左列表框中。

    三、属性设置：

    见图一，注意，列表框的 Style 都为 0 即标准类型。

    四、程序代码：

    1、窗体的载入事件（Form_Load）

    Private Sub Form_Load()

    LstLeft.AddItem "刘德华"
    LstLeft.AddItem "张学友"
    LstLeft.AddItem "郭富城"
    LstLeft.AddItem "黎　明"
    LstLeft.AddItem "谭咏麟"
    LstLeft.AddItem "梅艳芳"
    LstLeft.AddItem "张曼玉"
    End Sub

    2、向右按钮的点击事件（CmdRight_Click）

    Private Sub CmdRight_Click()
    LstRight.AddItem LstLeft.List(LstLeft.ListIndex)
    LstLeft.RemoveItem LstLeft.ListIndex
    End Sub

    3、全部向右按钮的点击事件（CmdAllRight_Click）
    Private Sub CmdAllRight_Click()
    LstRight.AddItem "刘德华"
    LstRight.AddItem "张学友"
    LstRight.AddItem "郭富城"
    LstRight.AddItem "黎　明"
    LstRight.AddItem "谭咏麟"
    LstRight.AddItem "梅艳芳"

1.VB 神童教程第二章第九节——综合示例三(1)
2.VB 神童教程第二章第九节——综合示例三(2)
3.VB 神童教程第二章第九节——综合示例三(3)
4.VB 神童教程第二章第九节——综合示例三(4)

共4页 9 7 [1] [2] [3] [4] 8 :>

VB 神童教程第二章第九节——综合示例三相关文章：

VB 神童教程第二章第九节——综合示例三相关软件：

特别声明：本站除部分特别声明禁止转载的专稿外的其他文章可以自由转载，但请务必注明出处和原始作者。文章版权归文章原始作者所有。对于被本站转载文章的个人和网站，我们表示深深的谢意。如果本站转载的文章有版权问题请联系编辑人员，我们尽快予以更正。
转载请注明来源：http://www.xgdown.com