Visual Basic è un linguaggio di programmazione event-driven prodotto da Microsoft. Il linguaggio di programmazione originale e ambiente di sviluppo integrato è stato progettato per supportare il modello di programmazione COM. La versione corrente di Visual Basic è completamente integrato nell'ambiente di sviluppo Microsoft .NET. Visual Basic è anche il cavo di porte seriali del computer di programmazione se si ha la necessità di accedere o modificare periferie di computer con la vostra applicazione attraverso l'utilizzo del controllo MSComm che è incorporato in Visual Basic.

istruzione

1 Aprire Microsoft Visual Studio e selezionare "File-> Nuovo-> Progetto" dal menu file primario. Quindi, scegliere "Progetto tipologie-> Progetti di Visual Basic" e selezionare "Applicazione Console" sotto il menu modelli.

2 Fare clic destro sull'icona del progetto e selezionare l'opzione di menu "Add Reference". Quindi, scegliere la scheda di menu "Com" e selezionare "Microsoft Comm Control 6.0" che è elencato nella sezione "Nome componente". Scegliere "Seleziona" seguito dal tasto "OK".

3 Fare doppio clic sul modulo di programma visibile nell'IDE di Visual Basic. Si aprirà la finestra di programmazione.

4 Inserire il seguente codice di programmazione per inizializzare le strutture di dati porta seriale che verranno utilizzati per manipolare la porta seriale, una volta aperto:
Dim MSComm1 Come MSComm
MSComm1 = Nuovo MSComm
Dim Buffer As String
MSComm1.CommPort = 1
MSComm1.Settings = "9600, N, 8,1"
MSComm1.InputLen = 0

5 Aprire la porta seriale includendo il seguente codice di programmazione dopo l'ultima riga di codice immesso nel passaggio 4:
MSComm1.PortOpen = True
MSComm1.InputMode () = InputModeConstants.comInputModeText
MSComm1.InBufferCount () = 0
MSComm1.Output = "ATV1Q0" & Chr (13)

6 Manipolare l'informazione porta seriale e quindi chiudere la porta seriale inserendo il seguente codice nella parte inferiore del modulo di programmazione Visual Basic:
Fare
Buffer = Buffer & MSComm1.Input
Loop Fino InStr (Buffer, "OK" & vbCrLf)
MSComm1.PortOpen = false
Console.WriteLine ( "Chiudere la porta seriale.")
endmodule

7 Selezionare i tasti "CTRL + F5" contemporaneamente di costruire ed eseguire il progetto.