.

.




Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs)
If ((Me.TextBox1.Text = "anime123") And (Me.TextBox2.Text = "mpgh123")) Then
Interaction.MsgBox("Welcome to AnimeArts VIP Multi Tool", MsgBoxStyle.OkOnly, Nothing)
Interaction.MsgBox("Have Fun and enjoy the Tools!", MsgBoxStyle.OkOnly, Nothing)
MyProject.Forms.Form2.Show
Me.Hide
Else
Interaction.MsgBox("Wrong get the hell out of here", MsgBoxStyle.Critical, Nothing)
End If
End Sub
