一个VB问题

无名人物

各位大大，请问如何在一个textbox里只可以限制输入被应许的数字或文字
比如在某某个textbox里只可以应许输入0-9
大家帮个忙讲解该输入的code好吗？谢谢


我有贴错地方吗？

goatstudio

你可以写一个 validation method 来检查, 只要用户在按某个 button 的时候, 就会先呼叫这 method.

IsNumber 可以检查一个 string 是否含有数目字.

无名人物

原帖由 goatstudio 于 26-8-2006 06:04 PM 发表
你可以写一个 validation method 来检查, 只要用户在按某个 button 的时候, 就会先呼叫这 method.

IsNumber 可以检查一个 string 是否含有数目字.

請問可以給一個example code嗎？謝謝你的回答

yjham

What version you use?
Step:
1. Select / Click Textbox
2.Select property(F4)
3.Select "maxLength"
4. MaxLength=9

红魔仔

原帖由 yjham 于 7-9-2006 03:41 PM 发表
What version you use?
Step:
1. Select / Click Textbox
2.Select property(F4)
3.Select "maxLength"
4. MaxLength=9

这个之可以限制字数吧。。。
没办法限制只键入“0-9”。。。

johe07

楼主是要只允许输入0-9， 不适9个位数的资料

----------------

如果要0-9
先用goatstudio所说的来做检查
然后看输入的数字是否在0-9之间就可以了

楼主，这个很简单，想想吧。。。
如果做不到，把你想到的概念或源码公开，可以帮你检查

无名人物

谢谢各位大大的帮忙

其实我是个超级初学者来的，对programing这些东西可说是一窍不通
不过因为中五 IT考试有一部分需要用VB来做一个system
所以没办法需要学一点来应付

我用的版本是6.0
因为我做的system都是小小的和不固定的
不过我有问题时，我希望大家可以帮帮忙下

多问一个问题，最近遇到的
当一个textbox没填时就施一个MsgBox来提醒用户
但我的code好像还缺少一点东西，所以会出现错误 13
请问我缺少了什么吗？
再次谢谢大家的帮忙

If Text1.Text = "" Then MsgBox "Sila Isikan Data", vbInformation, "Attention"

DRAGONISM

If Text1.Text = "" Then MsgBox "Sila Isikan Data", vbInformation, "Attention" 是对的

应该是其它地方错了。当error出现时，你按debug，会停在哪儿呢？

waiting_hoh

我自己用的码是这样。。不知道对么。。。=.=a


Private Sub txtInterval_KeyPress(KeyAscii As Integer)
  If KeyAscii = 8 Then
    Exit Sub
  End If

  If Not (KeyAscii >= 48 And KeyAscii <= 57) Then
    KeyAscii = 0
  End If
End Sub