Wie man mit der Konsole in Kommunizieren Visual Basic

Mitglieder-Login

InformationenProductivity Software

Wie Fotos zu einer SharePoint- Prof… Der Microsoft Windows SharePoint Services (WSS) Anwendung bietet die Möglichkeit, ein Firmen-Intrane
Wie man einen Hinweis in OneNote Da… Microsoft OneNote ist ein leistungsstarkes Notebook -Anwendung, die als virtueller Aktenschrank Proj
Wie Einrichten HP Scan HP Scan Pro ist eine Scan-Software von Hewlett- Packard , die speziell für Apple -Computer entwickel
Wie kann ich mein Business Contact … Customer Relationship Manager sind der letzte Schrei unter den Business-Profis benötigen, um Verkauf

Software

HOME

* Computer Wissen >> Software >> Productivity Software >> .

Wie man mit der Konsole in Kommunizieren Visual Basic

Visual Basic nicht enthalten eine einfache Möglichkeit , direkt mit der Konsole , der schwarze Bildschirm Zugriff in Vista durch Eingabe von " cmd" in das "Start Search" -Box oder läuft die "Eingabeaufforderung " Link von " Program Zubehör . " Microsoft hat liefern Anweisungen für einen beteiligten dies zu umgehen, die in diesem Beispiel beschrieben ist , mit einigen der bestimmten autorisierten Befehle . Auch so wird die Kommunikation ohne fortgeschrittene Programmierkenntnisse und komplizierte Programmierung Routinen beschränkt. Anleitung
1

Öffnen Sie Visual Basic und initiieren ein neues Projekt , mit dem " Standard EXE " Vorlage unter " Datei", " Neues Projekt gefunden. " Klicken Sie auf " Projekt" in der oberen Menüleiste und " Modul hinzufügen " aus dem Drop -down -Liste.
2

Geben Sie die folgenden Zeilen in der Module1 Fenster , die nach Microsoft enthalten den Code, der nur erlaubt direkte Kommunikation mit der Konsole in Visual Basic. Der Unterstrich am Ende von einigen Linien zeigt an, dass der Text in der nächsten Zeile eine Fortsetzung der aktuellen Zeile ist . Nicht den Unterstrich , wenn Eingabe dieses Codes ; einfach weiter tippen auf einer Linie :

Option ExplicitDeclare Funktion AllocConsole Lib " kernel32 " () As LongDeclare Funktion FreeConsole Lib " kernel32 " () As LongDeclare Funktion CloseHandle Lib " kernel32 " (ByVal hObject As Long ) _As LongDeclare Funktion GetStdHandle Lib" kernel32 " (ByVal _nStdHandle As Long) As LongDeclare Funktion WriteConsole Lib" kernel32 "Alias" WriteConsoleA " _ByVal hConsoleOutput As Long , lpBuffer As Any , ByVal _nNumberOfCharsToWrite As Long , As Long lpNumberOfCharsWritten , _lpReserved As Any ) As LongPublic Const STD_OUTPUT_HANDLE = -11 &
3

Doppelklicken Sie auf Form1 im Projekt- Liste auf der rechten , um diese zu öffnen. Klicken Sie auf " Ansicht" und dann "Code" aus der Liste. Geben Sie diese Zeilen :

Dim hConsole als LongPrivate Sub Form_Load () Wenn AllocConsole () = ThenhConsole GetStdHandle ( STD_OUTPUT_HANDLE ) Wenn hConsole = 0 Then MsgBox " nicht zuordnen konnte STDOUT " ElseMsgBox " konnte nicht zugeordnet Konsole " End IfEnd Sub