The code of love

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

Anúncios

Sobre Ismael Paulo Santos

Business Intelligence, Tecnologia, Livros e todos os assuntos que buscam melhorar nossa passagem pela terra são de meu interesse

Publicado em 19 19-03:00 agosto 19-03:00 2013, em Sem categoria e marcado como , , . Adicione o link aos favoritos. Deixe um comentário.

Deixe um comentário

Preencha os seus dados abaixo ou clique em um ícone para log in:

Logotipo do WordPress.com

Você está comentando utilizando sua conta WordPress.com. Sair /  Alterar )

Foto do Google

Você está comentando utilizando sua conta Google. Sair /  Alterar )

Imagem do Twitter

Você está comentando utilizando sua conta Twitter. Sair /  Alterar )

Foto do Facebook

Você está comentando utilizando sua conta Facebook. Sair /  Alterar )

Conectando a %s

%d blogueiros gostam disto: