Помогите с Visual Basic

Question

пишу код для решения простой задачи, как сделать так, чтобы в случае, если в InputBox ничего не ввели (никаких слов, цифр) , тогда чтобы высветилось какое-нибудь сообщение?

Private Sub Command1_Click() 
S = InputBox("Введіть суму грошей") 
V = InputBox("Введіть вартість одного зошита") 
 
k = Int(S / V) 
 
rez = MsgBox("Кількість зошитів = " + Str(k)) 
if InputBox(" '' ") 
then MsgBox("Введіть данідля розв'язання задачі")

End Sub 
 
вот пишу так. Рисует красным все строчки "if" и "then" 
 
В чем проблема?

Ира Алёхина · Accepted Answer

Ошибка возникает при неправильном написании "if" и "then" 
 
Рассмотрим основные варианты: 
 
 If [ операция сравнения] Then [ действие ] 
 
Или 
 
If [ операция сравнения] Then 
 [ действие ] 
 [ действие ] 
 [ действие ] 
End If 
 
Или 
 
If [ операция сравнения] Then 
 [ действие ] 
 [ действие ] 
 [ действие ] 
Else 
 [ действие ] 
 [ действие ] 
End If 
 
Если в InputBox ничего не ввели (никаких слов, цифр) , тогда 
он возращает пустую строку ( "" ) 
Вот ее и отслеживайте 
 
Dim MyInput As String 
Dim V As Integer 
MyInput = InputBox("Введіть вартість одного зошита") 
 
If MyInput = "" Then 
MsgBox("Ничего не ввели") 
Else 
V = Val ( MyInput ) 
End If