With Ab_ListView1
.Columns.Add("الاسم", 100, HorizontalAlignment.Left)
.Columns.Add("العمر", 100, HorizontalAlignment.Right)
.Columns.Add("البلد", 100, HorizontalAlignment.Center)
Dim lst1 As New ListViewItem(New String() {"Ahmed", "20", "العراق"})
Dim lst2 As New ListViewItem(New String() {"Ali", "23", "مصر"})
Dim lst3 As New ListViewItem(New String() {"Omar", "25", "الاردن"})
.Items.AddRange(New ListViewItem() {lst1, lst2})
End With