如題,代碼如下:
ListView1.View = 3
ListView1.GridLines = True
With ListView1
.ColumnHeaders.Clear
.ListItems.Clear
.ColumnHeaders.add , , "姓名"
.ColumnHeaders(1).Width = 1200
.ColumnHeaders.add , , "年齡"
.ColumnHeaders(2).Width = 1000
.ColumnHeaders.add , , "職位"
.ColumnHeaders(3).Width = 2000
.ColumnHeaders.add , , "聯系電話"
.ColumnHeaders(4).Alignment = lvwColumnLeft
.ColumnHeaders(4).Width = 2000
.ListItems.Add ,,"張三"
.ListItems(1).SubItems(1) = "20"
.ListItems(1).SubItems(2) = "文秘"
.ListItems(1).SubItems(3) = "1365555555"
End With
uj5u.com熱心網友回復:
ListView1.Height = 1200
……
試試看?
uj5u.com熱心網友回復:
趙老師,您好。試了下,只是把串列控制元件的高度設定成了1200像素,內容還是不顯示。
轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/262673.html
標籤:控件
下一篇:EXCEL VBA 求大神相助,
