Visual Basic .NET Language
Konsola

Console.ReadLine ()

Dim input as String = Console.ReadLine()

Console.ReadLine() odczyta dane wejściowe konsoli od użytkownika, aż do wykrycia następnej nowej linii (zwykle po naciśnięciu klawisza Enter lub Return). Wykonanie kodu jest wstrzymywane w bieżącym wątku, dopóki nie zostanie podany nowy wiersz. Następnie zostanie wykonany następny wiersz kodu.

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

Metoda Console.WriteLine() wypisze podane argumenty z dołączonym na końcu znakiem nowej linii. Spowoduje to wydrukowanie dowolnego dostarczonego obiektu, w tym między innymi ciągów, liczb całkowitych, zmiennych, liczb zmiennoprzecinkowych.

Pisząc obiekty, które nie są wyraźnie zawołał przez różne WriteLine przeciążeń (czyli używasz przeciążenie, który oczekuje wartość typu Object , WriteLine użyje .ToString() metodę, aby wygenerować String faktycznie zapisu. Niestandardowego obiekty powinny zastąpić metodę .ToString i wygenerować coś bardziej znaczącego niż domyślna implementacja (która zwykle zapisuje w pełni kwalifikowaną nazwę typu).

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 '

Metoda Console.Write() jest identyczna z metodą Console.WriteLine() , tyle że drukuje podane argumenty bez dołączonego nowego wiersza na końcu. Ta metoda może być funkcjonalnie identyczna z WriteLine poprzez dodanie ciągu nowej linii na końcu podanych argumentów:

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

Console.Read ()

Dim inputCode As Integer = Console.Read()

Console.Read() oczekuje na dane wejściowe od użytkownika, a po otrzymaniu zwraca wartość całkowitą odpowiadającą kodowi znaków wprowadzonego znaku. Jeśli strumień wejściowy zostanie zakończony w jakiś sposób przed uzyskaniem danych wejściowych, zwracane jest -1.

Console.ReadKey ()

Dim inputChar As ConsoleKeyInfo = Console.ReadKey()

Console.ReadKey() oczekuje na dane wejściowe od użytkownika, a po otrzymaniu zwraca obiekt klasy ConsoleKeyInfo , który zawiera informacje dotyczące znaku podanego przez użytkownika jako dane wejściowe. Szczegółowe informacje na temat dostarczonych informacji można znaleźć w dokumentacji MSDN .

Prototyp wiersza polecenia

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

Ten prototyp generuje podstawowy interpreter wiersza poleceń.

Automatycznie pobiera nazwę aplikacji i wersję, aby komunikować się z użytkownikiem. Dla każdego wiersza wejściowego rozpoznaje polecenie i dowolną listę argumentów, wszystkie oddzielone spacją.

Jako podstawowy przykład ten kod rozumie polecenia ver , quit i exit .

Parametr Project.BaseClass to klasa twojego projektu, w której są ustawione szczegóły zestawu.