[已解决]为什么不能显示

kevin_2010

在sheet1中建立一个 Active控件 listbox1，
在VB sheet1中写：

Private Sub ListBox1_Click()
ListBox1.AddItem ("行1，列1")
End Sub

回到sheet1中，是否每点击一次listbox1，就能得到一行"行1，列1"？然后点三次就应该有三行"行1，列1"？

最佳答案

月排行榜 / 总排行榜

那么的帅

2013-4-27 16:57

kevin_2010 发表于 2013-4-27 16:17
附件已添加，可能是简单的错误，谢谢你的帮助。

列表框必须有选项时，点击 选项，才会发生 单击事件

具体见代码

299714-VBA-事件-列表框单击事件.rar (20.81 KB, 下载次数: 1)

2013-4-27 16:57 上传

点击文件名下载附件

跳转到最佳答案楼层

那么的帅

提供数据附件

kevin_2010

那么的帅 发表于 2013-4-27 15:41
提供数据附件

附件已添加，可能是简单的错误，谢谢你的帮助。

那么的帅

kevin_2010 发表于 2013-4-27 16:17
附件已添加，可能是简单的错误，谢谢你的帮助。

列表框必须有选项时，点击 选项，才会发生 单击事件

具体见代码

299714-VBA-事件-列表框单击事件.rar (20.81 KB, 下载次数: 1)

2013-4-27 16:57 上传

点击文件名下载附件

kevin_2010

那么的帅 发表于 2013-4-27 16:57
列表框必须有选项时，点击 选项，才会发生 单击事件

具体见代码

非常感谢！
在listbox中的代码 ME.listbox1.additem  和 listbox1.additem 在此好像是一样的。
增加listbox记录可以在本身和上一级模块都可以增加。而且初始化好像一般通过上一级模块。