0

i need to write a separate program (this program is not connected with my assignment) to validate e-mail, phone number, group, GPA


so far this is what i have...i need help please


Private Sub btnEmail_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnEmail.Click
Dim Symbol1 As Integer
Dim Symbol2 As Integer
Dim TestString As String

TestString = txtData.Text
Symbol1 = InStr(TestString, "@")
Symbol2 = InStr(TestString, ".")


If (Symbol1 < Symbol2) Then
MsgBox("Valid E-mail Accepted")
Else
MsgBox("Please re-enter a valid e-mail address")
End If
End Sub

Private Sub btnPhone_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnPhone.Click

Dim number As Integer

If txtData.Text.Length = 3 Then

txtData.Text = txtData.Text + "-"

End If

2
Contributors
1
Reply
2
Views
6 Years
Discussion Span
Last Post by debasisdas
This topic has been dead for over six months. Start a new discussion instead.
Have something to contribute to this discussion? Please be thoughtful, detailed and courteous, and be sure to adhere to our posting rules.