|
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用 · 内置多项VBA编程加强工具 ★ 免费下载 ★ ★ 使用手册★
前段时间一直被ListView初始化位置错误困扰,经过摸索发现在多页选项卡中如果同时存在多个ListView就会出现初始华位置错误!如果ListView内容没有清空就转换页面也会出现错误,后来尝试了以下代码,错误一直没出现过,希望能帮到被同样问题困扰的哥们。
Private Sub ListView初始化子程序()
Dim txt As Control
For Each txt In Me.Controls
If TypeName(txt) = "ListView" Then
txt.ColumnHeaders.Clear
txt.ListItems.Clear
txt.Visible = False
txt.Visible = True
End If
Next
End Sub
把子程序放到放到每个包含ListView的选项卡切换代码的前面,或者按钮切换前面,就是每次切换包含ListView的选项卡都要提前运行一次ListView初始化,表达不好别扔砖头! |
|