Hola Tuga ejemplos de usar el puerto serie con VB6 estan dentro del subforo de Visual Basic he visto bastantes.
Con respecto a el codigo en PBP deberas usar cualquiera de estas 2:
SERIN y SERIN2Ambas con sintaxis SERIN pin de RX, velocidad baudrate, [codigos o sincronizacion], variable a guardar.
Serin solo recibe un dato o un caracterer en cambio serin 2 puede recibir mas un caracter. Un ejemplo de
SERIN2.
Ahora suponiendo que ya tengas el VB6 configuradoa a una velocidad de 9600bps, 8 bits sin paridad y sin invertir y mandes un numero cualquiera para recibirlo en un 16F84A el codigo con SERIN seria:
Include "MODEDEFS.BAS" ' para usar las velocidades
RX var PORTB.0 ' pin de entrada
Recibido var byte ' variable a guardar
Loop:
SERIN RX,T9600,["R"],Recibido
pause 1000
goto Loop
end.
Lo que hace es leer el pin RX cada segundo y para guardar lo enviado en la variable Recibido, primero necesitas enviar el caracter "R" esto es opcional a este dato le llamamos aqui generalmente de sincronizacion para que el pic sepa cuando va a recibir. Cuando recibe la letra "R" todo dato despues de ella sera guardado en la variable si no recibe la R no guardara nada. Pero como digo es opcional.
El ejemplo de SERIN2 esta en el Link anterior y como veras es mas potente el serin2 ya que puedes recibir cadenas mas largas de numeros o letras.
Estas 2 instrucciones son por Software para pics que no tienen USART pero si vas a usar USART checa en la ayuda los comandos HSEROUT y HSERIN