VB列表框添加项目 无显示。怎么办？如图

Private Sub Command1_Click()

For i = 1 To 11

List1.AddItem Chr(96 + i)

Next

End Sub

楼主您好！

aaaa和bbbb都是字符串，需要加上双引号("")

所以改成：

List1.AddItem "aaaa"

List1.AddItem "bbbb"

或者加入代码：

Dim aaaa As String,bbbb As String

aaaa = "aaaa"

bbbb = "bbbb"

望采纳~~

---