当前位置:首页 > 软件应用 > vb中控制在textbox只能输入邮箱格式文本的方法

vb中控制在textbox只能输入邮箱格式文本的方法

最近技术宅一直在做一个数据库的大作业,碰到了很多的问题,通过自己的摸索等等或者搜索引擎的帮助,学习到了很多的东西,想到可能有些朋友也许也会碰到这些问题,所以把一些技巧等东西记录下来吧。

首先说说我们的数据库大作业的结构,这个作业要求的是使用sql server做后台数据库,然后在vs2008平台下,vb设计和制作前台,然后ado.net技术连接前台和后台数据库。

这次给大家分享的经验和方法是:如何限制textbox中只能输入邮箱格式,也就是说,必须输入a@b.com类似的格式,下面直接贴代码:

Public Class Form1
Function notEmail(ByVal Email As String) As Boolean
Dim regEx
regEx = CreateObject(“VBScript.RegExp”)
regEx.IgnoreCase = True
regEx.Pattern = “^[a-z]([a-z0-9]*[-_]?[a-z0-9]+)*@([a-z0-9]*[-_]?[a-z0-9]+)+[.][a-z]{2,3}([.][a-z]{2})?$”
notEmail = IIf(regEx.Test(Email), False, True)
regEx = Nothing
End Function

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If notEmail(TextBox1.Text) Then
MsgBox(“邮箱格式不正确”)
Else
MsgBox(“邮箱格式正确”)
End If
End Sub
End Class

可以看到,添加了一个函数来判断。读者们可以自行添加button控件和textbox空间测试。

友荐云推荐
  • «
  • »
  • 作者:
    除非注明,本文原创:技术宅,欢迎转载!转载请以链接形式注明本文地址,谢谢。
    原文链接:http://www.jishuzh.com/software/vb中控制在textbox只能输入邮箱格式文本的方法.html

    7 thoughts on “vb中控制在textbox只能输入邮箱格式文本的方法

    1. ixwebhosting

      博主真够强大的,还是学生就有这么强的专业了,让人羡慕

    2. 步小松博客

      厉害哦,可以自己写软件了吧

      unclezhou 于 2012-6-10 13:22:25 回复

      没有额 很菜鸟的

    3. 清乐茶博客

      我也是,看到代码就头晕,表示不懂

    4. 阿兴网赚博客

      太专业了,谢谢分享.

    5. 雷东升

      博主这是还没毕业啊

      unclezhou 于 2012-6-9 12:20:31 回复

      是的

    6. 祝北平博客

      看见 代码 就是晕….

      unclezhou 于 2012-6-8 23:05:22 回复

      呵呵 我快成程序猿了

    7. 国外网赚培训

      博主不错啊,很专业

    评论已关闭.