列出VB6.0中单击按钮时的框操作

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

Aso我怎么才能添加一个按钮，当你点击它时，它会在第一个列表框中添加一个新的项目（游戏），这样你就可以借用它了

感谢您的帮助。

假设在名为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

---

嗨，Beaudean，你有没有写过代码让我们给你指出正确的方向？如果您阅读了常见问题解答，请解释没有人会为您提供此项目的从头开始的代码。然而，如果你有你正在使用的代码，我们可以提供帮助。我发现了你的问题：“学校”中没有“k”。为什么从用户体验的角度来看，学校分配完全是不切实际的，而不像你在现实生活中创造的任何东西？