为什么我用vb编的程序不能运行
客户端:Dim port As IntegerPrivate Sub Command1_Click()If Winsock1.State = 7 ThenWinsock1.ConnectDim send As Stringsend = Text2.TextWinsock1.SendData sendEnd IfEnd SubPrivate Sub Form_Load()Winsock1.Pr