Question

Escreva um programa capaz de converter o valor em Reais fornecido numa caixa de entrada (TextField) em outro valor monetário conforme a escolha de uma moeda (no mínimo 3 moedas diferentes), indicando o resultado em um rótulo (Label). Se necessário adicione botões.
Java swing.​

Answer 1

Resposta:

Explicação:

Dim p1 as string, p2 as string ' variável de pergunta e resposta

Dim x, y, z as Currency ' variáveis para a conversão

Dim recebval as Currency' variável para receber o valor da moeda a que se deseja converter

Dim resposta às Currency

Dim escrito as string

P1 = " Digite o valor que deseja converter"

P2 = inputbox ( p1), ... Comandos

Recebeval = comandos

X= 0

Y= 0

Z= 0 ' zerando o valor das variáveis para receber novos valores

X = ' coloque o valor da primeira moeda

Y = ' coloque o valor da segunda moeda

Z = ' coloque o valor da terceira moeda

Select case var ' selecione o tipo de moeda que deseja para fazer a conversão ( X, Y ou Z)

Case x

Resposta = Val (recebeval) * x

Case y

Resposta = Val (recebeval) * y

Case z

Resposta = Val (recebeval) * z

Escrito = msgbox ( "o valor da conversão da moeda escolhida " & variável de valores & " É : " & resposta)

Lbllabel. Cátion = resposta

Obs: é lógico que isso tem que ser testado, utilizar um Braikpoint e F8 ; bem como a Imediatewindows para a depuração e melhor formulação do Código... Que no caso foi o VB6....

End select