maxresdefault 32

Ejercicio 04.- Menú bancario en Visual Basic.NET [24]

En este tutorial vamos a realizar un Menú bancario en Visual Basic.NET que reciba y entregue dinero y va a tener las siguientes opciones:
1.- Ver saldo. mostrará el saldo que tenemos (al iniciar tendremos un saldo de 100.00).
2.- Ingresar dinero. Pedirá el la cantidad de dinero que queramos ingresar y aumentará nuestro saldo inicial.
3.- Sacar dinero. Restará el dinero que tengamos, si el saldo menos dineroSacar es menor a 0 se cancela la operación.
4.- Salir. terminara el sistema.

Codigo de menú bancario en Visual Basic.NET: https://github.com/programadornovato/VisualBasic/commit/174b37464defe230cb1af327aefd944eb58bf615

Plain text
Copy to clipboard
Open code in new window
EnlighterJS 3 Syntax Highlighter
Imports System
'Autor: Programador Novato
'Fecha: 01/01/2021
'Este modulo sirve para ense�ar como funciona Visual Basic.NET
Module Program
'Este codigo escribe un texto en amarillo con fondo azul
Public Sub Main(args As String())
Try
Console.WriteLine("Hola humano, bienvenido al banco pn")
Console.WriteLine("Selecciona alguna de las siguientes opciones")
Console.WriteLine("1.- Ver saldo")
Console.WriteLine("2.- Ingresar dinero")
Console.WriteLine("3.- Sacar dinero")
Console.WriteLine("4.- Salir")
Dim opcion = Integer.Parse(Console.ReadLine())
Dim saldoInicial = 100.0
Select Case opcion
Case 1
Console.WriteLine("Humano tu saldo es de " & saldoInicial)
Case 2
Console.WriteLine("Humano cuanto dinero quieres ingresar")
Dim ingresar = Double.Parse(Console.ReadLine())
saldoInicial = saldoInicial + ingresar
Console.WriteLine("Humano haz ingresado " & ingresar & " tu saldo es de " & saldoInicial)
Case 3
Console.WriteLine("Humano cuanto dinero quieres sacar")
Dim sacar = Double.Parse(Console.ReadLine())
If sacar > saldoInicial Then
Console.WriteLine("Humano pillin no cuentas con saldo suficiente")
Else
saldoInicial = saldoInicial - sacar
Console.WriteLine("Humano haz sacado " & sacar & " tu saldo es de " & saldoInicial)
End If
Case 4
Console.WriteLine("Adios humano gracias por usr el pn")
Case Else
Console.WriteLine("Humano estupido te pedi que seleccionar alguna de las opciones")
End Select
Catch ex As Exception
Console.WriteLine("Humano te pedi un numero valido " & ex.ToString)
End Try
Console.Read()
End Sub
End Module
Imports System 'Autor: Programador Novato 'Fecha: 01/01/2021 'Este modulo sirve para ense�ar como funciona Visual Basic.NET Module Program 'Este codigo escribe un texto en amarillo con fondo azul Public Sub Main(args As String()) Try Console.WriteLine("Hola humano, bienvenido al banco pn") Console.WriteLine("Selecciona alguna de las siguientes opciones") Console.WriteLine("1.- Ver saldo") Console.WriteLine("2.- Ingresar dinero") Console.WriteLine("3.- Sacar dinero") Console.WriteLine("4.- Salir") Dim opcion = Integer.Parse(Console.ReadLine()) Dim saldoInicial = 100.0 Select Case opcion Case 1 Console.WriteLine("Humano tu saldo es de " & saldoInicial) Case 2 Console.WriteLine("Humano cuanto dinero quieres ingresar") Dim ingresar = Double.Parse(Console.ReadLine()) saldoInicial = saldoInicial + ingresar Console.WriteLine("Humano haz ingresado " & ingresar & " tu saldo es de " & saldoInicial) Case 3 Console.WriteLine("Humano cuanto dinero quieres sacar") Dim sacar = Double.Parse(Console.ReadLine()) If sacar > saldoInicial Then Console.WriteLine("Humano pillin no cuentas con saldo suficiente") Else saldoInicial = saldoInicial - sacar Console.WriteLine("Humano haz sacado " & sacar & " tu saldo es de " & saldoInicial) End If Case 4 Console.WriteLine("Adios humano gracias por usr el pn") Case Else Console.WriteLine("Humano estupido te pedi que seleccionar alguna de las opciones") End Select Catch ex As Exception Console.WriteLine("Humano te pedi un numero valido " & ex.ToString) End Try Console.Read() End Sub End Module
Imports System

