📄 frmrun.frm
字号:
VERSION 5.00
Begin VB.Form frmRun
BackColor = &H80000009&
BorderStyle = 1 'Fixed Single
Caption = "Direct I/O Demo"
ClientHeight = 5220
ClientLeft = 2955
ClientTop = 1245
ClientWidth = 6720
FillColor = &H00FF0000&
FillStyle = 3 'Vertical Line
BeginProperty Font
Name = "MS Sans Serif"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF0000&
LinkTopic = "Form1"
MaxButton = 0 'False
PaletteMode = 1 'UseZOrder
ScaleHeight = 5220
ScaleWidth = 6720
Begin VB.Frame Frame5
BackColor = &H80000009&
Caption = "Read Dword Data"
Height = 855
Left = 4800
TabIndex = 109
Top = 4080
Width = 1695
Begin VB.TextBox txtDword
Height = 315
Left = 120
TabIndex = 110
Top = 360
Width = 975
End
Begin VB.Label Label3
BackStyle = 0 'Transparent
Caption = "Hex"
Height = 255
Left = 1200
TabIndex = 111
Top = 390
Width = 375
End
End
Begin VB.Frame Frame4
BackColor = &H80000009&
Caption = "Read Word Data"
Height = 855
Left = 2520
TabIndex = 106
Top = 4080
Width = 1695
Begin VB.TextBox txtWord
Height = 315
Left = 120
TabIndex = 107
Top = 360
Width = 975
End
Begin VB.Label Label2
BackStyle = 0 'Transparent
Caption = "Hex"
Height = 255
Left = 1200
TabIndex = 108
Top = 390
Width = 375
End
End
Begin VB.Frame Frame3
BackColor = &H80000009&
Caption = "Read Byte Data"
Height = 855
Left = 240
TabIndex = 103
Top = 4080
Width = 1695
Begin VB.TextBox txtByte
Height = 315
Left = 120
TabIndex = 104
Top = 360
Width = 975
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "Hex"
Height = 255
Left = 1200
TabIndex = 105
Top = 390
Width = 375
End
End
Begin VB.CommandButton cmdReadDword
Caption = "Read Dword"
Height = 375
Left = 5040
TabIndex = 101
Top = 2760
Width = 1215
End
Begin VB.CommandButton cmdReadWord
Caption = "Read Word"
Height = 375
Left = 5040
TabIndex = 100
Top = 2340
Width = 1215
End
Begin VB.CommandButton cmdReadByte
Caption = "Read Byte"
Height = 375
Left = 5040
TabIndex = 99
Top = 1920
Width = 1215
End
Begin VB.CommandButton cmdWriteDword
Caption = "Write Dword"
Height = 375
Left = 5040
TabIndex = 98
Top = 1200
Width = 1215
End
Begin VB.CommandButton cmdWriteWord
Caption = "Write Word"
Height = 375
Left = 5040
TabIndex = 97
Top = 780
Width = 1215
End
Begin VB.CommandButton cmdWriteByte
Caption = "Write Byte"
Height = 375
Left = 5040
TabIndex = 96
Top = 360
Width = 1215
End
Begin VB.Frame Frame1
BackColor = &H80000009&
Caption = "Digital Output value"
Height = 3855
Left = 240
TabIndex = 1
Top = 120
Width = 4335
Begin VB.CommandButton cmdBit
Appearance = 0 'Flat
BackColor = &H80000005&
Height = 375
Index = 24
Left = 3720
TabIndex = 79
TabStop = 0 'False
Top = 2880
Width = 375
End
Begin VB.CommandButton cmdBit
Appearance = 0 'Flat
BackColor = &H80000005&
Height = 375
Index = 25
Left = 3240
TabIndex = 78
TabStop = 0 'False
Top = 2880
Width = 375
End
Begin VB.CommandButton cmdBit
Appearance = 0 'Flat
BackColor = &H80000005&
Height = 375
Index = 26
Left = 2760
TabIndex = 77
TabStop = 0 'False
Top = 2880
Width = 375
End
Begin VB.CommandButton cmdBit
Appearance = 0 'Flat
BackColor = &H80000005&
Height = 375
Index = 27
Left = 2280
TabIndex = 76
TabStop = 0 'False
Top = 2880
Width = 375
End
Begin VB.CommandButton cmdBit
Appearance = 0 'Flat
BackColor = &H80000005&
Height = 375
Index = 28
Left = 1680
TabIndex = 75
TabStop = 0 'False
Top = 2880
Width = 375
End
Begin VB.CommandButton cmdBit
Height = 375
Index = 29
Left = 1200
TabIndex = 74
TabStop = 0 'False
Top = 2880
Width = 375
End
Begin VB.CommandButton cmdBit
Appearance = 0 'Flat
BackColor = &H80000005&
Height = 375
Index = 30
Left = 720
TabIndex = 73
TabStop = 0 'False
Top = 2880
Width = 375
End
Begin VB.CommandButton cmdBit
Appearance = 0 'Flat
BackColor = &H80000005&
Height = 375
Index = 31
Left = 240
TabIndex = 72
TabStop = 0 'False
Top = 2880
Width = 375
End
Begin VB.CommandButton cmdBit
Appearance = 0 'Flat
BackColor = &H80000005&
Height = 375
Index = 16
Left = 3720
TabIndex = 55
TabStop = 0 'False
Top = 2040
Width = 375
End
Begin VB.CommandButton cmdBit
Appearance = 0 'Flat
BackColor = &H80000005&
Height = 375
Index = 17
Left = 3240
TabIndex = 54
TabStop = 0 'False
Top = 2040
Width = 375
End
Begin VB.CommandButton cmdBit
Appearance = 0 'Flat
BackColor = &H80000005&
Height = 375
Index = 18
Left = 2760
TabIndex = 53
TabStop = 0 'False
Top = 2040
Width = 375
End
Begin VB.CommandButton cmdBit
Appearance = 0 'Flat
BackColor = &H80000005&
Height = 375
Index = 19
Left = 2280
TabIndex = 52
TabStop = 0 'False
Top = 2040
Width = 375
End
Begin VB.CommandButton cmdBit
Appearance = 0 'Flat
BackColor = &H80000005&
Height = 375
Index = 20
Left = 1680
TabIndex = 51
TabStop = 0 'False
Top = 2040
Width = 375
End
Begin VB.CommandButton cmdBit
Height = 375
Index = 21
Left = 1200
TabIndex = 50
TabStop = 0 'False
Top = 2040
Width = 375
End
Begin VB.CommandButton cmdBit
Appearance = 0 'Flat
BackColor = &H80000005&
Height = 375
Index = 22
Left = 720
TabIndex = 49
TabStop = 0 'False
Top = 2040
Width = 375
End
Begin VB.CommandButton cmdBit
Appearance = 0 'Flat
BackColor = &H80000005&
Height = 375
Index = 23
Left = 240
TabIndex = 48
TabStop = 0 'False
Top = 2040
Width = 375
End
Begin VB.CommandButton cmdBit
Appearance = 0 'Flat
BackColor = &H80000005&
Height = 375
Index = 8
Left = 3720
TabIndex = 33
TabStop = 0 'False
Top = 1200
Width = 375
End
Begin VB.CommandButton cmdBit
Appearance = 0 'Flat
BackColor = &H80000005&
Height = 375
Index = 9
Left = 3240
TabIndex = 32
TabStop = 0 'False
Top = 1200
Width = 375
End
Begin VB.CommandButton cmdBit
Appearance = 0 'Flat
BackColor = &H80000005&
Height = 375
Index = 10
Left = 2760
TabIndex = 31
TabStop = 0 'False
Top = 1200
Width = 375
End
Begin VB.CommandButton cmdBit
Appearance = 0 'Flat
BackColor = &H80000005&
Height = 375
Index = 11
Left = 2280
TabIndex = 30
TabStop = 0 'False
Top = 1200
Width = 375
End
Begin VB.CommandButton cmdBit
Appearance = 0 'Flat
BackColor = &H80000005&
Height = 375
Index = 12
Left = 1680
TabIndex = 29
TabStop = 0 'False
Top = 1200
Width = 375
End
Begin VB.CommandButton cmdBit
Height = 375
Index = 13
Left = 1200
TabIndex = 28
TabStop = 0 'False
Top = 1200
Width = 375
End
Begin VB.CommandButton cmdBit
Appearance = 0 'Flat
BackColor = &H80000005&
Height = 375
Index = 14
Left = 720
TabIndex = 27
TabStop = 0 'False
Top = 1200
Width = 375
End
Begin VB.CommandButton cmdBit
Appearance = 0 'Flat
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -