Aula 8 - VBS - Comando If...Then...Else

Caro internauta...

Esta aula é continuação da aula 7, caso seja sua primeira leitura no blog, pode ser muito necessário que você leia a aulta anterior, clicando abaixo:

Aula 7 - VBS - Comando If...Then...Else

Já expliquei parte da teoria sobre o condicional: " If... then ... else... end if " , inclusive, foi falado que podemos utilizá-lo de duas maneiras (a grosso modo), estudamos um exemplo da primeira maneira, nesta postagem estudaremos um exemplo da segunda maneira.

Contextualizando:

Ao criar um programa/aplicativo/jogo, o programador tem que prever todas as ações do futuro usuário, isso nem sempre é fácil... para cada ação do usuário é interessante ter uma instrução para a máquina executar... este é o papel do programador.

Já estudamos que o condicional cumpre esta tarefa, aliás, é um dos comandos que nos ajuda nesta tarefa de previsão.

No primeiro exemplo, tínhamos, aparentemente, duas opções: clicar nos botões SIM ou NÃO, mas se tívessemos o Botão CANCELAR??? Ou, se o Usuário ao invés de clicar nos botões SIM ou NÃO resolvesse fechar o programinha??? 

A ideia é fazer você pensar... 

Outros exemplos: 

1 - Você criou um programa que pede para digitar um número, mas a pessoa digita uma letra? Se o programador não prever isto, seu programinha terá um BUG/DEFEITO.

2 -Você cria um programinha para classificar um número em PAR ou ÍMPAR, mas esquece que o número ZERO "0" não é nem PAR e nem ÍMPAR... outro bug...

Então a dica é: Cuidado e Atenção na hora de usar o condicional... 

Vamos ao exemplo, com três opções:

1. if    [primeira-condição]    then
2.      [instrução 1]
3. elseif   [segunda-condição]   then
4.     [instrução 2]
5. else
6.    [instrução 3]
7. end if

Agora com quatro opções:

1. if    [primeira-condição]    then
2.      [instrução 1]
3. elseif   [segunda-condição]   then
4.     [instrução 2]
5. elseif   [terceira-condição]   then
6.     [instrução 3]
7. else
8.    [instrução 4]
9. end if

E daí por diante... ou seja, você pode usar com quantas condições forem necessárias, basta repetir a parte: 

elseif   [segunda-condição]   then
    [instrução 2]

Dica importantíssima:
Sempre deixe a última parte do comando para os casos não previstos, chamarei aqui de resíduos, ou seja aquilo que não é esperado, exemplo da pessoa que digita uma letra, onde era para digitar um número, você não conseguirá prever todas as letras que a pessoa digitará...

Nosso exemplo computacional:

Criar um programinha que pede para pessoa digitar um dos números 1, 2 ou 3.

Para cada número digitado, o computador retorna o número em Inglês e em algarismos romanos.

Resíduo: Números diferentes de 1,2 e 3, qualquer letra ou qualquer ação que não seja digitar 1, 2 ou 3.


 Segue o código...(copie e cole no bloco de notas, salve com a extensão VBS):

dim perg, um, dois, tres, res

perg = inputbox("Digite 1, 2 ou 3: ","Condicional -If")

if perg = "1" then 

    um = msgbox ("Número 1: Em inglês - ONE, Algarimos Romanos -I ",0+48, "Resposta para um") 

elseif perg = "2" then 

    dois = msgbox ("Número 2: Em inglês - TWO, Algarimos Romanos -II ",0+48, "Resposta para dois")

elseif perg = "3" then

    dois = msgbox ("Número 3: Em inglês - THREE, Algarimos Romanos -III ",0+48, "Resposta para dois")

else

    res = msgbox ("Você não digitou 1, 2 ou 3. Tente novamente ",0+16, "Resposta para dois")

end if


Ilustação:

 

Atenção: Qualquer coisa que a pessoa digitar diferente de 1,2 ou 3 será acionada a última instrução, por isto a chamo de residual.