'Autor: Programador Novato
'Fecha: 01/01/2021
'Este modulo sirve para ense�ar como funciona Visual Basic.NET
Module Program
    'Este codigo escribe un texto en amarillo con fondo azul
    Public Sub Main(args As String())
        Try
            Console.WriteLine("Hola humano, bienvenido al banco pn")
            Console.WriteLine("Selecciona alguna de las siguientes opciones")
            Console.WriteLine("1.- Ver saldo")
            Console.WriteLine("2.- Ingresar dinero")
            Console.WriteLine("3.- Sacar dinero")
            Console.WriteLine("4.- Salir")
            Dim opcion = Integer.Parse(Console.ReadLine())
            Dim saldoInicial = 100.0
            Select Case opcion
                Case 1
                    Console.WriteLine("Humano tu saldo es de " & saldoInicial)
                Case 2
                    Console.WriteLine("Humano cuanto dinero quieres ingresar")
                    Dim ingresar = Double.Parse(Console.ReadLine())
                    saldoInicial = saldoInicial + ingresar
                    Console.WriteLine("Humano haz ingresado " & ingresar & " tu saldo es de " & saldoInicial)
                Case 3
                    Console.WriteLine("Humano cuanto dinero quieres sacar")
                    Dim sacar = Double.Parse(Console.ReadLine())
                    If sacar > saldoInicial Then
                        Console.WriteLine("Humano pillin no cuentas con saldo suficiente")
                    Else
                        saldoInicial = saldoInicial - sacar
                        Console.WriteLine("Humano haz sacado " & sacar & " tu saldo es de " & saldoInicial)
                    End If
                Case 4
                    Console.WriteLine("Adios humano gracias por usr el pn")
                Case Else
                    Console.WriteLine("Humano estupido te pedi que seleccionar alguna de las opciones")

            End Select

        Catch ex As Exception
            Console.WriteLine("Humano te pedi un numero valido " & ex.ToString)
        End Try

        Console.Read()
    End Sub
End Module

Curso de VB.NET⛓️: https://www.youtube.com/watch?v=aiquJHzxNWw&list=PLCTD_CpMeEKSFwAFjvrfpvSwxmbs2maMo&ab_channel=programadornovato
[CURSO] C##️⃣: https://www.youtube.com/watch?v=NKPMGY6NCko&list=PLCTD_CpMeEKQSOU8Vf9VHXrZa2rc8X0X5&index=1&t=3s&ab_channel=programadornovatoprogramadornovato
[CURSO] C# CON FORMULARIOS#️⃣: https://www.youtube.com/watch?v=l0_U4oyOuns&list=PLCTD_CpMeEKTBih1VgeunCjc83ZQ6UBMI&index=1&ab_channel=programadornovatoprogramadornovato
[Curso] C# MYSQL#️⃣: https://www.youtube.com/watch?v=-5CXNXHIzWk&list=PLCTD_CpMeEKR_4q0-7BxGHXqH0bgpqw5q&ab_channel=programadornovato
[CURSO] C++ DE 0 A HEROE 🦸: https://www.youtube.com/watch?v=APN8aCyPvww&list=PLCTD_CpMeEKTofxs7iottRxJ5YPM7BOcc&ab_channel=programadornovato
[Curso] Java Netbeans GUI Completo☕: https://www.youtube.com/watch?v=18UA7X2ss8g&list=PLCTD_CpMeEKThfXo8D-RXOGu5FarO7_qv&ab_channel=programadornovato

🔗 Canal de ProgramadorNovato: https://www.youtube.com/c/programadornovato
🔗 Facebook: https://facebook.com/ProgramadorNovatoOficial
🔗 Twitter: https://twitter.com/programadornova
🔗 Linkedin: https://www.linkedin.com/in/programadornovato/
🔗 Instagram: https://www.instagram.com/programadornovato/
🔗 Pagina oficial: https://www.programadornovato.com
🔗 Gracias por apoyar este canal: https://www.patreon.com/programadornovato

Anterior tutorial Siguiente tutorial

Deja un comentario

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *