Visual Studio. NET
Ver Más instrucciones
abrir un nuevo proyecto
1
Crear una nueva aplicación de consola. En el menú de Visual Studio , haga clic en "Nuevo" y seleccione " Proyecto".
2
Seleccione " Visual Basic " en la parte izquierda de la ventana. En el lado derecho hay diferentes plantillas de proyecto . Seleccione " Aplicación de consola. " Haga clic en el botón " OK" . Una nueva aplicación es la instalación en el espacio de trabajo de Visual Studio.
3 Haga clic en el nombre del proyecto en el cuadro de la parte superior derecha del área de trabajo . Seleccione " Agregar referencia ".
4
clic en la ficha " COM". Seleccione "6.0 Microsoft Comm Control" en el cuadro de lista y haga clic en " Select". Haga clic en " Aceptar " para cerrar la ventana de referencia .
Configuración del puerto serie
5
Crear una nueva variable COM . Es necesario asignar memoria y declarar una nueva variable. El texto a continuación llama a la clase COM para su uso en el resto del módulo . La variable de memoria intermedia se utiliza para mantener el texto de la respuesta de la serie port.Dim MyPort Como MSCommmyPort = New MSCommDim mybuffer As String
6
Establece el puerto a 1 . La mayoría de las computadoras vienen con dos puertos serie. El código siguiente establece la comunicación con el puerto 1.myPort.CommPort = 1
7
Crear configuraciones comunes . Ajuste la velocidad de transferencia y dejar la información necesaria para el control del módem bits . Este setsmyPort.Settings = " 9600, N, 8,1 "
8
Leer todo el buffer. Este código hace que el módem utilice toda la memoria intermedia de información cuando se envían a la port.myPort.InputLen serial = 0
comunicarse con el puerto
9
Abrir el puerto serie . El puerto serie tiene que ser abierto y el buffer de entrada despejado antes de la aplicación se puede comunicar con él . La tercera línea de código indica el puerto serie para devolver el texto a la application.myPort.PortOpen TruemyPort.InBufferCount = () = 0myPort.InputMode () = InputModeConstants.comInputModeText
10
Enviar un comando al puerto serie . Este comando comprueba la respuesta del modem.myPort.Output = " ATV1Q0 " & Chr ( 13 )
11
Leer la respuesta desde el puerto serie . Este bucle lee el texto devuelto hasta que un " OK" es reached.DomyBuffer = mybuffer y myPort.InputLoop Hasta InStr ( mybuffer , "OK " & vbCrLf )
12
cerrar el puerto . Después de usar el puerto serie , es importante cerrar por otra applications.myPort.PortOpen = False