กระทู้เก่าบอร์ด อ.Yeadram
1,420 3
URL.หัวข้อ /
URL
ช่วยทีครับ Access ของผมคำนวนค่าผิด
จากรูป
access ความต้องการประมาณนี้นะครับ
สินค้าของผมมี 2 อย่าง ได้แก่ D10plus กับ Absolute Collagen ซึ่งผมได้ทำเป็น combobox ดึงจากตาราง product มา
แล้วทีนี้ ราคาสินค้าจะเป็นแบบนี้ครับ สำหรับ D10plus (P0001) ถ้าสั่ง 1 ชิ้น ราคา 380 บาท สั่ง 3 ชิ้น ราคา 370 สั่ง 5 ชิ้น ราคา 350 สั่ง
10 ชิ้นขึ้นไป ราคา 340 บาท ซึ่งผมทำการเขียนโค้ดประมาณนี้ครับ
Code (VB.NET)
01.If Quantity >= 10 Then
02.Text20.Text = "340"
03.Else
04.If Quantity >= 5 Then
05.Text20.Text = "350"
06.
07.Else
08.If Quantity >= 3 Then
09.Text20.Text = "370"
10.
11.Else
12.Text20.Text = "380"
13.
14.End If
15.End If
16.End If
ซึ่งมันคำนวนให้ครับ ตรงนี้ทำได้ แต่ !
ผมจะมาเลือกสินค้าอีกชิ้นนึง ที่เป็น Absolute มันดันจำค่า ของ D10plus ไว้หน่ะครับ
ผมจะต้องทำการเขียนโค้ดคำสั่งอย่างไรให้มันไม่ซ้ำซ้อนกันหรอครับ ขอบคุณครับ
อีกเรื่องครับ คือเวลาผมกรอกราคาสินค้าในช่องราคาสินค้าแล้ว มันดันจำค่าเดิม สมมุตกรอก 550 บาท ช่องต่อมาก็จะขึ้น 550 บาทหน่ะครับ งงเลยย
access ความต้องการประมาณนี้นะครับ
สินค้าของผมมี 2 อย่าง ได้แก่ D10plus กับ Absolute Collagen ซึ่งผมได้ทำเป็น combobox ดึงจากตาราง product มา
แล้วทีนี้ ราคาสินค้าจะเป็นแบบนี้ครับ สำหรับ D10plus (P0001) ถ้าสั่ง 1 ชิ้น ราคา 380 บาท สั่ง 3 ชิ้น ราคา 370 สั่ง 5 ชิ้น ราคา 350 สั่ง
10 ชิ้นขึ้นไป ราคา 340 บาท ซึ่งผมทำการเขียนโค้ดประมาณนี้ครับ
Code (VB.NET)
01.If Quantity >= 10 Then
02.Text20.Text = "340"
03.Else
04.If Quantity >= 5 Then
05.Text20.Text = "350"
06.
07.Else
08.If Quantity >= 3 Then
09.Text20.Text = "370"
10.
11.Else
12.Text20.Text = "380"
13.
14.End If
15.End If
16.End If
ซึ่งมันคำนวนให้ครับ ตรงนี้ทำได้ แต่ !
ผมจะมาเลือกสินค้าอีกชิ้นนึง ที่เป็น Absolute มันดันจำค่า ของ D10plus ไว้หน่ะครับ
ผมจะต้องทำการเขียนโค้ดคำสั่งอย่างไรให้มันไม่ซ้ำซ้อนกันหรอครับ ขอบคุณครับ
อีกเรื่องครับ คือเวลาผมกรอกราคาสินค้าในช่องราคาสินค้าแล้ว มันดันจำค่าเดิม สมมุตกรอก 550 บาท ช่องต่อมาก็จะขึ้น 550 บาทหน่ะครับ งงเลยย
3 Reply in this Topic. Dispaly 1 pages and you are on page number 1
2 @R15416
เดี๋ยวนะครับ คุณเขียนใน VB.net หรือใน VBA ของ MS Access กันแน่ หากเป็นใน MS Access ไม่ต้องใช้ Property .Text เช่น Text20.Text ใช้ใน VB.NET ส่วนใน MS Access ใช้ Text20 แค่นี้พอครับ ต้องแก้ในโค๊ดด้วยนะครับ
3 @R15417
VBA ของ MS Access ครับ (ประมาณว่า คลิ๊กที่ช่องนั้นเเล้วไปใส่โค้ดตรง on_click)ตรง Property หน่ะครับ
แล้วถ้าผมจะเพิ่มหลายๆสินค้า จะต้องเขียน if ซ้อน if หรือป่าวคับราคาสินค้าถึงจะไม่ซ้ำซ้อนกัน เพราะว่าเหมือนเราจะเขียนให้ชี้ไปที่ Text20 อย่างเดียวเลยหน่ะครับ เกรงว่าเวลาเราเลือกสินค้าตัวอื่นๆ ส่วนลดจะตามไปด้วย
ขอบคุณมากครับสำหรับคำตอบดีๆ
แล้วถ้าผมจะเพิ่มหลายๆสินค้า จะต้องเขียน if ซ้อน if หรือป่าวคับราคาสินค้าถึงจะไม่ซ้ำซ้อนกัน เพราะว่าเหมือนเราจะเขียนให้ชี้ไปที่ Text20 อย่างเดียวเลยหน่ะครับ เกรงว่าเวลาเราเลือกสินค้าตัวอื่นๆ ส่วนลดจะตามไปด้วย
ขอบคุณมากครับสำหรับคำตอบดีๆ
Time: 0.3325s
If Combobox1 = "P0001" And Quantity >= 10 Then
Text20.Text = "340"
ElseIf Combobox1 = "P0001" And Quantity >= 5 Then
Text20.Text = "350"
ElseIf Combobox1 = "P0001" And Quantity >= 3 Then
Text20.Text = "370"
Else
Text20.Text = "380"
End If