vb winsock udp循环绑定端口直到成功

来源:互联网 发布:2016网络诈骗案 编辑:程序博客网 时间:2024/06/08 06:36

vb winsock udp循环绑定端口

在使用udp协议时,需要绑定一个端口,但可能指定的端口被占用。
所以需要进行循环,从指定端口往后开始,寻找一个未被占用的端口进行bind

'从5100开始绑定端口直到成功为止Dim p As Integerp = 5100On Error Resume NextDo    Err.Clear    p = p + 1    wsk.Bind p    If Err.Number = 0 Then Exit Do  '绑定成功就退出循环Loop While 1  '未绑定成功就无限循环
0 0
原创粉丝点击