本文向大家介绍VB.NET ListView控件，可能好多人还不了解VB.NET ListView控件，没有关系，看完本文你肯定有不少收获，希望本文能教会你更多东西。

VB.NET ListView控件在程序开发过程中的使用是非常广泛的。因为其不支持数据库的绑定，所以在数据库程序开发领域无法与datagridview抗衡，但是ListView的确是一个非常好用的控件。下面就把一个简单的VB.NET ListView控件的例子发出来。

Public Class heroClass hero  
Private s_name As String  
Private s_age As Long  
Private s_like As String  
Public Property myName()Property myName() As String  
Get  
Return s_name  
End Get  
Set(ByVal value As String)  
s_name = value 
End Set  
End Property  
Public Property myAge()Property myAge() As Long  
Get  
Return s_age  
End Get  
Set(ByVal value As Long)  
s_age = value 
End Set  
End Property  
Public Property myLike()Property myLike() As String  
Get  
Return s_like  
End Get  
Set(ByVal value As String)  
s_like = value 
End Set  
End Property  
End Class 

VB.NET ListView控件装载数据

Private Sub btnLoad_Click()Sub btnLoad_Click(ByVal sender As  
System.Object, ByVal e As System.EventArgs) Handles btnLoad.Click  
s_flag = True 
Me.lv1.CheckBoxes = True 
Dim i As Integer  
Const maxCount As Long = 10 
Dim iItem As ListViewItem  
Dim aHero As hero  
For i = maxNumber To maxNumber + maxCount - 1  
Dim rd As New System.Random(Environment.TickCount * i)  
aHero = New her  
iItem = New ListViewItem  
aHero.myName = firstName & i.ToString  
aHero.myAge = System.Math.Round(rd.NextDouble * 100, 0)  
aHero.myLike = createLike(i)  
iItem.Text = aHero.myName  
iItem.Tag = aHero 
iItem.SubItems.Add(aHero.myAge)  
iItem.SubItems.Add(aHero.myLike)  
Me.lv1.Items.Add(iItem)  
heroList.Add(aHero.myName, aHero)  
Next  
maxNumber = i 
If Me.lv1.Items.Count > 0 Then  
Me.lv1.Items.Item(0).Checked = True 
End If  
s_flag = False 
End Sub 

【编辑推荐】

1. 简单分析VB.NET临时文件
2. 详细描述VB.NET PadLeft方法
3. VB.NET Shared变量经验总结
4. 全面讲解VB.Net赋值语句
5. 浅析VB.NET创建PPC客户端程序