Varios ejercicios

EJERCICIO 1
Hacer una aplicación que pida un nombre por teclado y luego salude a esa persona.

Module Module1

    Sub Main()
        Dim nombre As String

        Console.WriteLine("¿Cómo te llamas?")
        nombre = Console.ReadLine
        Console.WriteLine()
        Console.WriteLine("Hola " & nombre)

        Console.ReadKey()

    End Sub

End Module

EJERCICIO 2
Hacer una aplicación que recoja números desde teclado hasta que se introduzca vacío (cadena ""). Se deben sumar estos números y mostrar el resultado.

Module Module1

    Sub Main()
        Dim Numero As String
        Dim Resultado As Integer = 0

        Do
            Console.Write("Número: ")
            Numero = Console.ReadLine()
            Try
                Resultado = Resultado + CInt(Numero)
            Catch ex As InvalidCastException

            End Try
        Loop While Numero <> ""

        Console.WriteLine("Resultado final: " & Resultado)

        Console.ReadKey()

    End Sub

End Module

NOTA: por defecto, se realizan conversiones implícitas de datos, si quisiésemos desactivar esta opción (recomendable), tendremos que poner la siguiente línea al principio de nuestro código (antes de Module Nombre_del_Módulo)

Option Explicit On

En este caso, para realizar las conversiones, se utilizarán las funciones de conversión. Algunas de estas funciones son:

• CDate(expresión): para convertir a tipo Date
• CDbl(expresión): para convertir a tipo Double
• CInt(expresión): para convertir a tipo Integer
• CStr(expresión): para convertir a tipo String

Ver más en Funciones de conversión de tipos.

EJERCICIO 3
Hacer una aplicación que pida por teclado el radio de una circunferencia y muestre su área y su perímetro.

Module Module1

    Sub Main()
        Dim Radio, Area, Perimetro As Double
        ' Definición de constantes en VB
        Const PI As Double = 3.14159265

        Console.Write("Radio de la circunferencia: ")
        Radio = Console.ReadLine

        Area = PI * (Radio ^ 2)
        Perimetro = 2 * PI * Radio

        Console.WriteLine("Área: " & Area & " uds cuadradas")
        Console.WriteLine("Perímetro: " & Perimetro & "uds")

        Console.ReadKey()

    End Sub

End Module

Hola Mundo - Comenzando con VB.NET

Como no puede ser de otra manera, empezamos Visual Basic .NET con un "Hola Mundo":

Module MiModulo

    Sub Main()
        'Mostrar un mensaje en consola
        Console.WriteLine("Hola mundo")

        'Para que la consola se quede abierta,
        'A la espera de que pulsemos una tecla
        Console.ReadKey()
    End Sub

End Module

Desaparecida...

He estado "desaparecida" unas semanas. Se acerca la recta final, antes de la FCT (Formación en Centros de Trabajo) y no tengo mucho tiempo libre, por lo que no he podido dedicarme tanto al blog. Pero quería comentar que, finalmente, para el proyecto de Integración realizaré una aplicación web con JSP/Servlets, por lo que cuando vaya tomando forma, empezaré a colgar el código aquí y también la iré subiendo a Jelastic. Dejaré el enlace a mi sitio cuando haya subido la primera versión.

Mientras tanto, es probable (aunque no prometo nada), que dedique algunas entradas a Visual Basic .NET y a lo que vaya preparando para el proyecto, como por ejemplo, la hoja de estilos.

¡Felices carnavales!