Visual Basic .NET Language
Приставка

Console.ReadLine ()

Dim input as String = Console.ReadLine()

Console.ReadLine() будет читать консольный ввод от пользователя, пока не будет обнаружена следующая новая строка (обычно при нажатии клавиши Enter или Return). Выполнение кода приостанавливается в текущем потоке до тех пор, пока не будет предоставлена ​​новая строка. Затем будет выполнена следующая строка кода.

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

Метод Console.WriteLine() будет печатать заданные аргументы (ы) с новой строкой, прикрепленной в конце. Это напечатает любой предоставленный объект, включая, но не ограничиваясь, строки, целые числа, переменные, числа с плавающей запятой.

При записи объектов, которые явно не вызваны различными перегрузками WriteLine (т. .ToString() Вы используете перегрузку, которая ожидает значения типа Object , WriteLine будет использовать метод .ToString() для генерации String на самом деле писать. объекты должны переопределять метод .ToString и создавать что-то более значимое, чем реализация по умолчанию (как правило, просто записывает полное имя типа).

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 '

Метод Console.Write() идентичен методу Console.WriteLine() за исключением того, что он печатает данный аргумент (ы) без добавления новой строки в конце. Этот метод можно сделать функционально идентичным WriteLine , добавив строку новой строки в конец любых аргументов:

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

Console.Read ()

Dim inputCode As Integer = Console.Read()

Console.Read() ожидает ввода от пользователя и после получения возвращает целочисленное значение, соответствующее коду символа введенного символа. Если входной поток каким-то образом заканчивается, прежде чем ввод может быть получен, вместо него возвращается -1.

Console.ReadKey ()

Dim inputChar As ConsoleKeyInfo = Console.ReadKey()

Console.ReadKey() ожидает ввода от пользователя и после получения возвращает объект класса ConsoleKeyInfo , который содержит информацию, относящуюся к символу, который пользователь предоставил в качестве ввода. Подробные сведения о предоставляемой информации см. В документации MSDN .

Прототип командной строки

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

Этот прототип создает базовый интерпретатор командной строки.

Он автоматически получает имя и версию приложения для связи с пользователем. Для каждой строки ввода он распознает команду и произвольный список аргументов, разделенных пробелом.

В качестве базового примера этот код понимает команды ver , quit и exit .

Параметр Project.BaseClass - это класс вашего проекта, в котором заданы детали сборки.