Re: [VBA ]新手發問,如何做一個簡單的TextBox防呆?
※ 引述《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
討論串 (同標題文章)
本文引述了以下文章的的內容:
完整討論串 (本文為第 2 之 2 篇):
Visual_Basic 近期熱門文章
PTT數位生活區 即時熱門文章