Practica 9

INTRODUCCIÓN AL IDE DE VS .NET Y AL DESARROLLO DE APLICACIONES DE CONSOLA EN VISUAL BASIC.NET 

Objetivos: 
- Identificar las distintas partes del IDE. 
- Hacer uso del IDE, para crear aplicaciones de consola. 
- Depurar y ejecutar aplicaciones. 
- Crear aplicaciones de consola en Visual Basic .NET 
- Identificar la estructura de una aplicación de consola. 
- Practicar los miembros principales de las clases Console y String. 

 Comentario (Auto evaluación de lo aprendido): Para es un entorno gestionado de ejecución de aplicaciones, nuevos lenguajes de programación y compiladores, y permite desarrollo de todo tipo de funcionalidades: desde programas de consola o servicios Windows hasta aplicaciones para dispositivos móviles, pasando por desarrollos de escritorio o para Internet.

Microsoft Visual Studio es un entorno de desarrollo integrado que funciona en Windows. Soporta varios lenguajes de programación tales como Visual C++, Visual C#, Visual J#, ASP.NET y Visual Basic .NET, aunque se desarrollan otras extensiones de idioma para el programa.

La base del programa(.NET Frameworks) es Lenguage Runtime. El .NET Framework es un conjunto de servicios de programación diseñados para simplificar el desarrollo de aplicaciones. .NET Framework tiene dos componentes principales:
- Common Language Runtime (CLR).
- Biblioteca de Clases Base (BCL).
1. Crear una aplicación que imprima en pantalla su nombre completo. 

 Codigo en VB.NET
Module Module1
Sub Main()
Dim nombre As String = "Jorge Fernando Castillo Garcia"
Console.WriteLine("Hola mi nombre es: " & nombre)
Console.ReadLine()
End Sub
End Module

Resultado.

2. Elaborar una aplicación que almacene en variables el nombre de su mascota, especie y edad; y luego las muestre en pantalla.

 Codigo en VB.NET
Module Module2
Sub Main()
Console.WriteLine("Ingrese el nombre, especie y edad de su mascota.")
Dim N, E As String
Dim ED As Integer
Console.WriteLine("Nombre de su mascota:")
N = Console.ReadLine
Console.WriteLine("Especie de su mascota:")
E = Console.ReadLine
Console.WriteLine("Edad de su mascota:")
ED = Console.ReadLine
Console.WriteLine()
Console.WriteLine("Su mascota: " & N)
Console.WriteLine("De especie: " & E)
Console.WriteLine("Tiene la edad de: " & ED & " años.")
Console.ReadLine()
End Sub
End Module

Resultado.
3. Elaborar una aplicación que capture un número entero positivo y que muestre la raíz cuadrada del número. 

Codigo en VB.NET
Module Module3
Sub Main()
Console.WriteLine("Ingrese un numero para saber su raiz cuadrada.")
Dim N As Integer
Dim P As Decimal
N = Console.ReadLine
P = Math.Sqrt(N)
Console.WriteLine()
Console.WriteLine("La raiz cuadrada del numero es: " & P)
Console.ReadLine()
End Sub
End Module

Resultado.
4. Crear una aplicación que capture por teclado el nombre y la cantidad invertida por 3 empresarios, que muestre el 
nombre, cantidad invertida y el porcentaje de inversión que corresponde a cada uno. 

Codigo en VB.NET
Module Module4
Sub Main()
Console.WriteLine("Se mostrara el total invertido por los 3 empresarios y el porcentaje gastado por cada uno.")
Dim NO1, NO2, NO3 As String
Dim n1, n2, n3, P1, P2, P3, P As Integer
Console.WriteLine("Ingrese el nombre del primer empresario: ")
NO1 = Console.ReadLine
Console.WriteLine("Ingrese la cantidad invertida: ")
n1 = Console.ReadLine
Console.WriteLine()
Console.WriteLine("Ingrese el nombre del segundo empresario: ")
NO2 = Console.ReadLine
Console.WriteLine("Ingrese la cantidad invertida: ")
n2 = Console.ReadLine
Console.WriteLine()
Console.WriteLine("Ingrese el nombre del tercer empresario: ")
NO3 = Console.ReadLine
Console.WriteLine("Ingrese la cantidad invertida: ")
n3 = Console.ReadLine
Console.WriteLine()
P = n1 + n2 + n3
P1 = (n1 * 100) / P
P2 = (n2 * 100) / P
P3 = (n3 * 100) / P
Console.WriteLine("El total invertido por los 3 es: " & P)
Console.WriteLine("El empresario " & NO1 & " invertio " & P1 & "%")
Console.WriteLine("El empresario " & NO2 & " invertio " & P2 & "%")
Console.WriteLine("El empresario " & NO3 & " invertio " & P3 & "%")
Console.ReadLine()
End Sub
End Module

Resultado.

5. Crear una aplicación que capture el nombre del empleado y el sueldo, luego que limpie pantalla y muestre en color azul el nombre del empleado y el sueldo, y en color amarillo los descuentos de ISSS, Renta y AFP, y en color rojo el sueldo a pagar. Formatear las cantidades numéricas y monetarias. 

Codigo en VB.NET
Module Module8
Sub main()
Dim nombre As String
Dim sueldo, descuento As Integer
Console.WriteLine("Ingrese su nombre:")
nombre = Console.ReadLine
Console.WriteLine("Ingrese su sueldo:")
sueldo = Console.ReadLine
Console.Clear()
Console.ForegroundColor = ConsoleColor.Blue
Console.WriteLine("Su nombre es: " & nombre & " y su sueldo es: " & sueldo)
Console.WriteLine()
Console.ForegroundColor = ConsoleColor.Yellow
Console.WriteLine("ISSS: $" & sueldo * 0.03)
Console.WriteLine("Renta: $" & sueldo * 0.1)
Console.WriteLine("AFP: $" & sueldo * 0.0725)
Console.WriteLine()
Console.ForegroundColor = ConsoleColor.Red
descuento = (sueldo * 0.2025)
Console.WriteLine("Su sueldo sera: $" & sueldo - descuento)
Console.ReadLine()
End Sub
End Module

Resultado.



6. Elaborar una aplicación para capturar el nombre de una persona y luego sustituir las vocales que posea de la siguiente manera (* por a, % por e, $ por i, # por o, / por u) y mostrar el nuevo nombre. 
Codigo en VB.NET
Module Module6
Sub Main()
Dim nombre As String
Console.WriteLine("Este programa cambiara su nombre por siertas letras...")
Console.WriteLine("Ingrese su nombre:")
nombre = Console.ReadLine()
nombre = nombre.Replace("a", "*")
nombre = nombre.Replace("e", "%")
nombre = nombre.Replace("i", "$")
nombre = nombre.Replace("o", "#")
nombre = nombre.Replace("u", "/")
nombre = nombre.Replace("A", "*")
nombre = nombre.Replace("E", "%")
nombre = nombre.Replace("I", "$")
nombre = nombre.Replace("O", "#")
nombre = nombre.Replace("U", "/")
Console.WriteLine()
Console.WriteLine("Su nombre cambiado es: " & nombre)
Console.ReadLine()
End Sub
End Module

Resultado.






No hay comentarios:

Publicar un comentario

Suscribirse a: Entradas (Atom)