Question

vb list box 添加和删除

程序运行时 在文本框中输入学号和姓名 单击 添加 和 删除 按钮， 可以显示在右边的列表框里
同时在 标签 上显示学生总人数

Answer 1

Private Sub Command1_Click() '删除
List1.RemoveItem (List1.ListIndex)
Label1.Caption ="共" & List1.ListCount & "人"
End Sub

Private Sub Command2_Click() '添加
List1.AddItem (Text1.Text & " " & Text2.Text)
Label1.Caption ="共" & List1.ListCount & "人"
End Sub