📄 dlgss7etesttype.frm
字号:
VERSION 5.00
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCTL.OCX"
Object = "{BDC217C8-ED16-11CD-956C-0000C04E4C0A}#1.1#0"; "TABCTL32.OCX"
Begin VB.Form dlgSS7ETesttype
BorderStyle = 4 'Fixed ToolWindow
Caption = "SS7E试验类型"
ClientHeight = 15000
ClientLeft = 240
ClientTop = 315
ClientWidth = 19080
LinkTopic = "Form1"
MaxButton = 0 'False
MinButton = 0 'False
Moveable = 0 'False
ScaleHeight = 15000
ScaleWidth = 19080
ShowInTaskbar = 0 'False
StartUpPosition = 2 'CenterScreen
Begin VB.Frame Frame13
Caption = "提示信息:"
Height = 2295
Left = 14280
TabIndex = 113
Top = 3840
Width = 3855
Begin VB.TextBox Text6
Height = 1935
Left = 120
Locked = -1 'True
MultiLine = -1 'True
ScrollBars = 2 'Vertical
TabIndex = 114
Top = 240
Width = 3615
End
End
Begin VB.Frame Frame2
Caption = "Frame2"
Height = 2535
Left = 600
TabIndex = 109
Top = 5400
Width = 4335
Begin MSComctlLib.ProgressBar ProgressBar1
Height = 1455
Left = 480
TabIndex = 110
Top = 360
Width = 375
_ExtentX = 661
_ExtentY = 2566
_Version = 393216
Appearance = 1
Orientation = 1
End
Begin MSComctlLib.ProgressBar ProgressBar2
Height = 1455
Left = 1080
TabIndex = 111
Top = 360
Width = 375
_ExtentX = 661
_ExtentY = 2566
_Version = 393216
Appearance = 1
Orientation = 1
End
Begin MSComctlLib.ProgressBar ProgressBar3
Height = 1455
Left = 1680
TabIndex = 112
Top = 360
Width = 375
_ExtentX = 661
_ExtentY = 2566
_Version = 393216
Appearance = 1
Orientation = 1
End
End
Begin VB.CommandButton Command17
Caption = "试验组别选择"
Enabled = 0 'False
Height = 495
Left = 7920
TabIndex = 66
Top = 5520
Visible = 0 'False
Width = 1215
End
Begin VB.CommandButton Command16
Caption = "试验项目完成"
Enabled = 0 'False
Height = 495
Left = 12240
TabIndex = 65
Top = 6120
Width = 1215
End
Begin VB.CommandButton Command15
Caption = "填写试验结果"
Enabled = 0 'False
Height = 495
Left = 12240
TabIndex = 64
Top = 5520
Visible = 0 'False
Width = 1215
End
Begin VB.CommandButton Command11
Caption = "降压"
Enabled = 0 'False
Height = 495
Left = 10800
TabIndex = 63
Top = 6120
Width = 1215
End
Begin VB.CommandButton Command12
Caption = "升压"
Enabled = 0 'False
Height = 495
Left = 10800
TabIndex = 62
Top = 5520
Width = 1215
End
Begin VB.CommandButton Command13
Caption = "继电器断开"
Enabled = 0 'False
Height = 495
Left = 9360
TabIndex = 61
Top = 6120
Width = 1215
End
Begin VB.CommandButton Command14
Caption = "继电器闭合"
Enabled = 0 'False
Height = 495
Left = 9360
TabIndex = 60
Top = 5520
Width = 1215
End
Begin VB.Frame Frame8
Caption = "正在保存文件.............."
Height = 615
Left = 6240
TabIndex = 58
Top = 7080
Visible = 0 'False
Width = 3615
Begin MSComctlLib.ProgressBar ProgressBar4
Height = 255
Left = 0
TabIndex = 59
Top = 240
Visible = 0 'False
Width = 3615
_ExtentX = 6376
_ExtentY = 450
_Version = 393216
Appearance = 1
End
End
Begin TabDlg.SSTab SSTab1
Height = 14415
Left = 0
TabIndex = 2
Top = 0
Width = 19125
_ExtentX = 33734
_ExtentY = 25426
_Version = 393216
Tabs = 5
Tab = 3
TabsPerRow = 5
TabHeight = 520
TabCaption(0) = "主变压器试验"
TabPicture(0) = "dlgSS7ETesttype.frx":0000
Tab(0).ControlEnabled= 0 'False
Tab(0).Control(0)= "Image1(0)"
Tab(0).Control(1)= "Command2"
Tab(0).Control(2)= "Command1"
Tab(0).Control(3)= "Frame3"
Tab(0).Control(4)= "Frame1"
Tab(0).ControlCount= 5
TabCaption(1) = "平波电抗器试验"
TabPicture(1) = "dlgSS7ETesttype.frx":001C
Tab(1).ControlEnabled= 0 'False
Tab(1).Control(0)= "Frame5"
Tab(1).Control(1)= "Command4"
Tab(1).Control(2)= "Command3"
Tab(1).Control(3)= "Frame4"
Tab(1).Control(4)= "Image1(1)"
Tab(1).ControlCount= 5
TabCaption(2) = "供电电抗器试验"
TabPicture(2) = "dlgSS7ETesttype.frx":0038
Tab(2).ControlEnabled= 0 'False
Tab(2).Control(0)= "Frame7"
Tab(2).Control(1)= "Frame6"
Tab(2).Control(2)= "Command6"
Tab(2).Control(3)= "Command5"
Tab(2).Control(4)= "Image1(2)"
Tab(2).ControlCount= 5
TabCaption(3) = "辅助电抗器试验"
TabPicture(3) = "dlgSS7ETesttype.frx":0054
Tab(3).ControlEnabled= -1 'True
Tab(3).Control(0)= "Image1(3)"
Tab(3).Control(0).Enabled= 0 'False
Tab(3).Control(1)= "Command8"
Tab(3).Control(1).Enabled= 0 'False
Tab(3).Control(2)= "Command7"
Tab(3).Control(2).Enabled= 0 'False
Tab(3).Control(3)= "Frame9"
Tab(3).Control(3).Enabled= 0 'False
Tab(3).Control(4)= "Frame10"
Tab(3).Control(4).Enabled= 0 'False
Tab(3).ControlCount= 5
TabCaption(4) = "高压电流互感器试验"
TabPicture(4) = "dlgSS7ETesttype.frx":0070
Tab(4).ControlEnabled= 0 'False
Tab(4).Control(0)= "Image1(4)"
Tab(4).Control(1)= "Command10"
Tab(4).Control(2)= "Command9"
Tab(4).Control(3)= "Frame11"
Tab(4).Control(4)= "Frame12"
Tab(4).ControlCount= 5
Begin VB.Frame Frame12
Caption = "试验项目"
Height = 2655
Left = -69240
TabIndex = 103
Top = 960
Width = 6975
Begin VB.OptionButton Option1
Caption = "线圈极性检查"
Height = 495
Index = 27
Left = 600
TabIndex = 108
Top = 720
Width = 1455
End
Begin VB.OptionButton Option1
Caption = "误差试验"
Height = 495
Index = 28
Left = 2760
TabIndex = 107
Top = 720
Width = 1215
End
Begin VB.OptionButton Option1
Caption = "10%倍数下误差试验"
Height = 495
Index = 29
Left = 4800
TabIndex = 106
Top = 720
Width = 1935
End
Begin VB.OptionButton Option1
Caption = "绝缘电阻值测定"
Height = 495
Index = 30
Left = 600
TabIndex = 105
Top = 1560
Width = 1695
End
Begin VB.OptionButton Option1
Caption = "外施工频耐压试验"
Height = 495
Index = 31
Left = 2760
TabIndex = 104
Top = 1560
Width = 1815
End
End
Begin VB.Frame Frame10
Caption = "试验项目"
Height = 2415
Left = 6240
TabIndex = 97
Top = 1080
Width = 6135
Begin VB.OptionButton Option1
Caption = "外观检查"
Height = 495
Index = 22
Left = 240
TabIndex = 102
Top = 360
Width = 1215
End
Begin VB.OptionButton Option1
Caption = "绕组直流电阻测定"
Height = 495
Index = 23
Left = 2040
TabIndex = 101
Top = 360
Width = 1815
End
Begin VB.OptionButton Option1
Caption = "绝缘电阻值测定"
Height = 495
Index = 24
Left = 4200
TabIndex = 100
Top = 360
Width = 1575
End
Begin VB.OptionButton Option1
Caption = "交流电感的测量"
Height = 495
Index = 25
Left = 240
TabIndex = 99
Top = 1560
Width = 1575
End
Begin VB.OptionButton Option1
Caption = "试验外施工频耐压"
Height = 495
Index = 26
Left = 2040
TabIndex = 98
Top = 1560
Width = 1815
End
End
Begin VB.Frame Frame7
Caption = "试验项目"
Height = 2655
Left = -68760
TabIndex = 91
Top = 1080
Width = 6375
Begin VB.OptionButton Option1
Caption = "外施工频耐压试验"
Height = 495
Index = 21
Left = 2280
TabIndex = 96
Top = 1560
Width = 1815
End
Begin VB.OptionButton Option1
Caption = "测量交流电感的"
Height = 495
Index = 20
Left = 360
TabIndex = 95
Top = 1560
Width = 1695
End
Begin VB.OptionButton Option1
Caption = "绝缘电阻值测定"
Height = 495
Index = 19
Left = 4440
TabIndex = 94
Top = 720
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -