在运行时添加Listview控件
本人';我有一个DVB,我';我正在努力,我想使用Listview控件 ;问题是:listview控件的数量取决于图形中特定对象的数量 ;本人';我尝试了控件。添加(“Forms.Listview.1”)但这只给了我一个';无效的类字符串';错误消息有人接受吗  ;
也许控制阵列会有所帮助。我已经有一段时间没有玩过这些了
另一个选择是投入最多的钱;d需要,并根据需要使其可见/不可见。
您好,Matt,我在注册表(根分支)中找到了什么Private Sub Command1_Click()
Dim lvw As ListView
Dim ctl As Control
Set ctl = Controls.Add("MSComctlLib.ListViewCtrl.2", "ListView1")
With ctl
.Left = 10
.Top = 40
.Height = 120
.Width = 200
.Visible = True
End With
Set lvw = ctl
With lvw
.ColumnHeaders.Add 1, "@", "Header1", 100
.ColumnHeaders.Add 2, "#", "Header2", 100
.GridLines = True
.View = lvwReport
End With
'ETC'
End Sub
Oleg
就是这样
再次感谢你的帮助 ;我真的很感激。 很高兴为您提供帮助
页:
[1]