Visual Basic .NET Language
Consola

Console.ReadLine ()

Dim input as String = Console.ReadLine()

Console.ReadLine() leerá la entrada de la consola del usuario, hasta que se detecte la próxima nueva línea (generalmente al presionar la tecla Intro o Retorno). La ejecución del código se detiene en el hilo actual hasta que se proporciona una nueva línea. Posteriormente, se ejecutará la siguiente línea de código.

Console.WriteLine ()

Dim x As Int32 = 128
Console.WriteLine(x) ' Variable '
Console.WriteLine(3) ' Integer '
Console.WriteLine(3.14159) ' Floating-point number '
Console.WriteLine("Hello, world") ' String '
Console.WriteLine(myObject) ' Outputs the value from calling myObject.ToString()

El método Console.WriteLine() imprimirá los argumentos dados con una nueva línea adjunta al final. Esto imprimirá cualquier objeto suministrado, incluyendo, pero no limitado a, cadenas, números enteros, variables, números de punto flotante.

Al escribir objetos que no son llamados explícitamente por las diversas sobrecargas de WriteLine (es decir, está utilizando la sobrecarga que espera un valor de tipo Object , WriteLine usará el método .ToString() para generar una String para escribir realmente. los objetos deben anular el método .ToString y producir algo más significativo que la implementación predeterminada (que normalmente solo escribe el nombre de tipo completamente calificado).

Console.Write ()

Dim x As Int32 = 128
Console.Write(x) ' Variable '
Console.Write(3) ' Integer '
Console.Write(3.14159) ' Floating-point number '
Console.Write("Hello, world") ' String '

El método Console.Write() es idéntico al método Console.WriteLine() excepto que imprime los argumentos dados sin una nueva línea adjunta al final. Este método se puede hacer funcionalmente idéntico a WriteLine agregando una cadena de nueva línea al final de los argumentos proporcionados:

Console.Write("this is the value" & Environment.NewLine)

Console.Read ()

Dim inputCode As Integer = Console.Read()

Console.Read() espera la entrada del usuario y, al recibirla, devuelve un valor entero correspondiente con el código de carácter del carácter ingresado. Si el flujo de entrada finaliza de alguna manera antes de poder obtener la entrada, se devuelve -1 en su lugar.

Console.ReadKey ()

Dim inputChar As ConsoleKeyInfo = Console.ReadKey()

Console.ReadKey() espera la entrada del usuario y, al recibirla, devuelve un objeto de la clase ConsoleKeyInfo , que contiene información relevante para el carácter que el usuario proporcionó como entrada. Para obtener detalles sobre la información proporcionada, visite la documentación de MSDN .

Prototipo de línea de comandos

Module MainPrompt
Public Const PromptSymbol As String = "TLA > "
Public Const ApplicationTitle As String = GetType(Project.BaseClass).Assembly.FullName
REM Or you can use a custom string
REM Public Const ApplicationTitle As String = "Short name of the application"

Sub Main()
    Dim Statement As String
    Dim BrokenDownStatement As String()
    Dim Command As String
    Dim Args As String()
    Dim Result As String

    Console.ForegroundColor = ConsoleColor.Cyan
    Console.Title = ApplicationTitle & " command line console"

    Console.WriteLine("Welcome to " & ApplicationTitle & "console frontend")
    Console.WriteLine("This package is version " & GetType(Project.BaseClass).Assembly.GetName().Version.ToString)
    Console.WriteLine()
    Console.Write(PromptSymbol)

    Do While True
        Statement = Console.ReadLine()
        BrokenDownStatement = Statement.Split(" ")
        ReDim Args(BrokenDownStatement.Length - 1)
        Command = BrokenDownStatement(0)

        For i = 1 To BrokenDownStatement.Length - 1
            Args(i - 1) = BrokenDownStatement(i)
        Next

        Select Case Command.ToLower
            Case "example"
                Result = DoSomething(Example)
            Case "exit", "quit"
                Exit Do
            Case "ver"
                Result = "This package is version " & GetType(Project.BaseClass).Assembly.GetName().Version.ToString
            Case Else
                Result = "Command not acknowldged: -" & Command & "-"
        End Select
        Console.WriteLine(" " & Result)
        Console.Write(PromptSymbol)
    Loop

    Console.WriteLine("I am exiting, time is " & DateTime.Now.ToString("u"))
    Console.WriteLine("Goodbye")
    Environment.Exit(0)
End Sub
End Module

Este prototipo genera un intérprete de línea de comandos básico.

Obtiene automáticamente el nombre de la aplicación y la versión para comunicarse con el usuario. Para cada línea de entrada, reconoce el comando y una lista arbitraria de argumentos, todos separados por espacios.

Como ejemplo básico, este código comprende los comandos ver , quit y exit .

El parámetro Project.BaseClass es una clase de su proyecto donde se establecen los detalles del ensamblaje.