Sub amor ()
Dim sentimento as variant
Dim razao as boolean
Sentimento = inputbox “quanto vale o seu amor? ”
Razao = inputbox “o que é liberdade para você? ”
If sentimento > 0 then
Msgbox “you have a problem”
Else
Razao
End if
End sub
The code of love
Publicado
@IsmaPSan 