จากหัวข้อที่แล้ว ผมขอแนบไฟล์มาประกอบน่ะครับ
กระทู้เก่าบอร์ด อ.สุภาพ ไชยา

 402   4
URL.หัวข้อ / URL
จากหัวข้อที่แล้ว ผมขอแนบไฟล์มาประกอบน่ะครับ

ผมมีฟอร์ม ชื่อ A สมมุติ ต้องการให้ ฟิลที่ 1ชื่อ (ราคาเริ่มต้น) ไปบวก กับ ฟิลที่ 2 (เพิ่มครั้งละ) และให้ไปแสดง ที่ ฟิลที่ 3 (ราคาปัจจุบัน) มีมาโคร 1 อัน ชื่อ AddPrice เมื่อคลิ๊ก ให้ฟิลที่ 3 แสดงผลรวม ราคารวมปัจจุบัน
เช่น 1=[5, 000.-] 2 =[200.-] อันที่ 3 คือผลลัพย์ ที่จะได้ คือราคา ผู้ประมูลตอนนี้ = [5, 200.-]
เวลาผมเขียนสูตร ก็คือ ฟิลที่ 1 + ฟิลที่ 2 จากฟอรม์เดียวกัน ผลลัพได้ถูกต้อง
ทีนี้มีประเด็นว่า ถ้าต้องการกดปุ๋ม AddPrice เป็นครั้งที่ 2 (ประมูลเพิ่มต่อ คือเพิ่มได้ครั้งละ 200.- ) อยากจะให้ ฟิลที่ 3 แสดง เป็น [5, 400.- ] และ ถ้ามีอีก ก็ให้แสดงเป็น [5, 600.-] ต้องเขียนอย่างไรครับ

อาจารย์สุภาพ
หนังสือ อาจารย์ มีวางจำหน่ายรึยังครับ ผมอยู่พัทยา กำลังลองหัดเขียนเอ็กเซส อ่านหนังสือก็หลายเล่ม เห็นมี เว็บของอาจารย์นี่ละครับ เจ๋งสุด ในการตอบคำถาม

4 Reply in this Topic. Dispaly 1 pages and you are on page number 1

1 @R03259
ให้ลองใช้โค้ดดังนี้ครับ

Private Sub คำสั่ง6_Click()
If Me.ราคาปัจจุบัน <> "" Then
Me.[ราคาปัจจุบัน] = Me.[ราคาปัจจุบัน] + Me.[เพิ่มครั้งละ]
Else
Me.[ราคาปัจจุบัน] = Me.[ราคาเริ่มต้น] + Me.[เพิ่มครั้งละ]
End If
End Sub

หมายเหตุ ไม่ควรจะจะใช้ชื่อปุ่ม ชื่อฟีลด์ หรือ Text Box เป็นชื่อภาษาไทยนะครับ จะทำให้เขียนโค้ดยาก

2 @R03290
ขอบคุณครับอาจารย์ สุภาพ เป็นที่พึ่งยามยากจริง ๆ ทำให้มีกำลังใจ ศึกษาต่อ เพราะเห็นเขาว่า Access พอเรียนเรียนรู้ได้ด้วยตัวเอง แต่เก่งไม่เก่ง แล้วแต่ศรัธา
ผมจะลองปรับโคดดูครับ เห็นพี่ ACCESS Hotline ก็เข้ามาช่วยตอบ อย่างดีใจเลย แบบเหมือนมีที่พึ่งนะครับ
3 @R03298
แนบไฟล์มาให้ลองดูครับ

กำหนดค่าเริ่มต้นของ เรคคอร์ดแรกสไตล์นี้ก่อน

ราคาเปิด เริ่ม 1000 บาท
ราคาเพิ่มครั้งละ 200 บาท
ช่องราคาปัจจุบันก็ต้อง 1000 บาทก่อน

แล้วก็เริ่มกดปุ่ม
4 @R03339
แอบเอาโค๊ดอาจารย์สุภาพ กับแนวคิด คุณ Access Hotline
ไปลองเขียนใหม่ ใช้ได้แล้วครับ เพื่อใครอย่างได้ตัวอย่างที่ใช้งานได้แล้ว ผมแนบไฟล์มาแล้ว ยังขาดอีกตอน ป้อนรูปเข้าไป แล้วโชว์คู่กับลำดับ แต่ได้โค๊ดอาจารย์สุภาพไปแล้ว Show Pic กำลังลองวิชา
ปกติเป็นคนอ่านโค๊ดไม่เป็น อาจารย์สุภาพ ให้โค๊ดมาไม่กี่บรรทัด บรรลุ(เข้าใจเลย)
อ่านในหนังสือ งง ตอ้งเขียนหลายตัว ของอาจารย์ Me. .....สุดยอด ขอบคุณครับ
@ ประกาศใช้งานเว็บบอร์ดใหม่ => บอร์ดเรียนรู้ Access สำหรับคนไทย
แล้วจะใส่ลิ้งอ้างอิงมาที่โพสต์เก่านี้หรือไม่ก็ตามสะดวกครับ
Time: 0.0480s