📄 digcyc.frm
字号:
VERSION 5.00
Object = "{BDC217C8-ED16-11CD-956C-0000C04E4C0A}#1.1#0"; "TABCTL32.OCX"
Object = "{C932BA88-4374-101B-A56C-00AA003668DC}#1.1#0"; "MSMASK32.OCX"
Object = "{86CF1D34-0C5F-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCT2.OCX"
Begin VB.Form DigCyc
BorderStyle = 3 'Fixed Dialog
Caption = "控制面板"
ClientHeight = 5220
ClientLeft = 2760
ClientTop = 3750
ClientWidth = 7755
Icon = "DigCyc.frx":0000
LinkTopic = "Form1"
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 5220
ScaleWidth = 7755
ShowInTaskbar = 0 'False
Begin VB.CommandButton CommandApply
Caption = "应用"
Height = 375
Left = 360
TabIndex = 79
Top = 4680
Width = 855
End
Begin VB.Timer CycTimer1
Interval = 456
Left = 4275
Top = 45
End
Begin TabDlg.SSTab SSTab2
Height = 3795
Left = 3960
TabIndex = 20
Top = 675
Width = 3810
_ExtentX = 6720
_ExtentY = 6694
_Version = 393216
Style = 1
Tabs = 2
TabHeight = 520
TabCaption(0) = "一号灌区"
TabPicture(0) = "DigCyc.frx":030A
Tab(0).ControlEnabled= -1 'True
Tab(0).Control(0)= "Label3(0)"
Tab(0).Control(0).Enabled= 0 'False
Tab(0).Control(1)= "Label3(1)"
Tab(0).Control(1).Enabled= 0 'False
Tab(0).Control(2)= "Label3(2)"
Tab(0).Control(2).Enabled= 0 'False
Tab(0).Control(3)= "Line1(2)"
Tab(0).Control(3).Enabled= 0 'False
Tab(0).Control(4)= "CloseTime(5)"
Tab(0).Control(4).Enabled= 0 'False
Tab(0).Control(5)= "CloseTime(4)"
Tab(0).Control(5).Enabled= 0 'False
Tab(0).Control(6)= "CloseTime(3)"
Tab(0).Control(6).Enabled= 0 'False
Tab(0).Control(7)= "CloseTime(2)"
Tab(0).Control(7).Enabled= 0 'False
Tab(0).Control(8)= "CloseTime(1)"
Tab(0).Control(8).Enabled= 0 'False
Tab(0).Control(9)= "OpenTime(3)"
Tab(0).Control(9).Enabled= 0 'False
Tab(0).Control(10)= "SetTimeValveName(0)"
Tab(0).Control(10).Enabled= 0 'False
Tab(0).Control(11)= "SetTimeValveName(1)"
Tab(0).Control(11).Enabled= 0 'False
Tab(0).Control(12)= "SetTimeValveName(2)"
Tab(0).Control(12).Enabled= 0 'False
Tab(0).Control(13)= "SetTimeValveName(3)"
Tab(0).Control(13).Enabled= 0 'False
Tab(0).Control(14)= "SetTimeValveName(4)"
Tab(0).Control(14).Enabled= 0 'False
Tab(0).Control(15)= "SetTimeValveName(5)"
Tab(0).Control(15).Enabled= 0 'False
Tab(0).Control(16)= "OpenTime(4)"
Tab(0).Control(16).Enabled= 0 'False
Tab(0).Control(17)= "OpenTime(5)"
Tab(0).Control(17).Enabled= 0 'False
Tab(0).Control(18)= "OpenTime(2)"
Tab(0).Control(18).Enabled= 0 'False
Tab(0).Control(19)= "OpenTime(1)"
Tab(0).Control(19).Enabled= 0 'False
Tab(0).Control(20)= "OpenTime(0)"
Tab(0).Control(20).Enabled= 0 'False
Tab(0).Control(21)= "CloseTime(0)"
Tab(0).Control(21).Enabled= 0 'False
Tab(0).ControlCount= 22
TabCaption(1) = "二号灌区"
TabPicture(1) = "DigCyc.frx":0326
Tab(1).ControlEnabled= 0 'False
Tab(1).Control(0)= "Label3(3)"
Tab(1).Control(1)= "Label3(4)"
Tab(1).Control(2)= "Label3(5)"
Tab(1).Control(3)= "Line1(3)"
Tab(1).Control(4)= "SetTimeValveName(6)"
Tab(1).Control(5)= "CloseTime(9)"
Tab(1).Control(6)= "CloseTime(8)"
Tab(1).Control(7)= "CloseTime(7)"
Tab(1).Control(8)= "CloseTime(6)"
Tab(1).Control(9)= "OpenTime(9)"
Tab(1).Control(10)= "OpenTime(8)"
Tab(1).Control(11)= "OpenTime(7)"
Tab(1).Control(12)= "OpenTime(6)"
Tab(1).Control(13)= "SetTimeValveName(7)"
Tab(1).Control(14)= "SetTimeValveName(8)"
Tab(1).Control(15)= "SetTimeValveName(9)"
Tab(1).ControlCount= 16
Begin MSComCtl2.DTPicker CloseTime
Height = 285
Index = 0
Left = 2340
TabIndex = 49
Top = 855
Width = 1140
_ExtentX = 2011
_ExtentY = 503
_Version = 393216
Format = 24772610
CurrentDate = 37053
End
Begin MSComCtl2.DTPicker OpenTime
Height = 285
Index = 0
Left = 1080
TabIndex = 43
Top = 855
Width = 1140
_ExtentX = 2011
_ExtentY = 503
_Version = 393216
Format = 24772610
CurrentDate = 37053
End
Begin MSComCtl2.DTPicker OpenTime
Height = 285
Index = 1
Left = 1080
TabIndex = 44
Top = 1305
Width = 1140
_ExtentX = 2011
_ExtentY = 503
_Version = 393216
Format = 24772610
CurrentDate = 37053
End
Begin MSComCtl2.DTPicker OpenTime
Height = 285
Index = 2
Left = 1080
TabIndex = 45
Top = 1800
Width = 1140
_ExtentX = 2011
_ExtentY = 503
_Version = 393216
Format = 24772610
CurrentDate = 37053
End
Begin MSComCtl2.DTPicker OpenTime
Height = 285
Index = 5
Left = 1080
TabIndex = 48
Top = 3285
Width = 1140
_ExtentX = 2011
_ExtentY = 503
_Version = 393216
Format = 24772610
CurrentDate = 37053
End
Begin MSComCtl2.DTPicker OpenTime
Height = 285
Index = 4
Left = 1080
TabIndex = 47
Top = 2790
Width = 1140
_ExtentX = 2011
_ExtentY = 503
_Version = 393216
Format = 24772610
CurrentDate = 37053
End
Begin VB.CheckBox SetTimeValveName
Caption = "10号阀"
Height = 420
Index = 9
Left = -74820
TabIndex = 42
Top = 2385
Width = 870
End
Begin VB.CheckBox SetTimeValveName
Caption = "9号阀"
Height = 420
Index = 8
Left = -74820
TabIndex = 41
Top = 1890
Width = 870
End
Begin VB.CheckBox SetTimeValveName
Caption = "8号阀"
Height = 420
Index = 7
Left = -74820
TabIndex = 40
Top = 1440
Width = 870
End
Begin VB.CheckBox SetTimeValveName
Caption = "6号阀"
Height = 420
Index = 5
Left = 180
TabIndex = 38
Top = 3195
Width = 870
End
Begin VB.CheckBox SetTimeValveName
Caption = "5号阀"
Height = 420
Index = 4
Left = 180
TabIndex = 37
Top = 2745
Width = 825
End
Begin VB.CheckBox SetTimeValveName
Caption = "4号阀"
Height = 420
Index = 3
Left = 180
TabIndex = 36
Top = 2250
Width = 780
End
Begin VB.CheckBox SetTimeValveName
Caption = "3号阀"
Height = 375
Index = 2
Left = 180
TabIndex = 35
Top = 1755
Width = 780
End
Begin VB.CheckBox SetTimeValveName
Caption = "2号阀"
Height = 330
Index = 1
Left = 180
TabIndex = 34
Top = 1305
Width = 780
End
Begin VB.CheckBox SetTimeValveName
Caption = "1号阀"
Height = 420
Index = 0
Left = 180
TabIndex = 33
Top = 810
Width = 915
End
Begin MSComCtl2.DTPicker OpenTime
Height = 285
Index = 3
Left = 1080
TabIndex = 46
Top = 2295
Width = 1140
_ExtentX = 2011
_ExtentY = 503
_Version = 393216
Format = 24772610
CurrentDate = 37053
End
Begin MSComCtl2.DTPicker CloseTime
Height = 285
Index = 1
Left = 2340
TabIndex = 50
Top = 1305
Width = 1140
_ExtentX = 2011
_ExtentY = 503
_Version = 393216
Format = 24772610
CurrentDate = 37053
End
Begin MSComCtl2.DTPicker CloseTime
Height = 285
Index = 2
Left = 2340
TabIndex = 51
Top = 1800
Width = 1140
_ExtentX = 2011
_ExtentY = 503
_Version = 393216
Format = 24772610
CurrentDate = 37053
End
Begin MSComCtl2.DTPicker CloseTime
Height = 285
Index = 3
Left = 2340
TabIndex = 52
Top = 2295
Width = 1140
_ExtentX = 2011
_ExtentY = 503
_Version = 393216
Format = 24772610
CurrentDate = 37053
End
Begin MSComCtl2.DTPicker CloseTime
Height = 285
Index = 4
Left = 2340
TabIndex = 53
Top = 2790
Width = 1140
_ExtentX = 2011
_ExtentY = 503
_Version = 393216
Format = 24772610
CurrentDate = 37053
End
Begin MSComCtl2.DTPicker CloseTime
Height = 285
Index = 5
Left = 2340
TabIndex = 54
Top = 3285
Width = 1140
_ExtentX = 2011
_ExtentY = 503
_Version = 393216
Format = 24772610
CurrentDate = 37053
End
Begin MSComCtl2.DTPicker OpenTime
Height = 285
Index = 6
Left = -73920
TabIndex = 55
Top = 1035
Width = 1140
_ExtentX = 2011
_ExtentY = 503
_Version = 393216
Format = 24772610
CurrentDate = 37053
End
Begin MSComCtl2.DTPicker OpenTime
Height = 285
Index = 7
Left = -73920
TabIndex = 56
Top = 1485
Width = 1140
_ExtentX = 2011
_ExtentY = 503
_Version = 393216
Format = 24772610
CurrentDate = 37053
End
Begin MSComCtl2.DTPicker OpenTime
Height = 285
Index = 8
Left = -73920
TabIndex = 57
Top = 1980
Width = 1140
_ExtentX = 2011
_ExtentY = 503
_Version = 393216
Format = 24772610
CurrentDate = 37053
End
Begin MSComCtl2.DTPicker OpenTime
Height = 285
Index = 9
Left = -73920
TabIndex = 58
Top = 2475
Width = 1140
_ExtentX = 2011
_ExtentY = 503
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -