Page 1 of 1

เขียนVBAรับค่าในTextboxได้แค่อักษรตัวพิมพ์ใหญ่กับตัวเลข

Posted: Thu Apr 21, 2016 1:08 am
by natsuda
คือรบรวนหน่อยคะ ต้องการเขียนรับค่าตัวอักษรภาษาอังกฤษตัวพิมพ์ใหญ่กับตัวเลขใน Textbox คะ ขอบคุณนะคะ ขออนุญาติไม่ใส่โค๊ดนะคะ เพราะเขียนเองไม่ได้จริงๆ

Re: เขียนVBAรับค่าในTextboxได้แค่อักษรตัวพิมพ์ใหญ่กับตัวเลข

Posted: Thu Apr 21, 2016 6:34 pm
by snasui
:D ต้องการเช็ค TextBox ใด เช็คเมื่อเกิดเหตุการณ์ใดครับ

Re: เขียนVBAรับค่าในTextboxได้แค่อักษรตัวพิมพ์ใหญ่กับตัวเลข

Posted: Thu Apr 21, 2016 9:30 pm
by natsuda
ที่ Textbox ชื่อ NametBox1 คือถ้ากรองข้อมูลเป็นตัวอักษรภาษาไทยและอักษรภาษาอังกฤษตัวเล็กให้ขึ้นข้อความเตือนคะ

Re: เขียนVBAรับค่าในTextboxได้แค่อักษรตัวพิมพ์ใหญ่กับตัวเลข

Posted: Thu Apr 21, 2016 10:19 pm
by snasui
:D ตัวอย่าง Code ครับ

Code: Select all

Private Sub NametBox1_Change()
    Dim i As Integer
    For i = 1 To Len(Me.NametBox1.Text)
        Select Case Asc(UCase(Mid(Me.NametBox1.Text, i, 1)))
        Case 48 To 57, 65 To 90
        Case Else
            MsgBox "Please check your character."
            Exit Sub
        End Select
    Next i
    Me.NametBox1.Text = UCase(Me.NametBox1.Text)
    Me.Caption = NametBox1.Value
End Sub
ส่วนการกำหนดค่าให้ TextBox เป็นค่าว่างจะใช้ TextBox.Text="" ไม่ใช่ TextBox.Text=" " แบบหลังไม่ใช่เท่ากับค่าว่าง แต่ให้เท่ากับค่าวรรคครับ

Re: เขียนVBAรับค่าในTextboxได้แค่อักษรตัวพิมพ์ใหญ่กับตัวเลข

Posted: Thu Apr 21, 2016 10:49 pm
by natsuda
ขอบคุณนะคะ ได้แล้วคะ

Re: เขียนVBAรับค่าในTextboxได้แค่อักษรตัวพิมพ์ใหญ่กับตัวเลข

Posted: Fri Mar 20, 2020 8:54 am
by suwatchai.com
ขอถามต่อข้อมูลนี้นะค่ะ ถ้าต้องการให้สามารถเว้นวรรค ทำได้ไหมค่ะ พอดีจะเอาไปใช้ในการกรอกชื่อนามสกุลภาษาอังกฤษ รบกวนด้วยนะค่ะ😅😅😅

Re: เขียนVBAรับค่าในTextboxได้แค่อักษรตัวพิมพ์ใหญ่กับตัวเลข

Posted: Fri Mar 20, 2020 6:51 pm
by snasui
:D ลองแนบไฟล์ของตนเองแล้วแจ้งว่าปัจจุบันติดปัญหาตรงไหน อย่างไร จะได้ตอบต่อไปจากนั้นครับ