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

看板Visual_Basic作者 (Mitnick)時間19年前 (2006/08/06 22:14), 編輯推噓0(000)
留言0則, 0人參與, 最新討論串2/2 (看更多)
※ 引述《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
文章代碼(AID): #14rVbT91 (Visual_Basic)
文章代碼(AID): #14rVbT91 (Visual_Basic)