看板 Visual_Basic 關於我們 聯絡資訊
※ 引述《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)
ablboy:疏忽 感謝糾正! :D 59.113.87.122 09/01