Почему это компилируется?
If Months > 1 Then Label.Text = Months + " Months" Else : Months = 1 Label.Text = Months + " Month" End If
Использование Visual Studio 2010.