en vb no tengo ni idea pero prodrias usar un sniffer, para incerteptar los datos que llegan a tu maquina.
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes Menúnum=rnd * 100
Open "C:\archivo.txt" For Random As #1 Len = Len(REG)
Dim CadNombre as String
CadNombre= "Nombre=" & nombreusuario
Put # NÚMERO_ARCHIVO, NÚMERO_REG, CadNombre