VB.NET wpf使用listview

追影

（1）布局文件

1. <ListView x:Name="ListView1" HorizontalAlignment="Left" Height="360" Margin="0,82,0,0" VerticalAlignment="Top" Width="772" Grid.ColumnSpan="4" BorderThickness="0">
   
2.             <ListView.View>
   
3.                 <GridView>
   
4.                     <GridViewColumn Header="文件夹名" Width="200" DisplayMemberBinding="{Binding Path=fold_name}"/>
   
5.                     <GridViewColumn Header="文件夹路径" Width="300" DisplayMemberBinding="{Binding Path=fold_path}"/>
   
6.                     <GridViewColumn Header="图标" Width="130" DisplayMemberBinding="{Binding Path=fold_icon}"/>
   
7.                     <GridViewColumn Header="加密时间" Width="170" DisplayMemberBinding="{Binding Path=do_time}"/>
   
8.                 </GridView>
   
9.             </ListView.View>
   
10.         </ListView>

复制代码

（2）绑定数据库resource

1. ListView1.Width = Me.Width
   
2.         Dim da As OleDbDataAdapter = New OleDbDataAdapter("select * from fold order by id desc", conn)
   
3.         Dim ds As New DataSet
   
4.         da.Fill(ds, "fold")
   
5.         ListView1.Items.Clear()
   
6.         If ds.Tables.Count > 0 Then
   
7.             For i = 0 To ds.Tables(0).Rows.Count - 1
   
8.                 Dim dr = ds.Tables(0).Rows(i)
   
9.                 ListView1.Items.Add(New DataItem(dr.ItemArray(1).ToString, dr.ItemArray(2).ToString， dr.ItemArray(3).ToString， dr.ItemArray(4).ToString))
   
10.             Next
    
11.         End If

复制代码

（3）collection item类定义

1. Public Class DataItem
   
2.     Private _fold_name As String
   
3.     Public Property fold_name() As String
   
4.         Get
   
5.             Return _fold_name
   
6.         End Get
   
7.         Set(value As String)
   
8.             _fold_name = value
   
9.         End Set
   
10.     End Property
    
11. 
    
12.     Private _fold_path As String
    
13.     Public Property fold_path() As String
    
14.         Get
    
15.             Return _fold_path
    
16.         End Get
    
17.         Set(value As String)
    
18.             _fold_path = value
    
19.         End Set
    
20.     End Property
    
21. 
    
22.     Private _fold_icon As String
    
23.     Public Property fold_icon() As String
    
24.         Get
    
25.             Return _fold_icon
    
26.         End Get
    
27.         Set(value As String)
    
28.             _fold_icon = value
    
29.         End Set
    
30.     End Property
    
31. 
    
32.     Private _do_time As String
    
33.     Public Property do_time() As String
    
34.         Get
    
35.             Return _do_time
    
36.         End Get
    
37.         Set(value As String)
    
38.             _do_time = value
    
39.         End Set
    
40.     End Property
    
41. 
    
42. 
    
43.     Public Sub New(ByVal fpath As String, ByVal fname As String, ByVal ficon As String, ByVal dotime As String)
    
44.         Me.fold_icon = ficon
    
45.         Me.fold_name = fname
    
46.         Me.fold_path = fpath
    
47.         Me.do_time = dotime
    
48.     End Sub
    
49. End Class
    

复制代码

效果图