12
1 2
Оператор "if (), else" в VBA MS Access
Как можно увеличить условия? Т. е. после 2 условий, начинаю писать 3-е, после чего он выдает ошибку (1). И еще, при выполнении первого условия вылезает пустое окно, как его убрать (2)?
If (log <> "") Then
Set rstt = db.OpenRecordset("Спарвка", dbOpenDynaset) 'dbOpenSnapshot)
rstt.MoveFirst
While Not rstt.EOF
If log = 1 Then
DoCmd.OpenForm "Ф1_Инф-ия1 "
Else
If log = 2 Then
DoCmd.OpenForm "Ф2_объезды"
2)
1)