Re: 要如何讓使用者輸入數字??

[ablboy (秘密行動計畫中(B))]

※ 引述《oycoyc (.......)》之銘言：
: 現要讓使用者只能輸入數字,(可為浮點數)
: 不知有無類似C裡面 scanf 的方式?

Sub Text1_KeyPress(KeyAscii as Integer)
        If Instr(1, "0123456789.", KeyAscii) = 0 Then
                KeyAscii = 0
        End If
End Sub

        其中利用 InStr 函式搜尋輸入字是否在字串中
        如果找不到的話就將輸入KeyAscii設定成 0 ,
        代表略過此次輸入

        如果字串改成"+-0147258369."
        (故意將數字順序打亂)
        就變成可接受0~9還有小數點與正負號

        如果還要外加也可接受"Enter"按鍵,
        就得在判斷If後加上 And KeyAscii <> 13 Then

        總之使用將不允許輸入的字濾除方式來達到想要的功能
        這樣的解釋不知是否了解...!?

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