Hi,
I don't know what is "print error" but string data can be read as the following
Private Sub wclClient_OnData(ByVal Buffer As Variant)
Dim s As String
s = StrConv(Buffer, vbUnicode)
meAns.Text = meAns.Text + s
End Sub
Of course, Buffer must contain UNICODE string.