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

看板Visual_Basic作者 (小獅子)時間19年前 (2005/09/01 07:24), 編輯推噓1(100)
留言1則, 1人參與, 最新討論串3/5 (看更多)
※ 引述《ablboy (秘密行動計畫中(B))》之銘言: : ※ 引述《oycoyc (.......)》之銘言: : : 現要讓使用者只能輸入數字,(可為浮點數) : : 不知有無類似C裡面 scanf 的方式? : Sub Text1_KeyPress(KeyAscii as Integer) : If Instr(1, "0123456789.", Chr(KeyAscii)) = 0 Then : KeyAscii = 0 : End If : End Sub : 其中利用 InStr 函式搜尋輸入字是否在字串中 : 如果找不到的話就將輸入KeyAscii設定成 0 , : 代表略過此次輸入 : 如果字串改成"+-0147258369." : (故意將數字順序打亂) : 就變成可接受0~9還有小數點與正負號 : 如果還要外加也可接受"Enter"按鍵, : 就得在判斷If後加上 And KeyAscii <> 13 Then : 總之使用將不允許輸入的字濾除方式來達到想要的功能 : 這樣的解釋不知是否了解...!? -- VB 程式設計 倉木麻衣 PTT 星爺板 行列輸入法 ====================================================== Visual_Basic MaiKuraki Stephen Array -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 210.58.156.43 ※ 編輯: fumizuki 來自: 210.58.156.43 (09/01 07:25)

59.113.87.122 09/01, , 1F
疏忽 感謝糾正! :D
59.113.87.122 09/01, 1F
文章代碼(AID): #135Zn5Do (Visual_Basic)
文章代碼(AID): #135Zn5Do (Visual_Basic)