你可以通过控制ImageList 来控件图片的大小,,With Me .Icon = HelpWindowIcon.Picture With .ImageList_icon .ImageHeight = 16 .ImageWidth = 16 With .ListImages .Add , , Me.Icon End With End With End With With Me.ImageList1 .ImageHeight = 20 .ImageWidth = 20 With .ListImages .Add 1, , Me.Img_icon(1).Picture .Add 2, , Me.Img_icon(2).Picture End With End With
.Icon = HelpWindowIcon.Picture
With .ImageList_icon
.ImageHeight = 16
.ImageWidth = 16
With .ListImages
.Add , , Me.Icon
End With
End With
End With
With Me.ImageList1
.ImageHeight = 20
.ImageWidth = 20
With .ListImages
.Add 1, , Me.Img_icon(1).Picture
.Add 2, , Me.Img_icon(2).Picture
End With
End With
///設置與TreeView有關系的imagelist中圖片大小,是你自己設計的