¡¡¡Problema de envío de datos del socket VB!!! ¡Ayuda porcentual!
Usando winsock
Puede enviar una matriz de bytes o una cadena
dim binArray() como byte
redim binarray(100)
winsock1.p >dim strOut as sring
strout="abc"
winsock1.text1.text&": "text2.text
De esta manera, si el número de juez es 1, la puntuación es 5,67, entonces los datos reales enviados serán "1:5,67"
Es decir, separe los dos con dos puntos
y luego divida los dos de acuerdo a los dos puntos durante la entrada separada.
Por ejemplo, en el evento dataArrival de Winsock, así
atenuar StrIn como cadena
winsock1.getdata StrIn
msgbox "Número del juez es " & mid(strin,1,instr(1, strin,":")-1)
msgbox "La puntuación del juez es " & mid(strin,instr(1,strin,":" ) +1)
Acabo de escribir un ejemplo sencillo para ti
Puedes modificarlo tú mismo
.