Visual Basic är en händelsestyrd programmeringsspråk producerat av Microsoft . Den ursprungliga programmeringsspråk och integrerad utvecklingsmiljö var utformad för att stödja modellen COM programmering . Den nuvarande versionen av Visual Basic är helt integrerat i Microsoft . NET utvecklingsmiljö . Visual Basic är också kabel för programmering dator serieportar om du har ett behov av att komma åt eller ändra datorns periferier med din ansökan via hjälp av mscomm kontroll som ingår i Visual Basic . Saker du behöver
Microsoft Visual Studio . NET Integrated Development Environment
Visa fler instruktioner
1
Öppna Microsoft Visual Studio och välj " Arkiv - > Nytt - > Project " från den primära filen menyn . Välj sedan " projekttyper -> Visual Basic-projekt " och välj " Console Application " under mallar menyn .
2
Högerklicka på projektet ikonen och välj " Add Reference " menyalternativet . Välj sedan " Com " menyfliken och välj " Microsoft Comm Control 6.0 " , som anges under " Component Name " . Välj " Select " följt av " OK " -knappen .
3
Dubbelklicka på programmet modulen syns i Visual Basic IDE . Detta öppnar programmeringsfönstret
4
Input följande programmeringskod för att initiera seriella strukturer hamnstatistik som kommer att användas för att manipulera den seriella porten en gång öppnade : . Dim MSComm1 Som MSCommMSComm1 = Ny MSCommDim Buffer Som StringMSComm1.CommPort = 1MSComm1.Settings = " 9600 , N , 8,1 " MSComm1.InputLen = 0
5
Öppna serieporten genom att inkludera följande programmeringskod efter den sista raden i koden som anges i steg 4 : MSComm1.PortOpen = TrueMSComm1.InputMode ( ) = InputModeConstants.comInputModeTextMSComm1.InBufferCount ( ) = 0MSComm1.Output = " ATV1Q0 " & Chr ( 13 )
6
manipulera den seriella porten informationen och sedan stänga den seriella porten genom att ange följande kod längst ner på Visual Basic -programmering modulen : DoBuffer = Buffer & MSComm1.InputLoop tills InStr ( Buffer , " OK " & vbCrLf ) MSComm1.PortOpen = FalseConsole.WriteLine ( " Stäng den seriella porten . " ) endmodule
7
Välj " Ctrl + F5 " samtidigt för att bygga och driva projektet .
