Предупреждение при пустых тектовых формах - VB

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

Подскажите пожалуйста:

Private Sub Rovno1_Click() ' Сложение
Dim plis As Double
Dim Plis2 As Double
Dim reza As Double
 
plis = CDbl(Plus1.Text)
Plis2 = CDbl(Plus2.Text)
 
reza = plis + Plis2
 
otvet1.Caption = reza
If reza = plis + Plis2 = 0 Then
MsgBox ("J")
Else
MsgBox ("LJ")
End If
 
End Sub

Еще я пробовал так:

Private Sub Rovno1_Click() ' Сложение
Dim plis As Double
Dim Plis2 As Double
Dim reza As Double
 
plis = CDbl(Plus1.Text)
Plis2 = CDbl(Plus2.Text)
 
reza = plis + Plis2
 
otvet1.Caption = reza
el:
If Len(Plus1.Text)=0 or Len(Plus2.Text)=0 Then
MsgBox("bla bla bla")
Else
MsgBox ("bla bla 2")
End If
 
End Sub

Видимо тоже не верно. В общем при пустых формах когда я нажимаю кнопку "Rоvno1" должно вылетать сообщение о том, что textbox не заполнены ничем. Как написать правильно что бы заработало? А то у меня этот исходный код работает только наоборот, когда я введу символы в textbox а не из за отсутствие их, ну а если отсутствует символы то он пишет следующее: Помогите решить проблему желательно с объяснением. Сама программа в целом работает нормально, но не сделать это предупреждение

Решение задачи: «Предупреждение при пустых тектовых формах»

textual
                            Листинг программы 
                        

                            Private Sub Rovno1_Click()
   If plus1.Text = "" Or plus2.Text = "" Then MsgBox ("Одно из полей пустое")
   otvet1.Caption = Val(plus1.Text) + Val(plus2.Text)
End Sub
                        