ช่วยตรวจสอบ If..Then..Else
กระทู้เก่าบอร์ด อ.Yeadram

 1,050   3
URL.หัวข้อ / URL
ช่วยตรวจสอบ If..Then..Else

Private Sub Command16_Click()
     If txtTextBox1 = "A" Then
        DoCmd.OpenForm "Form1"
    Else
        DoCmd.Quit
    End If
End Sub
ขออธิบาย
1. ข้อมูลใน txtTextBox1 มีค่า A มีค่าเท่ากับ A ใน Codeข้างบน
     แต่กลับกระทำกับคำสั่ง DoCmd.Quit
2.ข้อมูลใน txtTextBox1 มีค่า B มีค่าไม่เท่ากับ A ใน Codeข้างบน
     แต่กลับกระทำกับคำสั่ง DoCmd.Quit เหมือนกับข้อ1
คำถาม
1.Code ผิดหรือเปล่า ถ้าผิด ผิดตรงใหนคะ
2.หรือมีความผิดหลาดเรื่องอื่นๆถ้ามี ช่วยอธิบายหน่อยค่ะ
ขอบคุฯมากต่ะ

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

1 @R17016
ผมดูแล้วก็ไม่เห็นมีอะไรผิดเลยนี่ครับ ลองก็อปปี้ code ของคุณมาลองดูมันก็ให้ผลถูกต้องทุกประการเลยครับ งงเหมือนกันนะครับ ลอง กระชับและซ่อมแซมดู หรือตรวจเช็คตัว access ดูว่าสมบูรณ์ดีอยู่หรือเปล่าด้วยก็ดีนะครับ และลองดูท่านอื่นที่มีความรู้มากกว่าผมตอบให้อีกทีนะครับ
2 @R17017
คุณน้ำค้าง ผมจะส่ง file ที่ผมลองทำโดยใช้ code ของคุณทั้งหมดแล้วใช้ได้ไปให้ดู มีอีเมลไหมครับ ถ้านำไปใช้แล้วเปิดไม่ได้อีก ก็ต้องหาเหตุอื่นล่ะครับ
3 @R17020
ขอบคุณ คุณlek มากค่ะ
nan20130@hotmail.com
@ ประกาศใช้งานเว็บบอร์ดใหม่ => บอร์ดเรียนรู้ Access สำหรับคนไทย
แล้วจะใส่ลิ้งอ้างอิงมาที่โพสต์เก่านี้หรือไม่ก็ตามสะดวกครับ
Time: 0.3424s