[VB.NET]求助,简单的问题

VB.NET源码-156个实用实例哦…… <script type="text/javascript"> </script> <script type="text/javascript" src="http://pagead2.googlesyndication.com/pagead/show_ads.js"> </script>
求助,简单的问题
我在form中加了几个text框然后要求对输入的内容做校验,我就集中把几个text校验写在一个check()函数中
然后调用它,是怎么调用的呢,语法不是很懂.献丑了
__________________________________________________________________________
是在VB6环境下的
__________________________________________________________________________
text有改变、和失去焦点2个事件,看你用哪个了
__________________________________________________________________________
能就两个事件都阐述一下吗,辛苦了

因为我不是很在行,但绝对有心学习.
__________________________________________________________________________
几个text框CHECK的业务是一样的吗?不一样的话最好分开写,一个业务一个方法.然后在text框的事件中(比如leave事件)调用你的CHECK方法.CHECK方法可以在脚本中写.
__________________________________________________________________________

Private Sub check()
If txtmeishou.Text = Then
MsgBox
goto erro
End If
end sub

业务都是一样的,我自己想做一个小东东,校验的函数这样写对吗
__________________________________________________________________________
不对吧,这不还是针对一个TextBox的么?
__________________________________________________________________________
我现在问题就是一个text也搞不好,我是在点击 提交 按钮时再让它CHECK,不是离开TEXT时就检验
我看了下TEXT事件,没有LEAVE事件,是不是就是DRAGOVER事件?
__________________________________________________________________________
如果只是要判断是否为空,要求用户必须填入,那么用以下这个过程就好了。不过还是得给每个TextBox都加上类似的过程。

Private Sub txtmeishou_Leave(ByVal sender As Object, ByVal e As System.EventArgs) Handles txtmeishou.Leave
If txtmeishou.Text = Then
MsgBox( Please Input Something BEFORE LEAVE! )
txtmeishou.Focus()
End If
End Sub
__________________________________________________________________________
如果只是要判断是否为空,要求用户必须填入,那么用以下这个过程就好了。不过还是得给每个TextBox都加上类似的过程。

Private Sub txtmeishou_Leave(ByVal sender As Object, ByVal e As System.EventArgs) Handles txtmeishou.Leave
If txtmeishou.Text = Then
MsgBox( Please Input Something BEFORE LEAVE! )
txtmeishou.Focus()
End If
End Sub
__________________________________________________________________________
对,我想要的也就是这样的代码,不过自己就是写不出来啊看来路还很遥远,要加强学习

这里谢谢了.辛苦了
__________________________________________________________________________
不是的,没注意是6.0下的。其实类似于LostFocus事件,您应该去VB版问的,这里是.NET,容易混淆,呵呵。
__________________________________________________________________________
6.0下,这样吧。

Private Sub Text1_LostFocus()
If Text1.Text = Then
MsgBox Please Input Somethind BEFORE LEAVE!
Text1.SetFocus
End If

End Sub

好久没用6.0了,感觉真难用啊。lz改学.NET吧,初学的话好用极了。
__________________________________________________________________________
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值