📄 frmmain.frm
字号:
Left = 2835
TabIndex = 88
Top = 270
Width = 1830
Begin VB.CheckBox Led
Caption = "LED1"
Height = 255
Index = 0
Left = 615
TabIndex = 96
Top = 300
Width = 945
End
Begin VB.CheckBox Led
Caption = "LED2"
Height = 255
Index = 1
Left = 615
TabIndex = 95
Top = 825
Width = 945
End
Begin VB.CheckBox Led
Caption = "LED3"
Height = 255
Index = 2
Left = 615
TabIndex = 94
Top = 1365
Width = 945
End
Begin VB.CheckBox Led
Caption = "LED4"
Height = 255
Index = 3
Left = 615
TabIndex = 93
Top = 1890
Width = 945
End
Begin VB.CheckBox Led
Caption = "LED5"
Height = 255
Index = 4
Left = 600
TabIndex = 92
Top = 2415
Width = 945
End
Begin VB.CheckBox Led
Caption = "LED6"
Height = 255
Index = 5
Left = 615
TabIndex = 91
Top = 2940
Width = 945
End
Begin VB.CheckBox Led
Caption = "LED7"
Height = 255
Index = 6
Left = 615
TabIndex = 90
Top = 3480
Width = 945
End
Begin VB.CheckBox Led
Caption = "LED8"
Height = 255
Index = 7
Left = 615
TabIndex = 89
Top = 4005
Width = 945
End
Begin VB.Label Label40
Caption = " 选中:灯灭 未选中:灯亮"
Height = 480
Left = 405
TabIndex = 97
Top = 4500
Width = 1110
End
End
Begin VB.Frame Frame12
Caption = "输入：8位开关状态"
Height = 5430
Left = 5055
TabIndex = 77
Top = 300
Width = 1830
Begin VB.CheckBox swit
Caption = "ON1"
Enabled = 0 'False
Height = 225
Index = 0
Left = 570
TabIndex = 86
Top = 300
Width = 720
End
Begin VB.CheckBox swit
Caption = "ON2"
Enabled = 0 'False
Height = 225
Index = 1
Left = 570
TabIndex = 85
Top = 825
Width = 720
End
Begin VB.CheckBox swit
Caption = "ON3"
Enabled = 0 'False
Height = 225
Index = 2
Left = 570
TabIndex = 84
Top = 1350
Width = 720
End
Begin VB.CheckBox swit
Caption = "ON4"
Enabled = 0 'False
Height = 225
Index = 3
Left = 570
TabIndex = 83
Top = 1875
Width = 720
End
Begin VB.CheckBox swit
Caption = "ON5"
Enabled = 0 'False
Height = 225
Index = 4
Left = 570
TabIndex = 82
Top = 2415
Width = 720
End
Begin VB.CheckBox swit
Caption = "ON6"
Enabled = 0 'False
Height = 225
Index = 5
Left = 570
TabIndex = 81
Top = 2940
Width = 720
End
Begin VB.CheckBox swit
Caption = "ON7"
Enabled = 0 'False
Height = 225
Index = 6
Left = 570
TabIndex = 80
Top = 3465
Width = 720
End
Begin VB.CheckBox swit
Caption = "ON8"
Enabled = 0 'False
Height = 225
Index = 7
Left = 570
TabIndex = 79
Top = 3990
Width = 720
End
Begin VB.CommandButton evtbtrefresh
Caption = "点此刷新状态"
Height = 315
Left = 240
TabIndex = 78
Top = 4905
Width = 1305
End
Begin VB.Label Label41
Caption = " ON:选中 OFF:不选中"
Height = 435
Left = 450
TabIndex = 87
Top = 4440
Width = 1065
End
End
Begin VB.Frame Frame13
Caption = "选择MEM读写地址"
Height = 1020
Left = 360
TabIndex = 74
Top = 2400
Width = 1935
Begin VB.OptionButton memadd0
Caption = "地址0"
Height = 210
Index = 0
Left = 270
TabIndex = 76
Top = 315
Value = -1 'True
Width = 840
End
Begin VB.OptionButton memadd1
Caption = "地址1"
Height = 210
Index = 1
Left = 270
TabIndex = 75
Top = 645
Width = 840
End
End
Begin VB.Label Label42
Caption = "IO输出:LED复选框控制DEMO板中8个LED状态"
Height = 510
Left = 270
TabIndex = 100
Top = 360
Width = 1845
End
Begin VB.Label Label43
Caption = "IO输入:8位开关状态输入 ""刷新""按纽获得DEMO板中拨码开关的当前状态"
Height = 885
Left = 270
TabIndex = 99
Top = 1230
Width = 2325
End
Begin VB.Label Label44
Caption = "所用API与MEM并口相同，只是长度总是1字节"
Height = 450
Left = 315
TabIndex = 98
Top = 4005
Width = 2310
End
End
Begin VB.Frame Frame8
Caption = "写入数据，API=USBIO_WriteEEPROM"
Height = 3180
Left = -73215
TabIndex = 64
Top = 420
Width = 5415
Begin VB.TextBox WrDataLen
BeginProperty DataFormat
Type = 0
Format = "0"
HaveTrueFalseNull= 0
FirstDayOfWeek = 0
FirstWeekOfYear = 0
LCID = 2052
SubFormatType = 0
EndProperty
Height = 375
Left = 345
TabIndex = 68
Text = "0"
Top = 1305
Width = 2415
End
Begin VB.TextBox WrDataBuf
Height = 1025
Left = 345
MultiLine = -1 'True
ScrollBars = 2 'Vertical
TabIndex = 67
Top = 1995
Width = 4695
End
Begin VB.TextBox WrDataAddr
BeginProperty DataFormat
Type = 0
Format = "0"
HaveTrueFalseNull= 0
FirstDayOfWeek = 0
FirstWeekOfYear = 0
LCID = 2052
SubFormatType = 0
EndProperty
Height = 375
Left = 330
TabIndex = 66
Text = "0"
Top = 570
Width = 2415
End
Begin VB.CommandButton eepromWrDate
Caption = "Write"
Height = 375
Left = 4035
TabIndex = 65
Top = 1230
Width = 975
End
Begin VB.Label Label38
Caption = "写入长度"
Height = 255
Left = 330
TabIndex = 72
Top = 1020
Width = 810
End
Begin VB.Label Label37
Caption = "(<400H)"
Height = 255
Left = 1125
TabIndex = 71
Top = 1020
Width = 765
End
Begin VB.Label Label36
Caption = "多个数据（16进制，两字符一组）"
Height = 225
Left = 330
TabIndex = 70
Top = 1725
Width = 3075
End
Begin VB.Label Label33
Caption = "数据单元起始地址"
Height = 255
Left = 315
TabIndex = 69
Top = 270
Width = 1650
End
End
Begin VB.Frame Frame9
Caption = "读出数据，API=USBIO_ReadEEPROM"
Height = 3180
Left = -73230
TabIndex = 55
Top = 3645
Width = 5415
Begin VB.CommandButton eepromRdDate
Caption = "Read"
Height = 375
Left = 4035
TabIndex = 59
Top = 1245
Width = 975
End
Begin VB.TextBox RdDataAddr
BeginProperty DataFormat
Type = 0
Format = "0"
HaveTrueFalseNull= 0
FirstDayOfWeek = 0
FirstWeekOfYear = 0
LCID = 2052
SubFormatType = 0
EndProperty
Height = 375
Left = 315
TabIndex = 58
Text = "0"
Top = 540
Width = 2415
End
Begin VB.TextBox RdDataBuf
Height = 1025
Left = 315
MultiLine = -1 'True
ScrollBars = 2 'Vertical
TabIndex = 57
Top = 1995
Width = 4695
End
Begin VB.TextBox RdDataLen
BeginProperty DataFormat
Type = 0
Format = "0"
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -