quarta-feira, 21 de dezembro de 2011

terça-feira, 20 de dezembro de 2011

Trabalho - valor 20 pontos - Instruções

Calculadora:

Faça uma calculadora comum, semelhante a que vem no Windows, com as 4 operações básicas (soma, adição, multiplicação, divisão). O formulário do programa está apresentado na figura abaixo, com uma TextBox representando o display da calculadora e um conjunto de 16 Botões de Comando representando o teclado.

A calculadora deverá obedecer o seguinte funcionamento:

- Será entrado o primeiro número da operação, clicando-se com o mouse nos botões numéricos do programa. Tal numero deve aparecer no display (TextBox) da calculadora.
- Será clicado um botão que represente alguma das operações básicas. Nesse momento, a TextBox deve ser limpada para aguardar a entrada do segundo numero da operação.
- Será entrado o segundo numero, o qual deve aparecer na TextBox.
- Quando clicar-se no botão = (igual), o resultado da operação deve ser mostrada no display.
- O botão C limpa tudo o que foi entrado na calculadora, e aguarda uma nova conta (operação).

Uma versão de demonstração da calculadora encontra-se para download. Clique aqui para baixar. Após baixar, execute o arquivo calculadora.exe e veja como deverá funcionar o programa que você irá fazer.

Obs: Se, ao executar calculadora.exe for mostrada uma mensagem de erro dizendo que está faltando o arquivo msvbvm60.dll, baixe esse arquivo clicando aqui e o copie para c:\windows\system32. Depois de copiado, entre em um prompt do DOS e digite o comando regsvr32 c:\windows\system32\msvbvm60.dll Tal procedimento deverá resolver o problema. Msvbvm60.dll é uma biblioteca necessária a execução de programas feitos em Visual Basic 6.0 . Computadores que não possuem o Visual Basic instalado podem precisar dessa biblioteca.


Dicas para o algoritmo:

Concatenação de caracteres ou de strings

O operador de concatenação de caracteres ou strings será útil nesse algoritmo. Concatenar duas strings significa junta-las, formando assim outra string. O operador de concatenação é representado por &
Exemplo:
x = “Fábio ”
y = “Pereira”
z = x & y
A variável z guardará “Fábio Pereira”

Na calculadora, por exemplo, quando alguém quiser entrar com um número como 1632, ela terá que clicar nos botões correspondentes aos algarismos 1, 6, 3 e 2 nessa ordem para formar o número. Logo, será necessário concatenar esses algarismos para formar o número em questão. Uma dica de código fonte que pode ser associado ao clique de um botão numérico é:

Private Sub Command3_Click()
Text1.Text = Text1.Text & "3"
End Sub

O código acima está associado ao clique do botão correspondente ao algarismo 3 da calculadora. Esse código concatena o algarismo 3 ao numero que estiver sendo mostrado no display.

Função Val()

A função Val() converte string em número. Os textbox retornam, por padrão, strings. O visual basic muitas vezes identifica automaticamente a necessidade de converter a string de uma textbox em numero, e faz tal conversão. Mas há casos em que o Visual Basic pode não fazer tal conversão, daí será necessário usar a função Val. Verifique um exemplo do uso dessa função nos exercícios de revisão para prova. Lembre-se que o operador + funciona como um concatenador quando os operandos são strings (ou seja, funciona da mesma forma que &) e funciona também como operador de soma quando os operandos são numeros.


Envio do código

Deverá ser enviado para o email saviodepaulasouza@gmail.com os dois arquivos que o visual basic gera no projeto: um arquivo com extensão .vbp (arquivo de projeto) e outro com extensão .frm (arquivo do formulário). São necessários os dois arquivos para compilar o programa. Não serão aceitos programas que não compilem, seja por falta de arquivos, seja por erro de programação. Os programas deverão ser enviados até domingo, 25/12/2011

segunda-feira, 19 de dezembro de 2011

quinta-feira, 15 de dezembro de 2011

Notas da 1ª Prova de Linguagem de Programação II

Notas da 1ª prova, em ordem de nota. (clique na tabela para ampliar)
Para ter conseguido pelo menos 70% de aproveitamento nesta prova, é necessário ter tirado nota igual ou maior que 11,2 pontos.

Vista de prova será na 6ª feira, 16/12/2011.



terça-feira, 13 de dezembro de 2011

Resolução dos exercícios de revisão para a Prova 1 de Linguagem de Programação II

1) Faça um programa que tenha: 1 textbox, 1 commandbutton e 1 label. Funcionamento do programa: Ao clicar no botão, o que estiver escrito na textbox será mostrada na label.

Resolução:

Private Sub Command1_Click()
Label1.Caption = Text1.Text
End Sub


2) Faça um programa que tenha: 1 textbox e 1 commandbutton
Funcionamento do programa: Ao clicar o botão, o que estiver escrito na textbox será mostrado em uma msgbox.

Resolução:

Private Sub Command1_Click()
MsgBox (Text1.Text)
End Sub


3) Faça um programa que tenha: 1 commandbutton e 1 label
Funcionamento do programa: Ao clicar o botão, deverá aparecer uma InputBox e o que for escrito nela deverá, após clicar “OK”, aparecer na label.

Resolução:

Private Sub Command1_Click()
Label1.Caption = InputBox("Entre com alguma mensagem")
End Sub


4) Faça um programa que tenha: 1 textbox e 1 commandbutton
Funcionamento do programa: Ao clicar o botão, o que estiver escrito na textbox deverá aparecer escrito no botão.

Resolução:

Private Sub Command1_Click()
Command1.Caption = Text1.Text
End Sub


5)Faça um programa que tenha: 2 textbox, 1 commandbutton e 1 label
Funcionamento do programa: O programa serve para mostrar o maior entre dois números. Com o programa em execução, em cada textbox deverá entrado um número. Ao clicar-se o botão, o maior deles deverá aparecer na label.

Resolução:

Private Sub Command1_Click()
If Text1.Text > Text2.Text Then
Label1.Caption = Text1.Text
Else
Label1.Caption = Text2.Text
End If
End Sub



6) Faça um programa que tenha: 2 textbox, 1 listbox com opções “maior” e “menor”, 1 commandbutton e 1 label
Funcionamento do programa: Cada uma das textbox receberá um número. Se na listbox estiver selecionada a opção “maior”, a label irá mostrar o maior dos números. Se na listbox estiver selecionado “menor”, então a label mostrará o menor dos dois números.


Resolução:

Private Sub Command1_Click()
Select Case List1.Text
Case "maior"
If Text1.Text > Text2.Text Then
Label1.Caption = Text1.Text
Else
Label1.Caption = Text2.Text
End If
Case "menor"
If Text1.Text > Text2.Text Then
Label1.Caption = Text2.Text
Else
Label1.Caption = Text1.Text
End If
End Select
End Sub


7) Faça um programa que tenha: 2 textbox, 1 listbox com as opções da figura, 1 commandbutton e 1 label.
Funcionamento do programa: Cada textbox receberá um número e ao clicar no botão, será realizada a operação selecionada na listbox e o resultado será mostrado na label.

Resolução:

Private Sub Command1_Click()
Select Case List1.Text
Case "soma"
Label1.Caption = Val(Text1.Text) + Val(Text2.Text)
Case "subtração"
Label1.Caption = Text1.Text - Text2.Text
Case "multiplicação"
Label1.Caption = Text1.Text * Text2.Text
Case "divisão"
Label1.Caption = Text1.Text / Text2.Text
Case "potenciação"
Label1.Caption = Text1.Text ^ Text2.Text
End Select
End Sub