1
Abra Microsoft Visual Basic 6 . El cuadro de diálogo "Nuevo proyecto" aparece cada vez que se abre VB6 . En la pestaña " Nuevo" , haga clic en " EXE estándar . " Si quieres trabajar en un proyecto existente , haga clic en la pestaña " existente" y seleccione el proyecto.
2 Haga clic en la opción de menú "Proyecto" y luego " Agregar módulo . " Haga clic en " Abrir" cuando aparezca el cuadro de diálogo " Agregar módulo " en la pantalla .
3
Escriba una función para crear una instancia del puerto serie de la computadora. Desde los puertos serie son por lo general " COM1" y " COM2 ", utilice esto como una referencia para asegurarse de que está conectado al puerto serie correcto.
"Función OpenSerialPort () as String
getString dévil como secuencia = ""
Dim comSerial como IO.Ports.SerialPort
comSerial = My.Computer.Ports.OpenSerialPort ( "COM1 " )
End Function "
4
Escriba la función que va a leer los datos de la serie utilizando la variable " comSerial " que ya establecido .
"Función readSerialPort ( comSerial como IO.Ports.SerialPort ) as String
getString dévil como secuencia = ""
Uso comSerial
¿
Dim Recibir As String = comSerial.ReadLine ()
< p> Si la recepción no es nada entonces
Exit Do
demás
returnStr & = Recepción y vbCrLf
End If
Loop
comSerial.Close ()
End Using
Volver getString
End Function "
5
Escriba las siguientes sub procedimiento que envía datos al puerto serie . Una vez que este sub procedimiento se establece en este módulo, se puede llamar desde cualquier parte del proyecto actual para enviar datos a los puertos serie en cualquier momento que elija.
"Sub sendDataToSerial (datos ByVal como secuencia )
Uso comSendData Como IO.Ports.SerialPort = Usando
End Sub "
6
pasar la información al procedimiento sub utilizando una variable llamada " datos " . Un ejemplo de esto es:
"datos dévil como secuencia
datos
=" Se trata de datos de ejemplo para transmitir al puerto serie Com1 "
Console.WriteLine ( " Escribir los datos en el puerto serie COM1 : "& datos)
sendDataToSerial (data) "
7
Coloque el código en cualquier función, método o procedimiento durante el proyecto para escribir los datos al puerto serie . Ejecute el código pulsando las teclas " F5" " Ctrl" y en conjunto.
8
Guarde el proyecto haciendo clic en el icono " Guardar" en la barra de herramientas .