กระทู้เก่าบอร์ด อ.Yeadram
5,514 24
URL.หัวข้อ /
URL
ใส่ค่าใน combo box ถ้าไม่มีในรายการ ให้แจ้งเตือน
ใส่ค่าใน combo box ถ้าไม่มีในรายการ ให้แจ้งเตือนว่า "ไม่มีในรายการ คุณต้องการเพิ่มรายการเองหรือไม่"
ต้องเขียนโค๊ด ควบคุมอย่างไรครับ
ต้องเขียนโค๊ด ควบคุมอย่างไรครับ
24 Reply in this Topic. Dispaly 2 pages and you are on page number 2
22 @R13988
ลองเอา Code นี้ไปดัดแปลงใช้ดูครับ ผมใช้ VB เขียน แต่ว่า Access คงคล้าย ๆ กัน
If rsCBCode.EOF Then
Me.CBCode.Clear
'Exit Sub 'ถ้าไม่พบข้อมูลให้ออกจาก Sub program นี้
Else
Me.CBCode.Clear 'เคลียร์คอมโบ
'ใช้ Loop Do Until ในการ วนแสดงค่าให้กับ Combo
Do Until rsCBCode.EOF
Me.CBCode.AddItem rsCBCode!code 'เพิ่มรายการในคอมโบ
rsCBCode.MoveNext 'เลื่อนเรคคอร์ไปหนึ่งรายการ ไม่งั้นจะได้เร็คคอร์ดซ้ำ
Loop
Me.CBCode.ListIndex = 0 'ให้แสดงรายการลำดับที่ 0 ที่อยู่ในคอมโบ
End If
If rsCBCode.EOF Then
Me.CBCode.Clear
'Exit Sub 'ถ้าไม่พบข้อมูลให้ออกจาก Sub program นี้
Else
Me.CBCode.Clear 'เคลียร์คอมโบ
'ใช้ Loop Do Until ในการ วนแสดงค่าให้กับ Combo
Do Until rsCBCode.EOF
Me.CBCode.AddItem rsCBCode!code 'เพิ่มรายการในคอมโบ
rsCBCode.MoveNext 'เลื่อนเรคคอร์ไปหนึ่งรายการ ไม่งั้นจะได้เร็คคอร์ดซ้ำ
Loop
Me.CBCode.ListIndex = 0 'ให้แสดงรายการลำดับที่ 0 ที่อยู่ในคอมโบ
End If
23 @R14003
ลองอ่านกระทู้เก่าของ อ.สุภาพ ดูยังครับ
http://www.thai-access.com/suphap.php?topic_id=257
มีประโยชน์มาก เป็นการแจ้งเตือนและสามารถใส่ข้อมูลเพิ่มได้อีกด้วย ปรับใช้ดูครับ
http://www.thai-access.com/suphap.php?topic_id=257
มีประโยชน์มาก เป็นการแจ้งเตือนและสามารถใส่ข้อมูลเพิ่มได้อีกด้วย ปรับใช้ดูครับ
24 @R14005
ได้ตามที่ต้องการแล้วครับ ตามลิงค์ คุณ TTT
แต่คุณ Akung ผมทำไม่ได้ เกินสติปัญญาผมไปครับ (หุหุ)
ขอบคุณ คุณ TTT มากครับ และ คุณ Akung
แต่คุณ Akung ผมทำไม่ได้ เกินสติปัญญาผมไปครับ (หุหุ)
ขอบคุณ คุณ TTT มากครับ และ คุณ Akung
Time: 0.3177s
คงต้องขอความกรุณาจากท่านอื่น ๆ ต่อไป