📄 dlg200kmtesttype.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 dlg200KmTesttype
BorderStyle = 4 'Fixed ToolWindow
Caption = "200Km/h交流传动车试验类型"
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 = 93
Top = 3960
Width = 3855
Begin VB.TextBox Text6
Height = 1935
Left = 120
Locked = -1 'True
MultiLine = -1 'True
ScrollBars = 2 'Vertical
TabIndex = 94
Top = 240
Width = 3615
End
End
Begin VB.CommandButton Command1
Caption = "保存试验数据"
Height = 495
Left = 6360
TabIndex = 92
Top = 6120
Width = 1455
End
Begin VB.Frame Frame2
Caption = "Frame2"
Height = 2535
Left = 720
TabIndex = 88
Top = 5640
Width = 4335
Begin MSComctlLib.ProgressBar ProgressBar1
Height = 1455
Left = 480
TabIndex = 89
Top = 360
Width = 375
_ExtentX = 661
_ExtentY = 2566
_Version = 393216
Appearance = 1
Orientation = 1
End
Begin MSComctlLib.ProgressBar ProgressBar2
Height = 1455
Left = 1080
TabIndex = 90
Top = 360
Width = 375
_ExtentX = 661
_ExtentY = 2566
_Version = 393216
Appearance = 1
Orientation = 1
End
Begin MSComctlLib.ProgressBar ProgressBar3
Height = 1455
Left = 1680
TabIndex = 91
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 = 8040
TabIndex = 69
Top = 5520
Visible = 0 'False
Width = 1215
End
Begin VB.CommandButton Command16
Caption = "试验项目完成"
Enabled = 0 'False
Height = 495
Left = 12360
TabIndex = 68
Top = 6120
Width = 1215
End
Begin VB.CommandButton Command15
Caption = "填写试验结果"
Enabled = 0 'False
Height = 495
Left = 12360
TabIndex = 67
Top = 5520
Visible = 0 'False
Width = 1215
End
Begin VB.CommandButton Command11
Caption = "降压"
Enabled = 0 'False
Height = 495
Left = 10920
TabIndex = 66
Top = 6120
Width = 1215
End
Begin VB.CommandButton Command12
Caption = "升压"
Enabled = 0 'False
Height = 495
Left = 10920
TabIndex = 65
Top = 5520
Width = 1215
End
Begin VB.CommandButton Command13
Caption = "继电器断开"
Enabled = 0 'False
Height = 495
Left = 9480
TabIndex = 64
Top = 6120
Width = 1215
End
Begin VB.CommandButton Command14
Caption = "继电器闭合"
Enabled = 0 'False
Height = 495
Left = 9480
TabIndex = 63
Top = 5520
Width = 1215
End
Begin VB.Frame Frame8
Caption = "正在保存文件.............."
Height = 615
Left = 6360
TabIndex = 61
Top = 6720
Visible = 0 'False
Width = 3615
Begin MSComctlLib.ProgressBar ProgressBar4
Height = 255
Left = 0
TabIndex = 62
Top = 240
Visible = 0 'False
Width = 3615
_ExtentX = 6376
_ExtentY = 450
_Version = 393216
Appearance = 1
End
End
Begin TabDlg.SSTab SSTab1
Height = 14295
Left = 0
TabIndex = 2
Top = 0
Width = 19125
_ExtentX = 33734
_ExtentY = 25215
_Version = 393216
Tabs = 4
Tab = 2
TabsPerRow = 4
TabHeight = 520
TabCaption(0) = "主变压器试验"
TabPicture(0) = "dlg200KmTesttype.frx":0000
Tab(0).ControlEnabled= 0 'False
Tab(0).Control(0)= "Image1(0)"
Tab(0).Control(1)= "Command2"
Tab(0).Control(2)= "Frame3"
Tab(0).Control(3)= "Frame1"
Tab(0).ControlCount= 4
TabCaption(1) = "二次吸收电抗器试验"
TabPicture(1) = "dlg200KmTesttype.frx":001C
Tab(1).ControlEnabled= 0 'False
Tab(1).Control(0)= "Image1(1)"
Tab(1).Control(1)= "Frame4"
Tab(1).Control(2)= "Frame5"
Tab(1).Control(3)= "Command3"
Tab(1).ControlCount= 4
TabCaption(2) = "供电电抗器试验"
TabPicture(2) = "dlg200KmTesttype.frx":0038
Tab(2).ControlEnabled= -1 'True
Tab(2).Control(0)= "Image1(2)"
Tab(2).Control(0).Enabled= 0 'False
Tab(2).Control(1)= "Command5"
Tab(2).Control(1).Enabled= 0 'False
Tab(2).Control(2)= "Frame7"
Tab(2).Control(2).Enabled= 0 'False
Tab(2).Control(3)= "Frame6"
Tab(2).Control(3).Enabled= 0 'False
Tab(2).ControlCount= 4
TabCaption(3) = "辅助变流电抗器试验"
TabPicture(3) = "dlg200KmTesttype.frx":0054
Tab(3).ControlEnabled= 0 'False
Tab(3).Control(0)= "Image1(3)"
Tab(3).Control(1)= "Command7"
Tab(3).Control(2)= "Frame10"
Tab(3).Control(3)= "Frame9"
Tab(3).ControlCount= 4
Begin VB.Frame Frame1
Caption = "试验项目"
Enabled = 0 'False
Height = 4335
Left = -69000
TabIndex = 74
Top = 840
Width = 7095
Begin VB.OptionButton Option1
Caption = "负载试验"
Height = 495
Index = 12
Left = 360
TabIndex = 87
Top = 3720
Width = 1215
End
Begin VB.OptionButton Option1
Caption = "冷却系统试验"
Height = 495
Index = 11
Left = 5280
TabIndex = 86
Top = 2880
Width = 1455
End
Begin VB.OptionButton Option1
Caption = "变压器油理化试验"
Height = 495
Index = 10
Left = 2760
TabIndex = 85
Top = 2880
Width = 1815
End
Begin VB.OptionButton Option1
Caption = "空载试验"
Height = 495
Index = 9
Left = 360
TabIndex = 84
Top = 2880
Width = 1215
End
Begin VB.OptionButton Option1
Caption = "感应耐压试验"
Height = 495
Index = 8
Left = 5280
TabIndex = 83
Top = 2040
Width = 1455
End
Begin VB.OptionButton Option1
Caption = "外施工频耐压试验"
Height = 495
Index = 7
Left = 2760
Picture = "dlg200KmTesttype.frx":0070
TabIndex = 82
Top = 2040
Width = 1815
End
Begin VB.OptionButton Option1
Caption = "变压器油电气强度试验"
Height = 495
Index = 6
Left = 360
TabIndex = 81
Top = 2040
Width = 2175
End
Begin VB.OptionButton Option1
Caption = "绝缘电阻及吸收比试验"
Height = 495
Index = 5
Left = 5280
TabIndex = 80
Top = 1200
Width = 1695
End
Begin VB.OptionButton Option1
Caption = "绕组直流电组测定"
Height = 495
Index = 4
Left = 2760
TabIndex = 79
Top = 1200
Width = 1815
End
Begin VB.OptionButton Option1
Caption = "联结组标号试验"
Height = 495
Index = 3
Left = 360
TabIndex = 78
Top = 1200
Width = 1695
End
Begin VB.OptionButton Option1
Caption = "电压比试验"
Height = 495
Index = 2
Left = 5280
TabIndex = 77
Top = 360
Width = 1215
End
Begin VB.OptionButton Option1
Caption = "密封试验"
Height = 495
Index = 1
Left = 2760
TabIndex = 76
Top = 360
Width = 1215
End
Begin VB.OptionButton Option1
Caption = "外观检查"
Height = 495
Index = 0
Left = 360
TabIndex = 75
Top = 360
Width = 1215
End
End
Begin VB.Frame Frame9
Caption = "基本数据录入"
Height = 3495
Left = -74280
TabIndex = 49
Top = 1200
Width = 4575
Begin VB.CommandButton Command19
Caption = "..."
Height = 375
Left = 3960
TabIndex = 73
Top = 2760
Width = 375
End
Begin VB.TextBox Text4
Height = 495
Index = 0
Left = 2280
TabIndex = 53
Top = 480
Width = 1575
End
Begin VB.TextBox Text4
Height = 495
Index = 1
Left = 2280
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -