frmmain.frm
来自「16 relay output channels and 16 isolated」· FRM 代码 · 共 987 行 · 第 1/3 页
FRM
987 行
VERSION 5.00
Begin VB.Form frmMain
Caption = "PCI-1755 interrupt events demo"
ClientHeight = 5295
ClientLeft = 2415
ClientTop = 2205
ClientWidth = 6510
LinkTopic = "Form1"
ScaleHeight = 5295
ScaleWidth = 6510
Begin VB.CommandButton cmdExit
Caption = "E&xit"
Height = 375
Left = 5040
TabIndex = 52
Top = 4800
Width = 1335
End
Begin VB.CommandButton cmdStop
Caption = "Sto&p"
Enabled = 0 'False
Height = 375
Left = 3720
TabIndex = 51
Top = 4800
Width = 1095
End
Begin VB.CommandButton cmdStart
Caption = "Sta&rt"
Height = 375
Left = 2520
TabIndex = 50
Top = 4800
Width = 1095
End
Begin VB.CommandButton cmdSelectDevice
Caption = "&Select Device..."
Height = 375
Left = 4920
TabIndex = 49
Top = 120
Width = 1455
End
Begin VB.TextBox txtDeviceName
Height = 375
Left = 120
TabIndex = 48
Top = 120
Width = 4695
End
Begin VB.TextBox txtChangeStatusChannel
Alignment = 1 'Right Justify
Height = 285
Left = 5880
TabIndex = 20
Text = "31"
Top = 1440
Width = 495
End
Begin VB.TextBox txtPatternMatchValue
Alignment = 1 'Right Justify
Height = 285
Left = 5160
TabIndex = 18
Text = "FFFFFF"
Top = 720
Width = 1215
End
Begin VB.TextBox txtCounterValue
Alignment = 1 'Right Justify
Height = 285
Left = 5640
TabIndex = 16
Text = "65535"
Top = 1080
Width = 735
End
Begin VB.TextBox txtStatusChangeEvent
Alignment = 1 'Right Justify
Height = 285
Left = 2160
Locked = -1 'True
TabIndex = 14
Text = "4294836225"
Top = 1440
Width = 1215
End
Begin VB.TextBox txtPatternMatchEvent
Alignment = 1 'Right Justify
Height = 285
Left = 2160
Locked = -1 'True
TabIndex = 13
Text = "4294836225"
Top = 720
Width = 1215
End
Begin VB.TextBox txtCounterEvent
Alignment = 1 'Right Justify
Height = 285
Left = 2160
Locked = -1 'True
TabIndex = 12
Text = "4294836225"
Top = 1080
Width = 1215
End
Begin VB.Frame frmDiInterrupt
Caption = "Auxiliary DI Interrupt Events"
Height = 2895
Left = 120
TabIndex = 3
Top = 1800
Width = 6255
Begin VB.TextBox txtDiInterrupt
Alignment = 1 'Right Justify
Height = 285
Index = 7
Left = 4800
Locked = -1 'True
TabIndex = 47
Text = "4294836225"
Top = 2520
Width = 1215
End
Begin VB.TextBox txtDiInterrupt
Alignment = 1 'Right Justify
Height = 285
Index = 6
Left = 4800
Locked = -1 'True
TabIndex = 46
Text = "4294836225"
Top = 2160
Width = 1215
End
Begin VB.TextBox txtDiInterrupt
Alignment = 1 'Right Justify
Height = 285
Index = 5
Left = 4800
Locked = -1 'True
TabIndex = 45
Text = "4294836225"
Top = 1800
Width = 1215
End
Begin VB.TextBox txtDiInterrupt
Alignment = 1 'Right Justify
Height = 285
Index = 4
Left = 4800
Locked = -1 'True
TabIndex = 44
Text = "4294836225"
Top = 1440
Width = 1215
End
Begin VB.TextBox txtDiInterrupt
Alignment = 1 'Right Justify
Height = 285
Index = 3
Left = 1560
Locked = -1 'True
TabIndex = 43
Text = "4294836225"
Top = 2520
Width = 1215
End
Begin VB.TextBox txtDiInterrupt
Alignment = 1 'Right Justify
Height = 285
Index = 2
Left = 1560
Locked = -1 'True
TabIndex = 42
Text = "4294836225"
Top = 2160
Width = 1215
End
Begin VB.TextBox txtDiInterrupt
Alignment = 1 'Right Justify
Height = 285
Index = 1
Left = 1560
Locked = -1 'True
TabIndex = 41
Text = "4294836225"
Top = 1800
Width = 1215
End
Begin VB.TextBox txtDiInterrupt
Alignment = 1 'Right Justify
Height = 285
Index = 0
Left = 1560
Locked = -1 'True
TabIndex = 40
Text = "4294836225"
Top = 1440
Width = 1215
End
Begin VB.Frame Frame1
Caption = "DI interruipt signal condition "
Height = 1095
Left = 120
TabIndex = 21
Top = 240
Width = 6015
Begin VB.ListBox lstDiSignalCondition
Height = 450
Index = 7
ItemData = "frmMain.frx":0000
Left = 960
List = "frmMain.frx":000A
TabIndex = 37
Top = 480
Width = 615
End
Begin VB.ListBox lstDiSignalCondition
Height = 450
Index = 6
ItemData = "frmMain.frx":001F
Left = 1560
List = "frmMain.frx":0029
TabIndex = 35
Top = 480
Width = 615
End
Begin VB.ListBox lstDiSignalCondition
Height = 450
Index = 5
ItemData = "frmMain.frx":003E
Left = 2160
List = "frmMain.frx":0048
TabIndex = 33
Top = 480
Width = 615
End
Begin VB.ListBox lstDiSignalCondition
Height = 450
Index = 4
ItemData = "frmMain.frx":005D
Left = 2760
List = "frmMain.frx":0067
TabIndex = 31
Top = 480
Width = 615
End
Begin VB.ListBox lstDiSignalCondition
Height = 450
Index = 3
ItemData = "frmMain.frx":007C
Left = 3360
List = "frmMain.frx":0086
TabIndex = 29
Top = 480
Width = 615
End
Begin VB.ListBox lstDiSignalCondition
Height = 450
Index = 2
ItemData = "frmMain.frx":009B
Left = 3960
List = "frmMain.frx":00A5
TabIndex = 27
Top = 480
Width = 615
End
Begin VB.ListBox lstDiSignalCondition
Height = 450
Index = 1
ItemData = "frmMain.frx":00BA
Left = 4560
List = "frmMain.frx":00C4
TabIndex = 25
Top = 480
Width = 615
End
Begin VB.ListBox lstDiSignalCondition
Height = 450
Index = 0
ItemData = "frmMain.frx":00D9
Left = 5160
List = "frmMain.frx":00E3
TabIndex = 23
Top = 480
Width = 615
End
Begin VB.Label Label6
BorderStyle = 1 'Fixed Single
Caption = "Trigger edge"
Height = 450
Left = 240
TabIndex = 39
Top = 480
Width = 735
End
Begin VB.Label Label5
BorderStyle = 1 'Fixed Single
Caption = "Channel"
Height = 255
Left = 240
TabIndex = 38
Top = 240
Width = 735
End
Begin VB.Label Label4
Alignment = 2 'Center
BorderStyle = 1 'Fixed Single
Caption = "&7"
Height = 255
Index = 7
Left = 960
TabIndex = 36
Top = 240
Width = 615
End
Begin VB.Label Label4
Alignment = 2 'Center
BorderStyle = 1 'Fixed Single
Caption = "&6"
Height = 255
Index = 6
Left = 1560
TabIndex = 34
Top = 240
Width = 615
End
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?