ห้ามคีย์เว้นวรรคใน Split Form



0 สมาชิก และ 1 บุคคลทั่วไป กำลังดูหัวข้อนี้

26 พ.ค. 61 , 10:06:37
อ่าน 673 ครั้ง

prajak

ห้ามคีย์เว้นวรรคใน Split Form
« เมื่อ: 26 พ.ค. 61 , 10:06:37 »
ผมออกแบบฟอร์มแบบ Spit Form (datasheet) มีบางฟิวด์ต้องการป้องกันไม่ให้มีการคีย์เว้นวรรค ผมเลยค้นหาวิธีไปเจอคำตอบของคุณ TTT ตามรูป ซึงใช้ได้ดีทีเดียวบนฟอร์มที่ไม่ใช่แบบData Sheet แต่ทำไมมันใช้ไม่ได้กับ Split form(แบบ datasheet )ครับ



 

26 พ.ค. 61 , 10:22:43
ตอบกลับ #1

ปิ่นณรงค์

: ห้ามคีย์เว้นวรรคใน Split Form
« ตอบกลับ #1 เมื่อ: 26 พ.ค. 61 , 10:22:43 »
ผมออกแบบฟอร์มแบบ Spit Form (datasheet) มีบางฟิวด์ต้องการป้องกันไม่ให้มีการคีย์เว้นวรรค ผมเลยค้นหาวิธีไปเจอคำตอบของคุณ TTT ตามรูป ซึงใช้ได้ดีทีเดียวบนฟอร์มที่ไม่ใช่แบบData Sheet แต่ทำไมมันใช้ไม่ได้กับ Split form(แบบ datasheet )ครับ


น่าจะใช้ได้ปกตินะครับ ลองเช็คดูอีกทีว่าใส่ Event ไว้ที่ textbox ตัวไหน
« แก้ไขครั้งสุดท้าย: 26 พ.ค. 61 , 10:26:30 โดย ปิ่นณรงค์ »
:love: :grin:
 
โพสต์นี้ได้รับคำขอบคุณจาก: prajak

26 พ.ค. 61 , 10:34:46
ตอบกลับ #2

prajak

: ห้ามคีย์เว้นวรรคใน Split Form
« ตอบกลับ #2 เมื่อ: 26 พ.ค. 61 , 10:34:46 »
เช็คดูแล้วยังไม่ได้ครับ


 

26 พ.ค. 61 , 10:38:58
ตอบกลับ #3

ปิ่นณรงค์

: ห้ามคีย์เว้นวรรคใน Split Form
« ตอบกลับ #3 เมื่อ: 26 พ.ค. 61 , 10:38:58 »
อ่อโอเค เป็นบน Spilit Form ผมอ่านไม่เคลียอิอิ
:love: :grin:
 
โพสต์นี้ได้รับคำขอบคุณจาก: prajak

26 พ.ค. 61 , 13:48:34
ตอบกลับ #4

TTT

: ห้ามคีย์เว้นวรรคใน Split Form
« ตอบกลับ #4 เมื่อ: 26 พ.ค. 61 , 13:48:34 »
ทำเหมือนเดิม แต่ให้เปลี่ยน Event เป็น On KeyPress แล้วใช้โค้ดตามนี้ครับ

Private Sub INVOICE_KeyPress(KeyAscii As Integer)
    If KeyAscii = 32 Then
        KeyAscii = 0
    End If
End Sub
ฐานข้อมูลเป็นเรื่องใกล้ตัว ใครๆก็ทำฐานข้อมูลเองได้นะครับhttp://www.youtube.com/c/AccessCreator link
 
โพสต์นี้ได้รับคำขอบคุณจาก: prajak

26 พ.ค. 61 , 13:58:33
ตอบกลับ #5

prajak

: ห้ามคีย์เว้นวรรคใน Split Form
« ตอบกลับ #5 เมื่อ: 26 พ.ค. 61 , 13:58:33 »
ทำเหมือนเดิม แต่ให้เปลี่ยน Event เป็น On KeyPress แล้วใช้โค้ดตามนี้ครับ

Private Sub INVOICE_KeyPress(KeyAscii As Integer)
    If KeyAscii = 32 Then
        KeyAscii = 0
    End If
End Sub
ตามที่คุณ TTT บอกมาได้เแล้วครับ ขอบคุณมากๆนะครับ

 


บอร์ดเรียนรู้ Access สำหรับคนไทย