19-07-19, 01:47 AM
محتاج اخلي الكلمه اللي هتكون في تكست بوكس تحتوي علي كلمه معينه جربت الكود دا مانفعش
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If TextBox1.Text = ".com" Then
Label1.Visible = True
Else
MsgBox("Please Insert email")
End If
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Label1.Visible = False
End Sub
End Class
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If TextBox1.Text = ".com" Then
Label1.Visible = True
Else
MsgBox("Please Insert email")
End If
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Label1.Visible = False
End Sub
End Class
