计算机毕业设计功能介绍：
输入要连接的IP（教师机器的IP），系统将自动连接到教师的机器中，如果教师机器没有反映 系统将提供一定时间的自动重试操作，一定时间后 系统将提示连接异常。
以下是引用片段： 相关代码如下：
Dim strIp As String
strIp = InputBox("请输入要连接的主机IP", "输入信息", "127.0.0.1") '弹出输入框，让用户输入要连接的主机IP
If strIp = "" Then Exit Sub '如果输入信息为空，则退出该模块
Dim I As Long
I = 0
Do
If I = 10000 Then
If MsgBox("主机网络连接不通,是否重试", 4 + 256 + 64, "") = vbYes Then '如果在弹出的信息提示框中选择“是”
I = 0 '那么继续循环
Else
Exit Do '否则退出循环
End If
End If
If Me.WinConnect.State <> 1 Then '如果找到主机IP
Me.WinConnect.Close '关闭以前可能建立的连接
Me.WinConnect.Connect strIp, 8888 '连接主机IP，1234是端口（可随便输）
Exit Do '否则退出循环
End If
I = I + 1
DoEvents '将短暂的事务处理时间交给系统，以防止程序在循环时长时间没有响应
Loop
|
〖资料来源:计算机毕业论文 www.xiaoniu168.com〗
第8页为计算机毕业论文功能2介绍......