กระทู้เก่าบอร์ด อ.Yeadram
1,318 2
URL.หัวข้อ /
URL
นิตยา
มีเรื่องรบกวนทุกท่านค่ะ
ดิฉันได้สร้างตารางสั่งซื้อไว้ค่ะ ประกอบด้วย ฟิลด์
-- รหัสการขาย --รหัสสินค้า --- ราคาขาย ---จำนวน
อยากทราบว่าจะต้องกำหนดอะไรบ้างค่ะ เมื่อเลือกรายการสินค้าแล้ว ราคาขายของสินค้าชนิดนั้นจะขึ้นมาอัตโนมัติตามที่เราได้เลือกชื่อสินค้านั้นไปแล้ว
โดยที่ ได้มีตารางสินค้า และทำการเชื่อมกับตารางสั่งซื้อแล้ว
ปัญหาคือ เลือกสินค้าที่ต้องการได้ แต่ราคาขายไม่ขึ้น
ดิฉันได้สร้างตารางสั่งซื้อไว้ค่ะ ประกอบด้วย ฟิลด์
-- รหัสการขาย --รหัสสินค้า --- ราคาขาย ---จำนวน
อยากทราบว่าจะต้องกำหนดอะไรบ้างค่ะ เมื่อเลือกรายการสินค้าแล้ว ราคาขายของสินค้าชนิดนั้นจะขึ้นมาอัตโนมัติตามที่เราได้เลือกชื่อสินค้านั้นไปแล้ว
โดยที่ ได้มีตารางสินค้า และทำการเชื่อมกับตารางสั่งซื้อแล้ว
ปัญหาคือ เลือกสินค้าที่ต้องการได้ แต่ราคาขายไม่ขึ้น
2 Reply in this Topic. Dispaly 1 pages and you are on page number 1
2 @R04043
ต้องทำงานบนฟอร์มนะครับ เอาข้อมูลจากตาราง sell_detail ไปสร้างเป็นฟอร์ม
id_product ก็จะมี คอนโทรลของตัวเองซึ่งก็คอมโบเหมือนเดิมนั่นแหละครับ แต่ว่า source ของมัน ให้เราเพิ่มมาอีกหนึ่งคอลัมภ์ (ปกติในคอมโบตัวนี้จะมีแค่ 2 คอลัมภ์ คือ รหัสสินค้า กับชื่อของสินค้า)
SELECT id_product, name_product, sell_price_product from product
เขียนอย่างนี้แล้วเราก็จะได้คอลัมภ์มาเพิ่ม อีกหนึ่ง นั่นก็คือ "ราคา" ครับ
ทีนี้ก็ไปเขียนโค้ด ในเหตุการณ์ "เมื่อเปลี่ยนแปลง" (onChange) ในคอมโบตัวนี้ ว่า
- ที่จำเป็นต้องสร้างเป็นฟอร์ม เพราะว่า ในฟอร์มเราสามารถเขียนโค้ด VBA ช่วยงานได้ แต่ถ้าทำงานในตาราง จะนำโค้ด VBA มาช่วยงานไม่ได้ครับ
id_product ก็จะมี คอนโทรลของตัวเองซึ่งก็คอมโบเหมือนเดิมนั่นแหละครับ แต่ว่า source ของมัน ให้เราเพิ่มมาอีกหนึ่งคอลัมภ์ (ปกติในคอมโบตัวนี้จะมีแค่ 2 คอลัมภ์ คือ รหัสสินค้า กับชื่อของสินค้า)
SELECT id_product, name_product, sell_price_product from product
เขียนอย่างนี้แล้วเราก็จะได้คอลัมภ์มาเพิ่ม อีกหนึ่ง นั่นก็คือ "ราคา" ครับ
ทีนี้ก็ไปเขียนโค้ด ในเหตุการณ์ "เมื่อเปลี่ยนแปลง" (onChange) ในคอมโบตัวนี้ ว่า
private sub id_product_change()
me.sell_price_product = me.id_product.column(2)
' ความหมายของคำสั่งบรรทัดเดียวนี่ คือ..
' ให้ ช่อง(textbox) ราคา (บนฟอร์มปัจจุบันนี้) ถูกเติมด้วยข้อมูลใน
' คอลัมภ์ที่สอง ของรายการที่กำลังถูกเลือก (เลือกในคอมโบ)
end sub
- ที่จำเป็นต้องสร้างเป็นฟอร์ม เพราะว่า ในฟอร์มเราสามารถเขียนโค้ด VBA ช่วยงานได้ แต่ถ้าทำงานในตาราง จะนำโค้ด VBA มาช่วยงานไม่ได้ครับ
Time: 0.0643s
การเลือก เลือกผ่านอะไร listbox หรือ combobox
ในคอมโบหรือ listbox นั่น มี rowsource เป็นอย่างไรบ้าง
private sub cbCode_change()
me.txtPrice = cbCode.column(2)
end sub