Location:
Search - vb6.0 bo
Search list
Description: modbus方面的资料,好不容易才下来的-the information from the hard-won
Platform: |
Size: 126976 |
Author: wrjcomp |
Hits:
Description: Private Sub cmdConnect_Click()
If Len(Text1.Text) = 0 And Len(Text2.Text) = 0 Then
MsgBox 123.12.25.38
Exit Sub
Else
If Len(Text1.Text) > 0 Then
tcpClient.RemoteHost = Text1.Text
Else
tcpClient.RemoteHost = Text2.Text
End If
End If
tcpClient.Connect
Timer1.Enabled = True
End Sub -Private Sub cmdConnect_Click () If Len (Text1.Text) = 0 And Len (Text2.Text) = 0 Then MsgBox 123.12.25.38Exit Sub Else If Len (Text1.Text)> 0 Then tcpClient.RemoteHost = Text1.Text Else tcpClient . RemoteHost = Text2.Text End If End If tcpClient.Connect Timer1.Enabled = True End Sub
Platform: |
Size: 1024 |
Author: dhxdh |
Hits:
Description: 《Visual Basic 6.0实例教程》电子书 PDG格式-《Visual Basic 6.0 tutorial examples》 PDG e-book format
Platform: |
Size: 8779776 |
Author: 一叶秋 |
Hits: