اگر کلاس clsTCPSocket را خودتان نوشتید باید در تعریف رویداد موردن نظرتان پارامتر sender را نیز اضاغه نماییدو برای ایجاد رویداد به صورت زیر عمل کنید
RaiseEvent DataArryval(me,pBytes,pLength)