Sök…


Console.ReadLine ()

Dim input as String = Console.ReadLine()

Console.ReadLine() kommer att läsa konsolinmatningen från användaren, tills nästa nya linje upptäcks (vanligtvis när du trycker på Enter- eller Returtangenten). Kodkörning är pausad i den aktuella tråden tills en ny linje tillhandahålls. Därefter körs nästa kodrad.

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

Metoden Console.WriteLine() kommer att skriva ut de givna argumenten med en ny linje bifogad i slutet. Detta kommer att skriva ut alla levererade objekt, inklusive, men inte begränsat till, strängar, heltal, variabler, flytpunktsnummer.

När du skriver objekt som inte uttryckligen kallas av de olika WriteLine överbelastningarna (det vill säga att du använder överbelastningen som förväntar sig ett värde av typen Object , kommer WritLine att använda .ToString() för att generera en String att faktiskt skriva. Din anpassade objekt bör överstiga metoden .ToString och producera något mer meningsfullt än standardimplementeringen (som vanligtvis bara skriver det fullt kvalificerade typnamnet).

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 '

Metoden Console.Write() är identisk med Console.WriteLine() -metoden förutom att den skriver ut de eller de givna argumenten utan en ny linje bifogad i slutet. Den här metoden kan göras funktionellt identisk med WriteLine genom att lägga till en ny linje i slutet av alla argument som tillhandahålls:

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

Console.Read ()

Dim inputCode As Integer = Console.Read()

Console.Read() väntar på inmatning från användaren och returnerar ett heltalvärde motsvarande karaktärskoden för det inmatade tecknet vid mottagandet. Om ingångsströmmen avslutas på något sätt innan ingången kan erhållas, returneras -1 istället.

Console.ReadKey ()

Dim inputChar As ConsoleKeyInfo = Console.ReadKey()

Console.ReadKey() väntar på inmatning från användaren och returnerar vid mottagandet ett objekt av klass ConsoleKeyInfo , som innehåller information som är relevant för det tecken som användaren tillhandahöll som input. Besök MSDN-dokumentationen för detaljer om informationen.

Prototyp av kommandoradsprompt

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

Denna prototyp genererar en grundläggande kommandoradstolkare.

Programmet får automatiskt namnet och versionen för att kommunicera till användaren. För varje inmatningsrad känner den igen kommandot och en godtycklig lista med argument, alla separerade med mellanslag.

Som ett grundläggande exempel förstår denna kod ver , avsluta och avsluta kommandon.

Parametern Project.BaseClass är en klass i ditt projekt där monteringsinformationen är inställd.



Modified text is an extract of the original Stack Overflow Documentation
Licensierat under CC BY-SA 3.0
Inte anslutet till Stack Overflow