Visual Basic .NET Language
consolle

Console.ReadLine ()

Dim input as String = Console.ReadLine()

Console.ReadLine() leggerà l'input della console dall'utente, fino a quando non viene rilevato il nuovo fine riga (in genere premendo il tasto Invio o Invio). L'esecuzione del codice è sospesa nel thread corrente fino a quando non viene fornita una nuova riga. Successivamente, verrà eseguita la prossima riga di codice.

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()

Il metodo Console.WriteLine() stamperà gli argomenti specificati con una newline allegata alla fine. Questo stamperà qualsiasi oggetto fornito, incluso, ma non limitato a stringhe, numeri interi, variabili, numeri in virgola mobile.

Durante la scrittura di oggetti che non vengono esplicitamente richiamati dai vari overload di WriteLine (ovvero, si sta utilizzando il sovraccarico che prevede un valore di tipo Object , WriteLine utilizzerà il metodo .ToString() per generare una String da scrivere effettivamente. gli oggetti dovrebbero OverRide del metodo .ToString e produrre qualcosa di più significativo dell'implementazione predefinita (che in genere scrive solo il nome del tipo completo).

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 '

Il metodo Console.Write() è identico al metodo Console.WriteLine() , tranne per il fatto che stampa gli argomenti specificati senza una newline allegata alla fine. Questo metodo può essere reso funzionalmente identico a WriteLine aggiungendo una stringa newline alla fine di qualsiasi argomento fornito:

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

Console.Read ()

Dim inputCode As Integer = Console.Read()

Console.Read() attende l'input dell'utente e, al ricevimento, restituisce un valore intero corrispondente al codice carattere del carattere inserito. Se il flusso di input è terminato in qualche modo prima che l'input possa essere ottenuto, viene invece restituito -1.

Console.ReadKey ()

Dim inputChar As ConsoleKeyInfo = Console.ReadKey()

Console.ReadKey() attende l'input dell'utente e, al ricevimento, restituisce un oggetto di classe ConsoleKeyInfo , che contiene informazioni rilevanti per il carattere che l'utente ha fornito come input. Per i dettagli relativi alle informazioni fornite, visitare la documentazione MSDN .

Prototipo di prompt della riga di comando

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

Questo prototipo genera un interprete di base della riga di comando.

Ottiene automaticamente il nome dell'applicazione e la versione per comunicare all'utente. Per ogni riga di input, riconosce il comando e una lista arbitraria di argomenti, tutti separati dallo spazio.

Come esempio di base, il codice a capire i comandi di uscita ver, chiudere e.

Il parametro Project.BaseClass è una classe del progetto in cui sono impostati i dettagli dell'Assieme.