with cboName .displaymember = "ชื่อคอลัมภ์ที่จะแสดง" .valueMember = "ชื่อคอลัมภ์ที่เก็บ" .DataSource = ชื่อ datasource ที่ใช้ End With
จากคุณ
:
sabut2000 [2007-08-25 15:06:46]
ความคิดเห็น #26654 (จาก IP: 203.146.243.100)
If ds.Tables("MemberType").Rows.Count <> 0 Then With ComboBox1 .DataSource = ds.Tables("MemberType") .DisplayMember = "type_name" ' สิ่งที่จะนำออกไปแสดง .ValueMember = "type_id" ' ค่าเมื่อถูกเลือก End With End If