O Visual Basic for Applications (VBA) é uma implementação do Visual Basic da Microsoft incorporada em todos os programas do Microsoft Office, bem como em outras aplicações da Microsoft, como o Visio, e que foi também incorporada pelo menos parcialmente em outros programas de terceiros como o AutoCAD, Mathcad e WordPerfect.
sábado, 20 de setembro de 2014
'Receber um Numero Pelo usuário dizer Par ou Impar Funçao (Mod 2 = 0)
Sub ParOuImpar()
'Receber um Numero Pelo usuário dizer Par ou Impar
Dim num As Integer
num = CInt(InputBox("Digite um Numero: "))
If num Mod 2 = 0 Then
MsgBox "É PAR"
Else
MsgBox "É IMPAR"
End If
End Sub
Nenhum comentário:
Postar um comentário