พิมม์ข้อความเกินให้ msg แจ้งเตือน


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

20 มี.ค. 62 , 23:51:27
อ่าน 1172 ครั้ง

naekkhung

มี text ชื่อ collection กำหนดให้คีย์ข้อความได้ไม่เกิน 500 ถ้าเกินให้ขึ้น msg แจ้งเตือนเขียนหน้า form ยังไงครับ

 

21 มี.ค. 62 , 00:48:20
ตอบกลับ #1

สันติสุข

: พิมม์ข้อความเกินให้ msg แจ้งเตือน
« ตอบกลับ #1 เมื่อ: 21 มี.ค. 62 , 00:48:20 »
ถ้าสามารถแก้ฟิลด์ในเทเบิลให้มีความยาว 500 ตัวอักษรได้ เวลาป้อนก็จะถูกจำกัดไปโดยปริยาย  แต่ถ้าไม่ได้ ก็ใส่โค้ดข้างล่างไว้ใน KeyPress event procedure ของ collection
โค๊ด: [Select]
Private Sub collection_KeyPress(KeyAscii As Integer)
    If KeyAscii <> vbKeyBack Then
        If Len(Me.collection.Text) = 500 Then
            KeyAscii = 0
            Msgbox "ข้อความแจ้งเตือน"
        End If
    End If
End Sub
ช่วยพกถุงผ้า/ถุงพลาสติกใช้แล้วไปซื้อของเพื่อลดการใช้พลาสติก ขยะ รักษาสิ่งแวดล้อม และไม่ให้ภาวะโลกร้อนวิกฤติเร็วขึ้นกว่านี้
ช่วยคลิกโฆษณาข้างล่างนี้ เพื่อสนับสนุนเวปบอร์ดด้วยครับ
:nice day:
 
โพสต์นี้ได้รับคำขอบคุณจาก: naekkhung

21 มี.ค. 62 , 11:26:53
ตอบกลับ #2

naekkhung

: พิมม์ข้อความเกินให้ msg แจ้งเตือน
« ตอบกลับ #2 เมื่อ: 21 มี.ค. 62 , 11:26:53 »
ขอบคุณ อ.สันติสุข มากครับได้แล้วครับ

 
โพสต์นี้ได้รับคำขอบคุณจาก: TIM_cb


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


 

Sitemap 1 2 3 4 5