alirezash
سه شنبه 13 مرداد 1388, 13:57 عصر
سلام دوستان من برای پر کردن یک لیست ویو از دستور زیر استفاده می کنم
Dim li As ListItem
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"
اگه بخوام ردیف 3 ستونه دومشو متنشو عوض کنم باید چکار کنم
Dim li As ListItem
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"
اگه بخوام ردیف 3 ستونه دومشو متنشو عوض کنم باید چکار کنم