vb.net 关于LIstView填充数据的有关问题

vb.net 关于LIstView填充数据的问题
新手学习，见笑。。。
 Public Sub New()
  MyBase.New()
  ' 此调用是 Windows 窗体设计器所必需的。
  InitializeComponent()
  ' 在 InitializeComponent() 调用之后添加任何初始化。
  ListView1.View = View.Details
  ListView1.GridLines = True
  ListView1.FullRowSelect = True
  ListView1.HeaderStyle = ColumnHeaderStyle.Clickable
  ListView1.Columns.Add("发件人 ", 100, HorizontalAlignment.Left)
  ListView1.Columns.Add("收件人 ", 100, HorizontalAlignment.Left)
  ListView1.Columns.Add("收件时间 ", 200, HorizontalAlignment.Left)
  End Sub
这里给ListView设置了头
然后我想把一个数组里的数据  
Dim arr(,) As String = {{"John", "Ann", "2012-2-12"}, {"T-Mac", "Kobe", "2012-2-20"}, {"James", "Wede", "2012-2-22"}}
在单击按钮时用这个ListView显示出来  
  请问怎么写....

[解决办法]
for i as integer = 0 to arr.length/3
{
ListView1.Columns.Add(arr(i,0),arr(i,1),arr(i,2))
}
[解决办法]
可以定义ListViewItem，然后添加SubItem，例如

VB.NET code

Dim Item As New ListViewItemItem.Text = arr(i,0)Item.SubItems.Add(arr(i,1))Item.SubItems.Add(arr(i,2))ListView1.Items.Add(Item)
[解决办法]
你的问题在于解析json串，网上有例子，自己找一个，放到代码中
[解决办法]
楼上正解，，不行就百度。。我也从来都不背那些代码。多去去百度。。。养成习惯，自学
[解决办法]
VB.NET code
listview.datasoure = arr