如何设置ListView1的图标
Dim icon As Icon = ExtractIcon.GetIcon(filenamekz, False)
Dim lvi As ListViewItem = New ListViewItem(filedir, 0)
ListView1.Items.Add(lvi).ForeColor = Color.Red
lvi.SubItems.Add(filename & filenamekz)
lvi.SubItems.Add(name2)
lvi.SubItems.Add("不可改")
'=====================================================================
怎么将"icon"设置为ListView1.Items的图标