For help! Each one a piece of code what mean?-CodePudding

 Private Sub Command1_Click () 
The Static OldWord As String 
If the Trim (Text1. Text)="" Or Trim (Text2. Text)=" "Or Trim (Text3. Text)=" "Or Trim (Text4. Text)=" "Or Trim (Text5. Text)=" "Then Exit Sub 
If the Trim (Text5. Text) & lt;> "" And OldWord & lt;> Text1. Text & amp; ":" & amp; Text5. Text Then 
Winsock1. RemoteHost=Text2. Text 
Winsock1. SendData publishes the event Text1. Text & amp; ":" & amp; Text5. Text 
List1. AddItem Text1. Text & amp; ":" & amp; Text5. Text 
OldWord=Text1. Text & amp; ":" & amp; Text5. Text 
End the If 

End Sub 

Private Sub Command2_Click () 
Winsock1. Close 
Winsock1. RemoteHost=Text2. Text 
Winsock1. LocalPort=Val (Text3. Text) 
Winsock1. RemotePort=Val (Text4. Text) 
Winsock1. Bind Val (Text3. Text) 
End Sub 

Private Sub Form_Load () 
Label4. Caption="native IP:" & amp; Winsock1. LocalIP 
Text2. Text="10.2.5.47" 
Text3. Text="1001" 
Text4. Text="1001" 
Winsock1. LocalPort=Val (Text3. Text) 
Winsock1. RemotePort=Val (Text4. Text) 
Winsock1. Bind Val (Text3. Text) 

End Sub 

Private Sub List1_Click () 

End Sub 

Private Sub Winsock1_DataArrival (ByVal bytesTotal As Long) 
Dim Temp As String 
Winsock1. GetData Temp 
List1. AddItem Temp 
End Sub

CodePudding user response:

He then connect code is what ah, turn to for help!

CodePudding user response:

What's the meaning of each sentence,,,

Learn basic knowledge, not their baidu check information, then do not point to ask for specific problems, don't learn to ask, who can tasting feed you eat

CodePudding user response:

Install a MSDN6.0, LZ basic can find the answer, the question of

CodePudding user response:

VB is the most close to the computer language in the English language,

CodePudding user response:

MSDN98_1. ISO http://pan.baidu.com/s/1dDF41ix, MSDN98_2. ISO http://pan.baidu.com/s/1bnGo0Vl

CodePudding user response:

Check the MSDN is one of the Windows programmer must master the skills,

CodePudding user response:

The Static OldWord As String

https://zhidao.baidu.com/question/360739079.html

CodePudding user response:

Text1. Text

TextBox:http://blog.163.com/zsy_19880518/blog/static/18525812720126185214947/

CodePudding user response:

Trim (Text1. Text)

Trim:http://blog.csdn.net/nctu_to_prove_safety/article/details/53433814