
Antologia De Projetos No Visual Basic Volume V
De Vitor Amadeu SouzaDuração1h 41m
Sobre este audiolivro
A proposta deste livro é desenvolver os programas listados no sumário da obra, usando o Visual Basic como ferramenta de programação.
Detalhes do audiolivro
GêneroEducation and Learning, Technology
Duração1 h 41 min
Narrado porOuça com mais de 1.000 vozes
FormatoeBook com áudio
Data de publicação6 de jan. de 2020
IdiomaPortuguês
Sumário
1Vitor Amadeu Souza
2Cerne Tecnologia
3nosso programa. Escreva, por exemplo, o seguinte texto: “Meu primeiro
4Obs: Recomenda-se ao leitor que explore as diversas propriedades
5situações no Windows, por exemplo, no momento em que vamos abrir
Mostrar todos os capítulosVer menos
6A ideia será que quando o botão for pressionado em tempo de
7linguagem adotada para
8Msgbox(“Texto a ser apresentado“)
9determinada ação. Para colocar a caixa de texto no seu programa, clique
10pessoa. Para isso, com as alterações de name alteradas, clique duas
11seguinte forma:
12Neste exemplo foram utilizadas as funções de conversão
13função str.
14Single Double Decimal Boolean Char Date String
15Toda vez que este botão for pressionado, neste caso o Sair, o
16o pressionar de um botão, o sistema será capaz de identificá-lo e
17Rd3
18figura abaixo:
19Note que quando o botão Processar for acionado, o mesmo checa
20trecho de código e como o que queremos é justamente apresentar na
21Neste terceiro exemplo, duas variáveis foram declaradas, sendo
22No exemplo abaixo será impresso na List Box a contagem feita
23Após a criação da variável, o conteúdo atual da lista é limpo
24For contagem = Val(valorinicial.text) To Val(valorfinal.text)Step 2 lista.items.add(Str(contagem)) Next
25Capítulo 3
26Capítulo 4
27Altere a propriedade BorderWidth de todos os componentes
28As propriedades vistas até então serão fundamentais ao longo
29Jan Fev Mar Abr Mai Jun Jul Ago Seo Out Nov Dez
30e BackColor para Red.
31l1 l2 l3
32comandos.
33Marrom, preto, amarelo e dourado
34Valor
35If faixa3.Text = "Prata" Then indutor = Integer.Parse(vr) * 0.01
36valor.Text = valor.Text + " uH"
37Marrom, preto, amarelo e dourado
38Valor
39If faixa3.Text = "Prata" Then resistor = Integer.Parse(vr) * 0.01
40Capítulo 7
41Capítulo 8
42Capítulo 9
43res.Text = (vp1 / (vp3 * vp2)).ToString()
44Capítulo 11
45OUT4
46Apesar da comunicação ser Bluetooth, para o computador a
47OUT8
48será apresentada:
49de modo a definir o PC com o endereço IP número 192.168.10.1.
50Windows. Clique em Iniciar -> Programas -> Acessórios -> Prompt de