📄 canbus.frm
字号:
Top = 150
Visible = 0 'False
Width = 915
End
Begin VB.CheckBox Check7
Caption = "透明命令可用"
Height = 285
Left = 9780
TabIndex = 93
Top = 210
Value = 1 'Checked
Width = 1545
End
Begin VB.Frame Frame3
BackColor = &H80000018&
Height = 435
Left = 60
TabIndex = 81
Top = 780
Visible = 0 'False
Width = 11985
Begin VB.CheckBox Check6
BackColor = &H80000018&
Caption = "十进制ASCII转为字符"
Height = 285
Left = 360
TabIndex = 92
Top = 120
Width = 2025
End
Begin VB.CheckBox Check2
BackColor = &H80000018&
Caption = "十六进制ASCII转为字符"
Height = 255
Left = 2550
TabIndex = 91
Top = 150
Width = 2235
End
Begin VB.CommandButton Command5
Caption = "转化为十进制ASCII码"
Height = 285
Left = 10110
TabIndex = 86
Top = 120
Width = 1845
End
Begin VB.CommandButton Command4
Caption = "转化为十六进制ASCII码"
Height = 285
Left = 8010
TabIndex = 85
Top = 120
Width = 2025
End
Begin VB.CommandButton Command2
BackColor = &H80000018&
Caption = "计算校验和"
Height = 285
Left = 6870
TabIndex = 84
Top = 120
Width = 1065
End
Begin VB.OptionButton Option5
BackColor = &H80000018&
Caption = "异或"
Height = 180
Left = 5910
TabIndex = 83
Top = 180
Width = 675
End
Begin VB.OptionButton Option4
BackColor = &H80000018&
Caption = "累加和"
Height = 225
Left = 4920
TabIndex = 82
Top = 150
Value = -1 'True
Width = 915
End
End
Begin VB.TextBox Text13
Height = 345
Left = 5400
TabIndex = 90
Text = "125"
ToolTipText = "输入整个命令的结束符ASCII"
Top = 810
Visible = 0 'False
Width = 375
End
Begin VB.TextBox Text12
Height = 345
Left = 2970
TabIndex = 89
Text = "123"
ToolTipText = "输入整个命令的开始符ASCII"
Top = 840
Visible = 0 'False
Width = 345
End
Begin VB.CheckBox Check5
Caption = "命令字符串为十六进制ASCII码"
Height = 285
Left = 8790
TabIndex = 80
Top = 1680
Width = 2775
End
Begin VB.CheckBox Check4
Caption = "岛电表返回读取值"
Height = 315
Left = 4830
TabIndex = 79
Top = 1665
Width = 1785
End
Begin VB.CheckBox Check3
Caption = "只发送命令字符串"
Height = 285
Left = 6720
TabIndex = 78
Top = 1680
Width = 1755
End
Begin VB.OptionButton Option3
Caption = "字符返回"
Height = 315
Left = 3750
TabIndex = 77
Top = 1665
Value = -1 'True
Width = 1065
End
Begin VB.OptionButton Option2
Caption = "十六进制返回"
Height = 225
Left = 2280
TabIndex = 76
Top = 1710
Width = 1425
End
Begin VB.OptionButton Option1
Caption = "十进制返回"
Height = 285
Left = 870
TabIndex = 75
Top = 1680
Width = 1425
End
Begin VB.TextBox Text3
Appearance = 0 'Flat
Height = 270
Index = 35
Left = 11460
MaxLength = 3
TabIndex = 74
ToolTipText = "输入ASCII码"
Top = 510
Width = 315
End
Begin VB.TextBox Text3
Appearance = 0 'Flat
Height = 270
Index = 34
Left = 11160
MaxLength = 3
TabIndex = 73
ToolTipText = "输入ASCII码"
Top = 510
Width = 315
End
Begin VB.TextBox Text3
Appearance = 0 'Flat
Height = 270
Index = 33
Left = 10860
MaxLength = 3
TabIndex = 72
ToolTipText = "输入ASCII码"
Top = 510
Width = 315
End
Begin VB.TextBox Text3
Appearance = 0 'Flat
Height = 270
Index = 32
Left = 10560
MaxLength = 3
TabIndex = 71
ToolTipText = "输入ASCII码"
Top = 510
Width = 315
End
Begin VB.TextBox Text3
Appearance = 0 'Flat
Height = 270
Index = 31
Left = 10260
MaxLength = 3
TabIndex = 70
ToolTipText = "输入ASCII码"
Top = 510
Width = 315
End
Begin VB.TextBox Text3
Appearance = 0 'Flat
Height = 270
Index = 30
Left = 9960
MaxLength = 3
TabIndex = 69
ToolTipText = "输入ASCII码"
Top = 510
Width = 315
End
Begin VB.TextBox Text3
Appearance = 0 'Flat
Height = 270
Index = 29
Left = 9660
MaxLength = 3
TabIndex = 68
ToolTipText = "输入ASCII码"
Top = 510
Width = 315
End
Begin VB.TextBox Text3
Appearance = 0 'Flat
Height = 270
Index = 28
Left = 9360
MaxLength = 3
TabIndex = 67
ToolTipText = "输入ASCII码"
Top = 510
Width = 315
End
Begin VB.TextBox Text3
Appearance = 0 'Flat
Height = 270
Index = 27
Left = 9060
MaxLength = 3
TabIndex = 66
ToolTipText = "输入ASCII码"
Top = 510
Width = 315
End
Begin VB.TextBox Text3
Appearance = 0 'Flat
Height = 270
Index = 26
Left = 8760
MaxLength = 3
TabIndex = 65
ToolTipText = "输入ASCII码"
Top = 510
Width = 315
End
Begin VB.TextBox Text3
Appearance = 0 'Flat
Height = 270
Index = 25
Left = 8460
MaxLength = 3
TabIndex = 64
ToolTipText = "输入ASCII码"
Top = 510
Width = 315
End
Begin VB.TextBox Text3
Appearance = 0 'Flat
Height = 270
Index = 24
Left = 8160
MaxLength = 3
TabIndex = 63
ToolTipText = "输入ASCII码"
Top = 510
Width = 315
End
Begin VB.TextBox Text3
Appearance = 0 'Flat
Height = 270
Index = 23
Left = 7860
MaxLength = 3
TabIndex = 62
ToolTipText = "输入ASCII码"
Top = 510
Width = 315
End
Begin VB.TextBox Text3
Appearance = 0 'Flat
Height = 270
Index = 22
Left = 7560
MaxLength = 3
TabIndex = 61
ToolTipText = "输入ASCII码"
Top = 510
Width = 315
End
Begin VB.TextBox Text3
Appearance = 0 'Flat
Height = 270
Index = 21
Left = 7260
MaxLength = 3
TabIndex = 60
ToolTipText = "输入ASCII码"
Top = 510
Width = 315
End
Begin VB.TextBox Text3
Appearance = 0 'Flat
Height = 270
Index = 20
Left = 6960
MaxLength = 3
TabIndex = 59
ToolTipText = "输入ASCII码"
Top = 510
Width = 315
End
Begin VB.TextBox Text3
Appearance = 0 'Flat
Height = 270
Index = 19
Left = 6660
MaxLength = 3
TabIndex = 58
ToolTipText = "输入ASCII码"
Top = 510
Width = 315
End
Begin VB.TextBox Text3
Appearance = 0 'Flat
Height = 270
Index = 18
Left = 6360
MaxLength = 3
TabIndex = 57
ToolTipText = "输入ASCII码"
Top = 510
Width = 315
End
Begin VB.TextBox Text3
Appearance = 0 'Flat
Height = 270
Index = 17
Left = 6060
MaxLength = 3
TabIndex = 56
ToolTipText = "输入ASCII码"
Top = 510
Width = 315
End
Begin VB.TextBox Text3
Appearance = 0 'Flat
Height = 270
Index = 16
Left = 5760
MaxLength = 3
TabIndex = 55
ToolTipText = "输入ASCII码"
Top = 510
Width = 315
End
Begin VB.TextBox Text3
Appearance = 0 'Flat
Height = 270
Index = 15
Left = 5460
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -