UC知道关于VB的winsock控件
来源：百度知道 编辑：UC知道 时间：2024/06/23 00:24:26
Private Sub Form_Load()
App.TaskVisible = False
TcpSvr(0).Protocol = sckTCPProtocol
TcpSvr(0).LocalPort = 1001
TcpSvr(0).Listen
tcpIndex = 1
ReDim CurUser(1)
CurUser(0).ClientConnected = False
End Sub
执行frm的时候，提示说上一段的第3行“编译错误-未找到方法或数据成员”
我把第一行用 ' 注释掉 接下来的一行也会出现同样的错误，我估计是没有在 通用 中定义什么 或还有控件没 引用。
注：这个frm已经引用了winsock控件。
App.TaskVisible = False
TcpSvr(0).Protocol = sckTCPProtocol
TcpSvr(0).LocalPort = 1001
TcpSvr(0).Listen
tcpIndex = 1
ReDim CurUser(1)
CurUser(0).ClientConnected = False
End Sub
执行frm的时候，提示说上一段的第3行“编译错误-未找到方法或数据成员”
我把第一行用 ' 注释掉 接下来的一行也会出现同样的错误，我估计是没有在 通用 中定义什么 或还有控件没 引用。
注：这个frm已经引用了winsock控件。
你那个winsock控件必须叫TcpSvr(0)才行的。
你应该把你的问题简单化，即去掉其他作为美化或其他功能的东西，其他人才能很快找到你程序中的问题
检查一下控件数组TcpSvr(0)的名称是否正确
你的TcpSvr(0)属性Index是大于等于0吗？