Page 1 of 1
ขอถามการจำกัดตัวอักษรใน TextBox ครับ
Posted: Tue Nov 26, 2013 2:40 pm
by yodpao.b
ขอถามการจำกัดตัวอักษรใน TextBox ครับ
Capture1.JPG
ผมต้องการให้ TextBox1 จำกัดตัวอักษรให้เท่ากับ 8 ตัว
ตอนนี้ใช้ MaxLength = 8 ดังรูปด้านล่าง
Capture2.JPG
ผลที่ได้คือ
คียืได้ไม่เกิน 8 ตัว ถูกต้องครับ
แต่เมื่อคีย์ 5 ตัว มันก็ไม่มีการแสดงผลอะไร
จะให้มันแสดงการเตือนหรืออะไรก็ได้ที่ต้องคีย์ให้ครบ 8 ต้ว
ทำได้ไหมครับ
ขอบคุณครับ
Re: ขอถามการจำกัดตัวอักษรใน TextBox ครับ
Posted: Tue Nov 26, 2013 2:48 pm
by snasui
MaxLength เป็นการกำหนดจำนวนอักขระสูงสุด ถ้ากำหนดเป็น 8 หมายถึงคืย์ได้ไม่เกิน 8 คีย์แค่ 5 อักขระก็ถูกต้องแล้วที่จะไม่ฟ้องครับ
การตรวจสอบว่าต้องเท่ากับ 8 สามารถตรวจสอบเมื่อต้องการจะทำขั้นตอนถัดไป โดยให้ตรวจสอบว่าหากค่าใน Object ใด ๆ ไม่เป็นไปตามต้องการก็มีข้อความแจ้งเตือนผู้ใช้งาน เช่นนี้เป็นต้นครับ
Re: ขอถามการจำกัดตัวอักษรใน TextBox ครับ
Posted: Tue Nov 26, 2013 3:57 pm
by yodpao.b
ขั้นตอนต่อไปคือ คลิกปุ่มปฏิทิน
เมื่อคลิกปุ่มปฏิทิน จะให้แสดงการตรวจสอบโดยการนับตัวอักษรให้ครบ 8 ตัวก่อน ปฏิทินจึงแสดงผล
แต่ถ้าไม่ถึง 8 ตัว ให้แสดงคำเตือน
ในช่อง textbox ของเลขคำสั่งที่ ชื่อ TextCode
TextCode นี้จะมีอักษรได้ 8 ตัว
เมื่อคลิกปุ่มปฏิทิน
จะเขียน โคด้อย่างไรให้มันนับ 8 ตัว
ผมลองเขียนโคดดังนี้ครับ
Code: Select all
Private Sub cmdDate_Click()
If TextCode.Text = 8 Then
frmDate.Show
Else
MsgBox " กรุณาพิมพ์เลขประจำตัวให้ครบ"
End If
End Sub
โคดผมผิดตรงนี้ครับ If TextCode.Text =
8 Then
แก้อย่างไรดีครับ
ขอบคุณครับ
ต้องกลับบ้านก่อนครับ
Re: ขอถามการจำกัดตัวอักษรใน TextBox ครับ
Posted: Tue Nov 26, 2013 4:49 pm
by snasui
ลองปรับ If เป็นด้านล่างครับ
Re: ขอถามการจำกัดตัวอักษรใน TextBox ครับ
Posted: Tue Dec 17, 2013 10:20 am
by yodpao.b
ขอบคุณมากครับ