Dim input As InputDialog
input.InputType = input.INPUT_TYPE_TEXT
Dim ans As Int = input.Show("Enter Server IP:", "IP", "OK", "", "Cancel", Null)
Dim ip As String
If ans = DialogResponse.POSITIVE Then
ip = input.Input
End If
If ip = "192.168.0.5/" Then
mj1.Connect("192.168.0.5/", 51042)
End If