Página 1Programação III

Programando no Visual Basic

Programação III

Página 2Programação III

Estrutura de Controle

If...ThenQuando uma expressão condicional for utilizada em um blocoespecial de instruções chamado de Estrutura de Decisão, elacontrola se outras instruções no programa são executadas eem que ordem são executadas.Sintaxe:

If condição Then instrução

Exemplo:If Pontos >= 100 Then Label1.Text = “Você Ganhou!”

Pag nº 2

Página 3Programação III

Visual Basic - Funções

• MsgBox(prompt[, buttons][, title][, helpfile, context])– Buttons:

Ex.:MsgBox("Cadastro com sucesso!!", MsgBoxStyle.Information, "Cadastro")

Pag nº 3

OKOnly 0 Exibe somente botão OK.OKCancel 1 Exibe botões OK e Cancelar.AbortRetryIgnore 2 Exibe botões anular, repetir e ignorar.YesNoCancel 3 Exibe botões Sim, Não e Cancelar.YesNo 4 Exibe botões Sim e Não.RetryCancel 5 Exibe os botões ' Repetir ' e ' Cancelar '.Critical 16 Exibe o ícone de Mensagem Crítica.Question 32 Exibe o Ícone de aviso de consulta.Exclamation 48 Exibe o ícone de mensagem de aviso.Information 64 Exibe o ícone de mensagem de informação.

Página 4Programação III

Visual Basic - Funcões

If MsgBox("Deseja sair ?", MsgBoxStyle.YesNo, "Programa") = MsgBoxResult.Yes ThenApplication.Exit()

End If

Pag nº 4

Página 5Programação III

Visual Basic - Funções

• Application.Exit()• Int• Now• FormatDateTime(Expression,format)• InputBox(prompt[, title][, default])

Pag nº 5

Página 6Programação III

Visual Basic -

• Principais propriedades:– Name– AutoCheck– BackColor– BorderStyle– Checked– Enabled– Font– Text– TextAlign– Visible

Pag nº 6

• Principais Eventos– Click– CheckedChanged

Página 7Programação III

Visual Basic - RadioButton

Exemplo: If rdbSelecionado.Checked Then

MsgBox(rdbSelecionado.text)End If

Evento - CheckedChanged

Pag nº 7

Página 8Programação III

Exercício

1. Crie um programa que realize operações simples (+, -, x, ÷ ) com duas TextBox e exiba o resultado em uma terceira.

Pag nº 8

Página 9Programação III

Visual Basic -

Pag nº 9

• Principais propriedades:– Name– AutoCheck– BackColor– BorderStyle– Checked– Enabled– Font– Text– TextAlign– Visible

• Principais Eventos– Click– CheckedChanged

Página 10Programação III

Visual Basic - CheckdBox

Exemplo:

Dim strcheck As String = ""If chkSoma.Checked Then

strcheck = strcheck & chkSoma.Text & Chr(13)End If

Pag nº 10

Página 11Programação III

Visual Basic - Prefixos

Controle Prefixo

Button btn

ComboBox cbo

CheckBox chk

Label lbl

ListBox lst

MainMenu mnu

RadioButton rdb

PictureBox pic

TextBox txt

Pag nº 11

Página 12Programação III

Exercício

2. Faça um programa em que você entre com ovalor das notas da P1,P2,P3, calcule a média eexiba na tela se o aluno está aprovado ou não (>6,0).

Pag nº 12

Página 13Programação III

Visual Basic -

Pag nº 13

• Principais propriedades:– Name– BorderStyle– DataSource– DropDownStyle– Enabled– Font– Item– Sorted– Text– Visible

• Principais Eventos– Click– SelectedIndexChanged

Página 14Programação III

Visual Basic - ComboBox

Exemplo: MsgBox(ComboBox1.SelectedItem)MsgBox(ComboBox1.SelectedIndex)ComboBox1.Items.Add("Conceição de Macabu")

• Evento - SelectedIndexChangedMsgBox(ComboBox1.SelectedItem)

