Question

您好我正在做一个小的IT任务，我们必须创建一个数据库类型借用系统，我有两个列表框列表框1是列出所有游戏的地方，你可以选择借用它们，另一个是游戏去的地方单击将它们传输到列表框2的按钮。

麻生太郎如何添加一个按钮，当你点击它时，将一个新的物品（游戏）添加到第一个列表框中，这样你就可以借两个

感谢您的帮助。

Answer 1

假设名为Form1的VB 6表单上有两个列表框（listbox1和listbox2）和一个命令按钮（cmd1）

private sub Form_Load()
    listbox1.AddItem "game 1"
    listbox1.AddItem "game 2"
    listbox1.AddItem "game 3"
end sub
Private Sub cmd1_click ()
    If listbox1.listindex >-1 then
        'Add the selected item from listbox1 to list box 2        
        listbox2.AddItem listbox1.List(listbox1.ListIndex)
        'Remove selected item from  listbox1
        listbox1.removeitem(listbox1.listindex)
    End If
End Sub

列出VB 6.0中按钮单击时的框操作

1 个答案: