Найти ошибку в коде, связанную с его неправильным оформлением - VB

Формулировка задачи:

Ошибка в коде:

Private Sub Command1_Click()
Dim a As Integer
Dim b As Integer
a = Val(TxtA)
b = Val(TxtB)
If a > b
Then
  LblРезультат = Str(a)
Else
  LblРезультат = Str(b)
End If
End Sub

Ругается на

If a > b

Как это исправить? Помогите пжл, мне завтра надо сдать 3 ЛПР

Решение задачи: «Найти ошибку в коде, связанную с его неправильным оформлением»

textual
                            Листинг программы 
                        
                            MsgBox "Наибольшее из чисел"  & Str(a)