Pag nº 14

Página 15Programação III

Exercício

1. Faça um programa que simule o formulário decadastramento abaixo e depois exiba as opçõesselecionadas pelo usuário

Pag nº 15

Página 16Programação III

Estrutura de Repetição

As estruturas de loop (ou laço) são utilizadas parapermitir que um mesmo conjunto de instruçõessejam executadas continuamente, até que umadeterminada condição seja satisfeita.

• For ... NextFor... <contador> = <começo> To <fim> Step <passo>

DeclaraçãoNext <contador>

Pag nº 16

Página 17Programação III

For ... Next

Exemplo:

For incrementa = 0 To 100ProgressBar1.Value = incrementa

Next

Pag nº 17

Página 18Programação III

While...Wend

• Nesta variante, as instruções dentro do serãoexecutadas enquanto (While) o <valor decondição> for verdadeiro. Isto significa que, se ovalor de <condição> for falso antes do início dolaço, as declarações contidas em seu interior nãoserão executadas.

While <condição>Declaração

Wend

Pag nº 18

Página 19Programação III

While...Wend

Pag nº 19

Exemplo:

While ProgressBar1.Value < ProgressBar1.MaximumProgressBar1.Value = ProgressBar1.Value + 1

End While

Página 20Programação III

With... End With

• Esta estrutura permite que o programadorreferencie diretamente cada elemento oupropriedade de uma coleção (ou matriz), sem anecessidade de especificar o caminho completo(ou índice) para cada elemento da coleção.

• A estrutura With... End With, é muito utilizadapara permitir a alteração de diversas propriedadesde um único controle ou formulário do Visual Basic

Pag nº 20

Página 21Programação III

With... End With

• Exemplo: para alterar diversas propriedades de uma Etiqueta (Label) chamada lbNome, utiliza-se a estrutura With... End With, da seguinte forma:

With lbNome.Text = "Nome :".BackColor = Color.Aquamarine.ForeColor = Color.DarkBlue

End With

Pag nº 21

Página 22Programação III

Data Source

• Datasource é um nome dado à configuração de conexãopara um banco de dados de um servidor. O nome énormalmente utilizado quando cria-se uma consulta para obanco de dados. O DSN (Datasource Name) não tem queser o mesmo que o nome do arquivo para o banco dedados. Por exemplo, um arquivo de banco de dadoschamado "amigos.mdb" poderia ser definido com um DSNde "escola". O DSN "escola" seria então utilizado parareferir-se ao banco de dados quando realizasse umaconsulta.

Pag nº 22

Página 23Programação III

DataSet

• O DataSet é uma classe "chave" dentro daarquitetura ADO.NET. O DataSet é como nossobanco de dados, porém em memória. Dentro delepodemos armazenar vários DataTable. É possívelvocê adicionar um ou mais DataTable e dediferentes fontes de dados (SQLServer, Oracle,Sybase, XML, etc...).

Pag nº 23

Página 24Programação III

DataSet

• Imagine que você necessita buscar informações de umatabela em um servidor com o SQL Server e outra a partirde um Oracle, porém esses bancos não conversam entresi, estão em redes que não se comunicam. Você podebuscar as informações dos servidores e adicionar osretornos dentro de um DataSet. Você estará "virtualmente"criando um Banco de Dados local, na sua memória, eainda podendo estabelecer os relacionamentos entre astabelas, caso elas possuam algum tipo de relacionamentocom o objeto DataRelation.

Pag nº 24

Página 25Programação III

DataAdapter

• O DataAdapter serve como um elo de ligaçãoentre a fonte de Dados e o DataSet. Podemosusar o DataAdapter para adicionar o resultado deuma declaração SQL dentro de um DataSet. ODataAdapter executará sua declaração SQL naconexão que for passada para ele.

Pag nº 25

Página 26Programação III

Exemplo

• Criar um sistema com Tela de cadastro de Produtos utilizando Objetos

Pag nº 26