UC知道VB一个关于远程控制的问题
来源：百度知道 编辑：UC知道 时间：2024/05/24 15:20:11
我想用VB做一个远程控制,但在文本框中输入IP时不行,哪个大哥帮忙解决一下啊!!!下面是关于文本框输入IP的代码:
Private Sub CmdConnect_Click()
a = Text1.Text
b% = Val(Text2.Text)
With Me
.SckClient.RemoteHost = a '设置远程IP，本例设为本机
.SckClient.RemotePort = b% '远程端口,就为server中的设置一样
End With
SckClient.Connect
CmdConnect.Enabled = False
End Sub
Private Sub CmdConnect_Click()
a = Text1.Text
b% = Val(Text2.Text)
With Me
.SckClient.RemoteHost = a '设置远程IP，本例设为本机
.SckClient.RemotePort = b% '远程端口,就为server中的设置一样
End With
SckClient.Connect
CmdConnect.Enabled = False
End Sub
Private Sub CmdConnect_Click()
a = Text1.Text
b =Text2.Text
With Me
.SckClient.RemoteHost = trim(a) '设置远程IP，本例设为本机
.SckClient.RemotePort = trim(b) '远程端口,就为server中的设置一样
End With
SckClient.Connect
CmdConnect.Enabled = False
End Sub
试下这样如何，我也没测试过，不过我觉得端口号应该也是string类型，不该改成integer类型。