Aula 7 - VBS - Comando If...Then...Else

E ai pessoal... beleza? 
Vamos aprender mais um pouco de programação...

Sequência:
 Esta postagem faz parte da série sobre programação em linguagem VBS, portanto é necessário ler as postagens na ordem, para entender melhor , segue os links (basta clicar e ler):

Aula 1 - Programação em VBS - Introdução (leitura obrigatória)
Aula 2 - Programação em VBS - Vídeo 1- (Aprender a salvar o arquivo VBS)
Aula 3 - Programação em VBS - Vídeo 2, msgbox.
Aula 4 - Calculadora de logaritmo em VBS.
Aula 5 - Programação VBS - Inputbox - Introdução.
Aula 6 - VBS - Inputbox - vídeo 1.


Comando da aula: 

Condicional -   If... then ... else... end if.

Para que serve: 
É a alma da lógica computacional, faz com que o computador tome uma decisão se satisfeita determinada condição. 

Exemplo do dia-a-dia: 
Se hojé é domingo vou a igreja, mas se hoje é segunda vou ao trabalho.

Exemplo computacional: 
Se o usuário clicar em SIM mostre a mensagem 1, mas se clicar em NÃO mostre a mensagem 2.

Com este comando (junto com o msgbox e inputbox) podemos criar alguns programinhas simples mais interessantes.

Sintaxe do comando: 
Temos duas maneiras de usar o comando veja:

Primeira maneira (quando só temos duas condições/situações/opções/eventos):

1. if    [primeira-condição]   then
2.     [instrução 1]
3. else 
4.     [instrução 2]
5. end if

Segunda maneira (quando temos mais de duas condições/situações/opcções/eventos):

1. if    [primeira-condição]    then
2.      [instrução 1]
3. elseif   [segunda-condição]   then
4.     [instrução 2]
5. else
6.    [instrução 3]
7. end if

 Observações: O que está em preto é imutável é o comando em si.
                        O que está em azul são códigos que você vai modificar de acordo o que deseja fazer.



Exemplo prático:
(copie e cole no Bloco de notas, exclua os números das linhas, depois salve com a extensão VBS):

1      dim perg, resp1, resp2

2      perg = msgbox ("Você sabe VBScript? ",vbyesno+32,"Exemplo de condicional")

3     if perg = vbyes then 

4    sim = msgbox ("Que bom, parabéns ! ",0+48, "Resposta para YES - Sim") 

5    else

6    resp2 = msgbox ("Que pena, mas você pode aprender! ",0+16, "Resposta para NO - Não")

7    end if


Explicando passo-a-passo: 

Linha 1: Definindo as variáveis.

Linha 2: Fazendo a pergunta, usando o msgbox com dois botões SIM e NÃO (vbyesno) + o ícone de interrogação (32).

Linha 3: Começa o condicional, onde a primeira condição é "perg = vbyes" ou seja, se a pessoa responder a pergunta com sim.

Linha 4: É a primeira instrução, se a pessoa aperta sim, o computador mostra a mensagem: "Que bom, parabéns ! ".

Linha 5: Continuação do condicional, "else" quer dizer, caso contrário do primeira condição, ou seja, se a pessoa apertar o botão não.

Linha 6:  É a segunda instrução, se a pessoa clicar em Não, o computador exibe a mensagem: " Que pena, mas você pode aprender ".

Linha 7: Finalizando o condicional " end if " , sempre é obrigatória esta linha.

Veja a ilustração abaixo:










Dúvidas... sugestões ... dicas ... perguntas ... deixe um comentário.

Em breve postarei um vídeo falando sobre esta postagem.. .aguardem.

Aula 6 - VBS - Inputbox - vídeo 1.

Caros leitores...

Conforme o noticiado no post: Programação VBS - Inputbox - Introdução. , onde começamos a estudar o comando inputbox, gravei um vídeo com alguns exemplos e dicas.

Atenção: 
                         É importante ler todos os post e vídeos relacionados a programação em linguagem em VBS para entender o conteúdo plenamente, pois muitos requisitos estão nestes materiais. Estude pela ordem cronológica de postagem. Para facilitar segue os links (só clicar e se divertir ...)

1. Programação em VBS
2. Programação em VBS - Vídeo 1
3. Programação em VBS - Vídeo 2, msgbox. 
4. Calculadora de logaritmo em VBS.  (pode ser omitido)
5. Programação VBS - Inputbox - Introdução. 

Segue o vídeo, tenham um bom aproveito:

Dúvidas, sugestões ou dicas? deixe um recado...

Aula 5 - VBS - Inputbox - Introdução.

Olá galera ...

Já fiz 4 postagens sobre programação VBS, é importante que você as leia para continuar, se tiver na correria leia pelo menos estes links:

• Programação em VBS - Vídeo 2, msgbox.
• Programação em VBS - Vídeo 1
• Programação em VBS

DESCRIÇÃO DO COMANDO: Inputbox é um box de entrada de dados, ou seja, é o que permite o usuário interagir com o computador, digitando nomes, números, etc.  

SINTAXE: Temos pelo menos três maneiras de utilizarmos este comando, vejamos:  

Primeira: 

                     inputbox"Mensagem 1..."

Explicando: Só aparecerá a mensagem e o campo para digitar. Veja a ilustração:

                               

Segunda: 

                      var1 = inputbox ("Mensagem","Título")

Explicando: Aparecerá a mensagem, o título do box e o campo para digitar. Neste exemplo foi definida como uma variável (veja os vídeos se não sabe o que é uma variável e como definí-la), veja o exemplo:

                                

Terceira:     

                 var2 = inputbox ("Mensagem ","Título ","Dica","100","200")

Explicando: Aparecerá tudo que aparecer na "Segunda" e uma dica no campo de entrada, como exemplo, digita aqui seu nome. Além disso, os números 100 e 200 indicam a localização do box em relação a tela do computador. Veja:

                               

 Atenção: A segunda maneira é a mais utilizada, a teceira só foi explicada a título de conhecimento, pois raramente utilizamos.

Bônus: 
             Em breve postarei um vídeo para complementar estas dicas.

Aula 4 - VBS - Aplicação: Calculadora de logaritmo

Caros internautas ...

Este post faz parte da série sobre programação em VBS.
Se este é o primeiro post que você lê, é recomendável que você leia estes outros (na ordem):

• Post 1 - Introdução a linguagem vbs
• Post 2 - Vídeo 1 - (importante para aprender a salvar um arquivo com extensão VBS)
• Post 3 - Vídeo 2 - (pode ser omitido se você tem muita pressa)

Resumo do programinha: É uma atividade de programação bem simples, que pede para ser digitado um número e será retornado o Logaritmo natural  do número digitado.


Antes de começar, vamos Relembrar uma relação importante:

                                 
Destacamos os seguintes elementos:

• a = Base do logaritmo, nesta caso a = e (número de Euler)
• b = logaritmando ou antilogaritmo
• x = logaritmo

     Lembrete: o número "e" é uma constante irracional, muito usada no cálculo e vale aproximadamente 2,7182... Pode ser definido via limites:

                                                     


 Sintaxe do programa

1 - Digite no bloco de notas (ou copie e cole):

dim num, calc, resp

num = InputBox("Digite um número positivo: ","Calculadora de logarítmo")

calc = Log(num)

resp = msgbox("Número digitado: " & num & chr(13)& chr(13)& "Valor do Log: " & calc,0+48, "Resultado do logarítmo") 


 2 - Salve o arquivo com a extensão vbs 
(se não souber como salvar, assista o vídeo 1)


3 - Execute o programinha
Vá até a pasta em que você salvou o  programinha é dê dois cliques para executar, se você fez tudo certinho terá uma minicalculadora de logaritmo natural.

4 - Imagens do programinha:

Primeira tela do programinha.

 

                 

Digitando 41 e apertando OK

Resultado do logaritmo natural.

 Dúvidas? deixe um comentário ...