Criar caixas de mensagens para rir com os amigos

E bem simples abra o seu bloco de notas e digite

 

x=MsgBox("Aqui vc digita o conteudo da mensagem que você vai usar",4+48,"Aqui vc digita o titulo da mensagem sejá criativo")

os números a cima indicam como sera a caixa de mensagem

o número 4 antes do sinal de mais indica os botões "SIM E NÃO", que aparecem na caixa de mensagem você pode mudar este número para alterar o tipo de mensagem e surtir o efeito desejado.

0 -> Ok
1 -> Ok e Cancelar
2 -> Abortar, Tentar e Ignorar
3 -> Sim, Não e Cancelar
4 -> Sim e Não
5 -> Tentar e cancelar

e onde está localizado o número 48 pode ser colocado os numeros...

16 -> Caixa de erro critico
32 e 48 -> Caixa de Cuidado

para a imagem a cima foi utilizado a composição a seguir

x=MsgBox("Esperamos que tenham gostado da brincadeira, agora é só curtir com a cara dos amigos no bom sentido !",3+16,"TutorialGratis.com.br")


E possivel colocar mais de uma mensagem é só colocar novamente o codigo na linha de baixo

depois de feito é só salvar com extensão .vbs (Visual Basic Script)

então vc cria um atalho no desktop e na propriedade deste atalho vc muda o icone e coloca qualquer outro assim vc pode fingir que é um programa como o internet explorer ou a pagina web da playboy e renomeia e quando alguem quiser acessar a internet abre as mensagem e toma um suto logoco que isso depende da sua menssagem .