PASAR CODIGO JAVA A VISUAL BASIC
Publicado por DANIELA (1 intervención) el 11/11/2020 09:27:57
Buen día,
Lo que pasa es que soy nueva en visual basic pero tengo la programacion en Java me ayudarian indicando o pasando lo siguiente a visual basic
Lo que pasa es que soy nueva en visual basic pero tengo la programacion en Java me ayudarian indicando o pasando lo siguiente a visual basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
package bancovirtual1;
import javax.swing.JOptionPane;
public class BancoVirtual1 {double saldo=100000, valor, inte=0.02;
String menu="";
public static void main(String[] args) {
BancoVirtual1 objBan=new BancoVirtual1();
}public BancoVirtual1(){
clave();
elmenu();
int opc=0;while(true){
opc=Integer.parseInt(JOptionPane.showInputDialog(menu));
switch(opc){
case 1:consignar();
break;
case 2:retirar();
break;
case 3:mostrar();
break;
case 4:finalizar();
break;
default:JOptionPane.showMessageDialog(null,"Opción Errada");
break;
} } }public void consignar(){
valor=Double.parseDouble(JOptionPane.showInputDialog("Entrar valor consignar"));
saldo=saldo+valor;
}public void retirar(){
valor=Double.parseDouble(JOptionPane.showInputDialog("Entrar valor retirar"));
saldo=saldo-valor;
}public void mostrar(){
JOptionPane.showMessageDialog(null,"Su saldo = "+saldo);
}public void finalizar(){
JOptionPane.showMessageDialog(null,"Vuelva pronto");
System.exit(0);
}public void elmenu(){
menu=" 1 Consignar \n"
+ " 2 Retirar \n"
+ " 3 Saldo \n"
+ " 4 Finalizar \n"
+ " Opcion";
}public void clave(){
int claSis=2468;int claDig, veces=0;
while(true){
claDig=Integer.parseInt(JOptionPane.showInputDialog("Digite su clave"));
if(claSis==claDig){
JOptionPane.showMessageDialog(null,"Ingreso Seguro");
break;
} else{veces++;
JOptionPane.showMessageDialog(null,"Clave errada, lleva "+veces);
if(veces==3){
JOptionPane.showMessageDialog(null,"Cuenta Bloqueada, ir Banco");
System.exit(0);
} } }JOptionPane.showMessageDialog(null,"SISTEMA BANCARIO A SU ALCANCE");
}}Valora esta pregunta
0