Товарищи! Вот появился еще й вопрос
Есть кнопочка, форма 1 и форма 2
При нажатии на кнопочку выскакивает окошко ввода пас, еси пас тру то открывает форму 2
Кто подскажет код, о величайшие умы форума?

Private Sub Command1_Click()
If Text1 = 1 Then Form3.Show

If Text1 <> 1 Then
Unload form1
Dim answer As VbMsgBoxResult
answer = MsgBox("Нифига не прально", vbOKOnly, _
"ерор")
If answer = vbOK Then
Form2.Show
End If
End If
End Sub
Если сделать так то пашет почти правильно тока если в поле было введено 1 и нажать на кнопку оно грузит форму 3 но не закрывает форму 1 ибо если
Private Sub Command1_Click()
If Text1 = 1 Then Form3.Show
Unload form1
то пишет ошибку тут If Text1 <> 1 Then
Вопрос: где я давун?

Спс чувак!!! Все пашет норм.