如題,要實作的功能是,如果送贈品,,在對應的表格上 插入一張圖片,,要求全代碼哦,,,謝謝大俠了,,,納悶很久了。
如下圖:
uj5u.com熱心網友回復:
把你要添加的圖片添加到 ImageList 里,然后捆綁 ListView.ColumnHeaderIcons 屬性,如:
ListView1.ColumnHeaders.Clear
ListView1.ColumnHeaderIcons = Nothing
ListView1.View = lvwReport
ImageList1.ListImages.Clear
ImageList1.ListImages.Add , "列1圖示", LoadPicture("F:\圖片資源\圖示資源\工具圖示\001.ico")
ImageList1.ListImages.Add , "列2圖示", LoadPicture("F:\圖片資源\圖示資源\工具圖示\002.ico")
ListView1.ColumnHeaderIcons = ImageList1
ListView1.ColumnHeaders.Add , "列1", "列1", 1200, 0, ImageList1.ListImages.Item("列1圖示").Index
ListView1.ColumnHeaders.Add , "列2", "列2", 1200, 0, ImageList1.ListImages.Item("列2圖示").Index
ListView1.ColumnHeaders.Add , "列3", "列3", 1200, 0, ImageList1.ListImages.Item("列1圖示").Index
ListView1.Refresh
轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/78271.html
標籤:VB基礎類
上一篇:VB呼叫CMD執行命令
