作者fumizuki (小狮子)
看板Visual_Basic
标题Re: 要如何让使用者输入数字??
时间Thu Sep 1 07:25:31 2005
※ 引述《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)
1F：推 ablboy:疏忽 感谢纠正! :D 59.113.87.122 09/01