สร้าง Form ที่อยู่นะคะ แล้วอยากคีย์เขต แล้ว รหัสไปรษณีย์ เด้งขึ้นมาเลย ต้องทำอย่างไรคะ ตอนนี้มีข้อมูล เขต กับ รหัสไปรษณีย์ แล้วอ่ะค่ะ รบกวนผู้รู้ตอบนู๋หน่อยนะคะ จะเป็นพระคุณยิ่งเจ้าค่ะ
==============================================================
ต่อให้หน่อยครับ ผมคิดว่าคงจะไม่เข้าใจกันครับ
1. table จะมี 2 table เป็นอย่างน้อย คือ table ที่เก็บข้อมูลของ อำเภอ,จังหวัด,รหัส สมมติชื่อ tbl_Amper กับ table ที่เก็บข้อมูลทั่วไปที่มี field อำเภอ ,จังหวัด กับ รหัสด้วย สมมติชื่อ tbl_records
2. สร้าง form ทั้ง 2 form ขึ้นมาโดยใช้ wizard ผมจะตั้งชื่อเป็น frm_Amper กับ frm_records นะครับ
3. ใน frm_records ตรง field ที่เป็น อำเภอ ให้เปลี่ยนจะ text เป็น Combo box เพื่อเอาไว้ใช้เลือกครับ สมมติ combo box นี้ชื่อ C_Amper
4. คลิกขวาตรง combo box ที่ชื่อ C_Amper นี้ แล้วเลือก properties
5. จะสังเกตุตรง Row source type จะเป็น Table/Query ถัดลงมา 1 บรรทัดจะเป็น Row Source ให้คลกตรง .... ครับ แล้วมันจะถามว่าจะให้สร้าง Query มั้ย ก็ตอบ yes ครับ
6. จากนั้น (ผมไม่แน่ใจว่าเคยสร้าง query กันมั้ย แต่ผมขออนุญาตอธิบายสำหรับคนไม่รู้นะครับ ) ให้คลิกขวาเลือก show table ขึ้นมา แล้วเลือก table ที่ชื่อ tbl_Amper ครับ แล้วให้เลือก field มา 3 field ครับคือ อำเภอ จังหวัดกับ รหัส แล้วปิด form ไปครับ
7. จากนั้นจะกลับมาที่ properties หน้าเดิม แล้วบรรทัดต่อมาจะเป็น Column count หมายถึงจะให้โชว์จำนวน coloumn กี่ column เวลาเราจะ List ขึ้นมา ให้เราใส่ 3 ครับ
8. ถัดมาอีก 2 บรรทัดจะเป็น Column widths ครับ ซึ่งเป็นการกำหนดความกว้างของ column (สามารถปรับได้ตามความเหมาะสมครับ ) โดยผมกำหนดเป็น 2cm;2.3cm;2cm ครับ หมายถึง column ของชื่ออำเภอหรือเขตจะกว้าง 2 cm ครับ column ของจังหวัดจะกว้าง 2.3 cm และ column ของรหัสจะกว้าง 2 cm ครับ
9. ต่อไปเป็นช่วงสำคัญครับที่จะกำหนดให้เวลาเราเลือกอำเภอ หรือเขต แล้วให้โปรแกรมมันใส่ในช่องให้เลยครับ
10. ให้เลื่อนมาเลือกที่ event ที่ชื่อ After update ด้านล่างครับ แล้วคลิกตรง .... ครับ
11. ก็จะขึ้นหน้าเปล่าขึ้นมา แต่มี 2 บรรทัดให้เห็นแบบนี้ครับ
ivate Sub Amper_AfterUpdate()
Me![¨Ñ§ËÇÑ´] = Me![Amper].Column(1)
Me![ÃËÑÊ] = Me![Amper].Column(2)
Refresh
End Sub
===============================================
1. ก็สร้าง table อีก table นึงขึ้นมามี 2 field คือ เขต , รหัสไปรษณีย์
2. ใน form การบันทึกที่อยู่ ตรง field ที่เป็นเขต ให้ทำเป็น Combo box แล้วดึงข้อมูลมาจาก table ที่เก็บเขตกับรหัสไปรษณีย์
3. ใน event ของ Combo box ที่ชื่อ after update ให้ไปเขียน code คือ me![ชื่อ field เขตในฟอร์มที่บันทึก] = me![combo box name].column(1)
4. ใน propertie ของ field เขตในฟอร์มนี้ ให้เลือกที่ช่อง Limit to list ว่าเป็น Yes
ก็ น่าจะได้แล้วครับ ที่เหลือลองศึกษาเองครับ �BR>
Read more ►
==============================================================
ต่อให้หน่อยครับ ผมคิดว่าคงจะไม่เข้าใจกันครับ
1. table จะมี 2 table เป็นอย่างน้อย คือ table ที่เก็บข้อมูลของ อำเภอ,จังหวัด,รหัส สมมติชื่อ tbl_Amper กับ table ที่เก็บข้อมูลทั่วไปที่มี field อำเภอ ,จังหวัด กับ รหัสด้วย สมมติชื่อ tbl_records
2. สร้าง form ทั้ง 2 form ขึ้นมาโดยใช้ wizard ผมจะตั้งชื่อเป็น frm_Amper กับ frm_records นะครับ
3. ใน frm_records ตรง field ที่เป็น อำเภอ ให้เปลี่ยนจะ text เป็น Combo box เพื่อเอาไว้ใช้เลือกครับ สมมติ combo box นี้ชื่อ C_Amper
4. คลิกขวาตรง combo box ที่ชื่อ C_Amper นี้ แล้วเลือก properties
5. จะสังเกตุตรง Row source type จะเป็น Table/Query ถัดลงมา 1 บรรทัดจะเป็น Row Source ให้คลกตรง .... ครับ แล้วมันจะถามว่าจะให้สร้าง Query มั้ย ก็ตอบ yes ครับ
6. จากนั้น (ผมไม่แน่ใจว่าเคยสร้าง query กันมั้ย แต่ผมขออนุญาตอธิบายสำหรับคนไม่รู้นะครับ ) ให้คลิกขวาเลือก show table ขึ้นมา แล้วเลือก table ที่ชื่อ tbl_Amper ครับ แล้วให้เลือก field มา 3 field ครับคือ อำเภอ จังหวัดกับ รหัส แล้วปิด form ไปครับ
7. จากนั้นจะกลับมาที่ properties หน้าเดิม แล้วบรรทัดต่อมาจะเป็น Column count หมายถึงจะให้โชว์จำนวน coloumn กี่ column เวลาเราจะ List ขึ้นมา ให้เราใส่ 3 ครับ
8. ถัดมาอีก 2 บรรทัดจะเป็น Column widths ครับ ซึ่งเป็นการกำหนดความกว้างของ column (สามารถปรับได้ตามความเหมาะสมครับ ) โดยผมกำหนดเป็น 2cm;2.3cm;2cm ครับ หมายถึง column ของชื่ออำเภอหรือเขตจะกว้าง 2 cm ครับ column ของจังหวัดจะกว้าง 2.3 cm และ column ของรหัสจะกว้าง 2 cm ครับ
9. ต่อไปเป็นช่วงสำคัญครับที่จะกำหนดให้เวลาเราเลือกอำเภอ หรือเขต แล้วให้โปรแกรมมันใส่ในช่องให้เลยครับ
10. ให้เลื่อนมาเลือกที่ event ที่ชื่อ After update ด้านล่างครับ แล้วคลิกตรง .... ครับ
11. ก็จะขึ้นหน้าเปล่าขึ้นมา แต่มี 2 บรรทัดให้เห็นแบบนี้ครับ
ivate Sub Amper_AfterUpdate()
Me![¨Ñ§ËÇÑ´] = Me![Amper].Column(1)
Me![ÃËÑÊ] = Me![Amper].Column(2)
Refresh
End Sub
===============================================
1. ก็สร้าง table อีก table นึงขึ้นมามี 2 field คือ เขต , รหัสไปรษณีย์
2. ใน form การบันทึกที่อยู่ ตรง field ที่เป็นเขต ให้ทำเป็น Combo box แล้วดึงข้อมูลมาจาก table ที่เก็บเขตกับรหัสไปรษณีย์
3. ใน event ของ Combo box ที่ชื่อ after update ให้ไปเขียน code คือ me![ชื่อ field เขตในฟอร์มที่บันทึก] = me![combo box name].column(1)
4. ใน propertie ของ field เขตในฟอร์มนี้ ให้เลือกที่ช่อง Limit to list ว่าเป็น Yes
ก็ น่าจะได้แล้วครับ ที่เหลือลองศึกษาเองครับ �BR>
