For i As Integer = 0 To ds.Rows.Count - 1 dr("ID") = ds.Rows(i)("ID") dr("CODE") = ds.Rows(i)("CODE") dt.Rows.Add(dr) Next i dgv.DataSource = dt
For i As Integer = 0 To ds.Rows.Count - 1 dr("ID") = ds.Rows(i)("ID") dr("CODE") = ds.Rows(i)("CODE") if ds.Rows(i)("CODE").ToString()="" dr("Status").Checked=False else dr("Status").Checked=True End IF dt.Rows.Add(dr) Next i dgv.DataSource = dt
เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง