vb listview列的宽度随着窗体大小变化,怎样做到?

Posted 2023-02-25

参考技术A 首先让listview宽度随窗体变化，再用listview的宽度除以他的总列数，就是每列的的宽度，这样就能随窗体变化了 参考技术B Private Sub Form_Resize()
'设置Form1允许的最小宽度
If Form1.Width < 600 Then Exit Sub
'设置ListView1宽度自动跟随
ListView1.Move 0, 0, Me.Width
'上一行代码跟下一行代码，同样意思
'ListView1.Move 0, 0, Form1.Width

End Sub追问

不对啊。没效果

追答

检查你的窗口名称是不是 Form1

追问

当然是了。这个懂

追答

看错题目了，你要的是各个列的宽度改变
那就是把窗体放大缩小的比率值，与各个列值运算了。
依照题目也不知道你的控件有几个列，运算式是接着最后一行往下写。

追问

有三列。请再给下代码

参考技术C ListView1.ColumnHeaders.Item(1).Width = 1000 '< ---第1列宽
ListView1.ColumnHeaders.Item(2).Width = 1000 '< ---第2列宽
ListView1.ColumnHeaders.Item(3).Width = 1000 '< ---第3列宽