“无效的类字符串”动态地将Listview添加到多页

Question

无法动态地将列表视图添加到多页中，但是我可以使用列表框来添加它。

这是我要使用的代码...

不起作用：

Dim lbMyListView As MSComctlLib.ListView
Set lbMyListView = UFHistoricalDataOutput.MultiPage1.Pages(0).Controls.Add("MSComctlLib.ListView.1", "MyListView", 1)

不起作用：

Dim lbMyListView
Set lbMyListView = UFHistoricalDataOutput.MultiPage1.Pages(0).Controls.Add("MSComctlLib.ListView.1", "MyListView", 1)

不起作用：

Dim lbMyListView
Set lbMyListView = UFHistoricalDataOutput.MultiPage1.Pages(0).Controls.Add("ListView.1", "MyListView", 1)

ETC ...

任何方向将不胜感激。 TY