Appendix-592
Real-time external control function
7Appendix
2) Production of form screen
On the form, 4 test boxes, 1 command button, 1 check box and 1 Winsock control are arranged.
The major change points of the properties are shown below.
3) Program (Form1.frm)
VERSION 5.00
Object = "{248DD890-BB45-11CF-9ABC-0080C7E7B78D}#1.0#0"; "MSWINSCK.OCX"
Begin VB.Form Form1
'Screen setting From here
Caption
= "Data link"
ClientHeight
= 3795
ClientLeft
= 60
ClientTop
= 345
ClientWidth
= 4800
LinkTopic
= "Form1"
ScaleHeight
= 3795
ScaleWidth
= 4800
StartUpPosition= 3 Predefined value of Windows
Begin MSWinsockLib.Winsock Winsock1
Left
= 2040
Top
= 2040
_ExtentX
= 741
_ExtentY
= 741
End
Begin VB.CommandButton Command1
Caption
= "Send"
Enabled
= 0
'False
Height
= 375
Left
= 3960
TabIndex
= 6
Top
= 1080
Width
= 735
End
Begin VB.CheckBox Check1
Caption
= "Connection"
Height
= 375
Left
= 3960
TabIndex
= 4
Top
= 360
Major changed points of properties
Object name
Property
Setting value
Form1 Caption
Data
link
Caption Send
Command1
Enabled False
Text1 Text
192.168.0.1
Text2 Text
10003
Text3 Text
MultiLine
True
Text4
ScrollBars
2-Vertical
Check1 Caption
Connection