Re: [VBA ]新手發問,如何做一個簡單的TextBox防呆?

[Mitnick (Mitnick)]

※ 引述《kaohfun (KJF)》之銘言：
: 我想做一個TextBox，裡面只能讓人輸入數值，
: 但如果有人輸入文字時，執行時就會跳出訊息方塊"請數入整數"
: 目前我是在CommandButton裡輸入
: Private Sub Button_Click()
: Dim N As Integer
: N = Text1.Text
: If........的部份就不知道怎麼寫了
: MsgBox(請數入整數)
: End If
: End Sub
: 謝謝指教m(_ _)m~
Private Sub Text1_KeyPress(KeyAscii As Integer)
    If ((KeyAscii < &H30) Or (KeyAscii > &H39)) Then
        KeyAscii = 0
    End If
End Sub

--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 211.74.118.178