向列表视图添加图像vb.net

Question

我有一个包含固定和动态项目的列表视图。 我打算将其打印为收据以进行验证

这就是我添加固定项目的方式

Dim ListItem As ListViewItem
ListItem = ListView1.Items.Add("ST PAUL'S SECONDARY SCHOOL")
Dim logo As ListViewItem
logo = ListView1.Items.Add(Image.FromFile("1.png"))

我的问题是添加图像的行给了我以下错误

错误BC30518重载解析失败，因为无法使用以下参数调用可访问的“添加”：“公共可重载重载函数Add（文本为字符串）为ListViewItem”：类型“图像”的值无法转换为“字符串”。 “公共可重写重载函数Add（值作为ListViewItem）作为ListViewItem”：类型“图像”的值不能转换为“ ListViewItem”。 SchoolManager C：\\ Users \\ MASENO \\ Source \\ Repos \\ SchoolManager \\ SchoolManager \\ Pay Fees.vb 18有效

我已尝试使用此代码从资源中添加图像，但未添加任何图像且未显示任何错误

      Dim il = New ImageList()
    il.Images.Add("1", My.Resources.barlogo)
    ListView1.LargeImageList = il
    ListItem.ImageKey = "1"

我可能在做错什么，我该如何纠正？

Answer 1

使用ImageList来保存图像，然后通过键将其应用于ListView。

' your code
Dim ListItem As ListViewItem
ListItem = ListView1.Items.Add("ST PAUL'S SECONDARY SCHOOL")
' new code
Dim il = new ImageList()
il.Images.Add("1", Image.FromFile("1.png"))
ListView1.LargeImageList = il
ListItem.ImageKey = "1"