Подскажите пожалуйста почему не работает приведенный ниже код, причем не нравится кусок выделенный красным, и выдает такое сообщение "Compile error: Syntax error". Должно быть так: при нажатии кнопки на форме открывается одна из трех форм, в зависимости от значения одного поля (вид) на основной форме.

Private Sub Кнопка366_Click()
On Error GoTo Err_Кнопка366_Click

Dim stDocName As String
Dim a As String
Dim b As String
Dim stLinkCriteria As String

a = Form_Д.вид

If a = "1" Then
b = "Форма1"
Else If a = "2" Then
b = "Форма2"
Else
b = "Форма3"
End If

stDocName = b
stLinkCriteria = "[ID_1] = " & Me![id_1]
DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_Кнопка366_Click:
Exit Sub

Err_Кнопка366_Click:
MsgBox Err.Description
Resume Exit_Кнопка366_Click

End Sub

Помогите пожалуйста, не пойму в чем дело! Заранее СПАСИБО!