Visual Studio - Código Condicionantes
Enviado por Miriam Marquez • 11 de Septiembre de 2018 • Prácticas o problemas • 307 Palabras (2 Páginas) • 78 Visitas
Module Module1
'Práctica 11: "Condicionnates"
'Objetivo: Reconocer tanto los operadores de comparación como las sentencia if, then, else
Sub Main()
Console.Title = "Operadores y condicionantes"
Console.BackgroundColor = ConsoleColor.DarkYellow
Console.ForegroundColor = ConsoleColor.Black
Console.Clear()
Dim sexo As String
Console.WriteLine("Bienvenido al programa para determinar si eres hombre o mujer")
Console.WriteLine("")
Console.WriteLine("Ingresa si eres hombre o mujer")
sexo = Console.ReadLine()
If sexo = "mujer" Then
Console.Title = "Eres mujer"
Console.BackgroundColor = ConsoleColor.Blue
Console.ForegroundColor = ConsoleColor.Magenta
Console.Clear()
Console.WriteLine("ERES MUJER")
Else
Console.Title = "Eres hombre"
Console.BackgroundColor = ConsoleColor.Black
Console.ForegroundColor = ConsoleColor.Red
Console.Clear()
Console.WriteLine("ERES HOMBRE")
End If
Console.Read()
End Sub
End Module
...