你好我有一個列表視圖,可以打開文件夾中的項目並顯示它們。我想知道是否有辦法讓列表視圖顯示圖標,也可以使用shell32或圖像列表。這裏的代碼:帶有列表視圖和圖像列表的項目圖標
Imports System.IO
Imports System.Xml
Imports System.Runtime.InteropServices
Imports Microsoft.VisualBasic
Public Class cv7import
Private Sub cv7import_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim caminho As String
caminho = "C:\Documents and Settings\Software\Ambiente de trabalho\1"
lstvicon.View = View.Details
lstvicon.GridLines = False
lstvicon.FullRowSelect = True
lstvicon.HideSelection = False
lstvicon.MultiSelect = True
lstvicon.Columns.Add("Nome")
lstvicon.AutoResizeColumns(ColumnHeaderAutoResizeStyle.HeaderSize)
Dim DI As System.IO.DirectoryInfo = New System.IO.DirectoryInfo(caminho)
Dim files() As System.IO.FileInfo = DI.GetFiles
Dim file As System.IO.FileInfo
Dim li As ListViewItem
For Each file In files
li = lstvicon.Items.Add(file.Name)
li.Tag = file.FullName
Next
End Sub
End Class
這裏有兩張圖片,它是如何看起來以及我希望它看起來如何,如果它有幫助。
如何,我想:http://imageshack.us/photo/my-images/21/wantd.png/
如何看起來:http://imageshack.us/photo/my-images/13/needk.png/
你想顯示哪個圖標?與文件資源管理器相關的那個文件夾呢? – 2012-01-13 16:08:08
是的,如果它是.txt我希望它顯示.txt圖標。 – user1100407 2012-01-13 16:10:07