| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 628 人关注过本帖
标题:诚心求助在使用winsock遇到的问题,请高手赐教
只看楼主 加入收藏
hnayld2005
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2005-10-30
收藏
 问题点数:0 回复次数:4 
诚心求助在使用winsock遇到的问题,请高手赐教

下面是我的两个事件使用winsock控件数组编译时,提示编译错误:错误的参数号或无效的属性赋值(显示的错误行是tcpServer(0).LocalPort = 1001)请高手赐教是怎么会事?
Dim intMax As Integer

Private Sub Form_Load()

'tcpServer.LocalPort = 1001
'tcpServer.Listen
'frmClient.Show '显示客户端的窗体。
intMax = 0
tcpServer(0).LocalPort = 1001
tcpServer(0).Listen
End Sub


Private Sub tcpServer_ConnectionRequest(ByVal requestID As Long)
If Index = 0 Then
intMax = intMax + 1
Load tcpServer(intMax)
tcpServer(intMax).LocalPort = 0
tcpServer(intMax).Accept requestID
Load txtData(intMax)

End If


End Sub

搜索更多相关主题的帖子: winsock 诚心 
2005-10-30 11:02
slore
Rank: 5Rank: 5
等 级:贵宾
威 望:16
帖 子:1108
专家分:0
注 册:2005-7-1
收藏
得分:0 
都用一个PORT?

快上课了……
2005-10-30 12:06
hnayld2005
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2005-10-30
收藏
得分:0 

slore我能和你讨论一下吗
我的qq23221967

2005-10-30 13:04
liansb
Rank: 1
等 级:新手上路
帖 子:11
专家分:0
注 册:2005-6-15
收藏
得分:0 

在form_load里加入intMax=1试试

2005-11-07 16:06
leon2
Rank: 3Rank: 3
等 级:新手上路
威 望:7
帖 子:731
专家分:0
注 册:2005-3-18
收藏
得分:0 
你把 tcpServer 控件的 Index 属性设为 0 再来运行一下。
2005-11-07 21:13
快速回复:诚心求助在使用winsock遇到的问题,请高手赐教
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.041002 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved