for some reason VB don't send some char in different language, so i have to set winsock arrival to winsock.getdata buffer, vbbyte

Here is the packet i need to send out
Code:
public function  Send(byval User as string, byval chatText as string)
dim Packet as string
dim truePacket() as byte
packet = chrb(&h80) & chrb(&hc0) & User & chrb(&h80) & chrb(&hc0) & chatText
truepacket = packet
winsock.senddata truepacket
end function
I have to use chrb for some char

can anyone help me out there?

Thankx