[已解决]第一次接触listview 关于listview

chaperter

Private Sub UserForm_Initialize()
CommandButton1.Caption = "返回"
CommandButton2.Caption = "退出"
With ListView1
.ColumnHeaders.Add , , "序号", 64, 0
.ColumnHeaders.Add , , "名称", 64, 0
End With
End Sub


输入了这个代码 但是却不能在试运行时显示列表如图，请老师指点

最佳答案

月排行榜 / 总排行榜

zjdh

2016-6-6 14:53

Private Sub UserForm_Initialize()
    CommandButton1.Caption = "返回"
    CommandButton2.Caption = "退出"
    With ListView1
        .ColumnHeaders.Add , , "序号", 64, 0
        .ColumnHeaders.Add , , "名称", 64, 0
        .View = lvwReport
    End With
End Sub

跳转到最佳答案楼层

zjdh

Private Sub UserForm_Initialize()
    CommandButton1.Caption = "返回"
    CommandButton2.Caption = "退出"
    With ListView1
        .ColumnHeaders.Add , , "序号", 64, 0
        .ColumnHeaders.Add , , "名称", 64, 0
        .View = lvwReport
    End With
End Sub

chaperter

zjdh 发表于 2016-6-6 14:53
Private Sub UserForm_Initialize()
    CommandButton1.Caption = "返回"
    CommandButton2.Caption = ...

再请教下 我设置了一个按钮，语句见附图，出现“类型不匹配”怎么回事？？

zjdh

说明你scan2窗体的宏里存在“类型不匹配”！

chaperter

zjdh 发表于 2016-6-6 17:36
说明你scan2窗体的宏里存在“类型不匹配”！

已经查明原因了，已解决 谢谢！