'给你个示例希望对你有所帮助
Private Sub Form_Click()
Print List1.ListCount
For i = 0 To List1.ListCount
Print List1.List(i); " ";
Next i
End Sub
Private Sub Form_Load()
List1.AddItem "abc"
List1.AddItem "def"
List1.AddItem "hij"
List1.AddItem "123"
List1.AddItem "456"
List1.AddItem "789"
End Sub
不建议 楼主问
你应该去试试 而不是问
把他写道框体里面 运行看看就知道结果 很直接 明了