在金字塔窗体中建一个listview1,如果一句代码也不写,运行后显示正常。
现在想初始化时添加表头,只两句代码,运行时提示:缺少对象:listview1
请问:listview1对象应如何声明(或设置)?
附:代码及运行时提示的截图。
另说明:代码在本机excel2003上测试正常。
把窗体名称带进去,比如窗体名称是frmTest,listview名称是ListView1,那么代码如下:
frmTest_ListView1.AddItem "AAA"
因图片无法正常显示,先补发如下,请求指导:
在金字塔中点击控件ListView1,然后在窗体上拉出ListView1图
运行如下代码:
Sub UserForm3_Initialize()
ListView1.ColumnHeaders.Add,"Name","姓名"
ListView1.ColumnHeaders.Add,"Sex","性别"
ListView1.ColumnHeaders.Add,"Age","年龄"
ListView1.View=lvwReport
End Sub
运行后提示:编译器错误,'424' 缺少对象:' ListView1'。如果在excel窗体上运行,显示正常。
按照朋友指点,改成:
Sub UserForm3_Initialize()
UserForm3_ListView1.ColumnHeaders.Add,"Name","姓名"
UserForm3_ListView1.ColumnHeaders.Add,"Sex","性别"
UserForm3_ListView1.ColumnHeaders.Add,"Age","年龄"
UserForm3_ListView1.View=lvwReport
End Sub
运行后提示:编译器错误:‘35602’ Key is not unique in collection
如按上边代码,在excel窗体上也运行错误。
敬请指导。
把窗体名称带进去,比如窗体名称是frmTest,listview名称是ListView1,那么代码如下:
frmTest_ListView1.AddItem "AAA"
测试后还不行,如果加上窗体名称,在excel窗体中也不能运行了
listbox控件在金字塔下,好像不支持列头,我没有做成过,但是多列我是做过的。