Private Sub Command1_Click()
If Text1.Text = "simpati" Then
Form2.Show
Unload Me
End If
If Text1.Text = "im3" Then
Form2.Show
Unload Me
End If
If Text1.Text = "mentari" Then
Form2.Show
Unload Me
End If
If Text1.Text = "axis" Then
Form2.Show
Unload Me
End If
If Text1.Text = "xl" Then
Form2.Show
Unload Me
End If
If Text1.Text = "3" Then
Form2.Show
Unload Me
End If
If Text1.Text = "smartfren" Then
Form2.Show
Unload Me
End If
If Text1.Text = "esia" Then
Form2.Show
Unload Me
End If
If Text1.Text = "as" Then
Form2.Show
Unload Me
End If
If Text1.Text = "flexi" Then
Form2.Show
Unload Me
End If
End Sub
