在线急等：winsock做的小程序考别人机子上怎么就打不开呢？

这是个简单聊天程序：
Private Sub Command1_Click()
  sockB.SendData txt1.Text '发送文本
End Sub    Private Sub Form_Load()
     With sockB
     .RemoteHost = "192.168.0.42" '要连接到计算机的IP地址
     .RemotePort = 1011 '要连接到的端口号
     .LocalPort = 1010 '该Winsock控制将使用的本地端口号，便于其它方与之通讯
     .Bind 1010 '将该Winsock控制绑定到该本地端口
     End With
    End Sub    Private Sub udpPeerB_DataArrival(ByVal bytesTotal As Long)
     Dim strData As String
     udpPeerB.GetData strData, vbString
    txt2.Text = strData
    End Sub
这个是客机端。
它显示的是“部件.ocx或其附件未正确注册，一个或多个文件丢失。”
请问什么意思啊？我生成了.exe文件还要vb环境吗？
怎么样才能使没装vb的也可以用呢？