新人求助，求帮忙

没人啊

没看到什么代码。不过从你发的图和习题来看，是VB。

你的代码呢，没有代码我们也帮不了你

你先把界面画出来再说吧

看界面 是vb，先拖拖控件，把界面画出来吧，

Private Sub Form_Load()
List1.AddItem "C程序设计"
List1.AddItem "VB程序设计"
List1.AddItem "JAVAR程序设计"
List1.AddItem "数据库"
List1.AddItem "大学计算机基础"
List1.AddItem "网页设计"
End Sub
Private Sub List1_Click()
If List2.ListCount = 5 Then
MsgBox "程程已满"
Else
List2.AddItem List1.Text
List1.RemoveItem List1.ListIndex
End If