winsock utf-8编码问题

项目涉及到winsock tcp通讯，一切顺利但是当我做到代码说问题
Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
Dim data As String
Winsock1.GetData data如果winsock返回的是utf-8编码的问题那么当我们将数据存入data的时候，已经乱码了所以希望大家帮忙看下。
1：难道VB winsock无法发送utf-8编码的数据？
2：string 无法保存utf-8格式的数据？希望有能力的人可以帮忙解决下，万分谢谢不要用打开文件的方式来回答，在提这个问题之前，我能搜索的都搜索了，困扰3天了希望大家能给个实际点的解决方式，代码最好