سلام دوستان من برای پر کردن یک لیست ویو از دستور زیر استفاده می کنم
Dim li As ListItemاگه بخوام ردیف 3 ستونه دومشو متنشو عوض کنم باید چکار کنم
arkcount = arkcount + 1
Set li = SMSList.ListItems.Add(, , arkcount)
li.ListSubItems.Add , , "7"
li.ListSubItems.Add , , FarsiDate(DateTime.Now)
li.ListSubItems.Add , , gettimeark
li.ListSubItems.Add , , s2r.Text
li.ListSubItems.Add , , t1.Text
li.ListSubItems.Add , , "6"