#885126
<insertwinsocknamehere>.GetData(strData) <inserttextboxhere>.AppendText(GatherData(strData) & vbCrLf)