⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 dlgss6btesttype.frm

📁 电力机车牵引变压器试验站总控程序
💻 FRM
📖 第 1 页 / 共 4 页
字号:
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 dlgSS6BTesttype 
   BorderStyle     =   4  'Fixed ToolWindow
   Caption         =   "SS6B试验类型"
   ClientHeight    =   15000
   ClientLeft      =   45
   ClientTop       =   120
   ClientWidth     =   19095
   LinkTopic       =   "Form1"
   MaxButton       =   0   'False
   MinButton       =   0   'False
   Moveable        =   0   'False
   ScaleHeight     =   15000
   ScaleWidth      =   19095
   ShowInTaskbar   =   0   'False
   StartUpPosition =   2  'CenterScreen
   Begin VB.Frame Frame11 
      Caption         =   "提示信息:"
      Height          =   2295
      Left            =   14040
      TabIndex        =   83
      Top             =   4560
      Width           =   3855
      Begin VB.TextBox Text6 
         Height          =   1935
         Left            =   120
         Locked          =   -1  'True
         MultiLine       =   -1  'True
         TabIndex        =   84
         Top             =   240
         Width           =   3615
      End
   End
   Begin VB.Frame Frame2 
      Caption         =   "Frame2"
      Height          =   2535
      Left            =   720
      TabIndex        =   79
      Top             =   6000
      Width           =   4335
      Begin MSComctlLib.ProgressBar ProgressBar1 
         Height          =   1455
         Left            =   480
         TabIndex        =   80
         Top             =   360
         Width           =   375
         _ExtentX        =   661
         _ExtentY        =   2566
         _Version        =   393216
         Appearance      =   1
         Orientation     =   1
      End
      Begin MSComctlLib.ProgressBar ProgressBar2 
         Height          =   1455
         Left            =   1080
         TabIndex        =   81
         Top             =   360
         Width           =   375
         _ExtentX        =   661
         _ExtentY        =   2566
         _Version        =   393216
         Appearance      =   1
         Orientation     =   1
      End
      Begin MSComctlLib.ProgressBar ProgressBar3 
         Height          =   1455
         Left            =   1680
         TabIndex        =   82
         Top             =   360
         Width           =   375
         _ExtentX        =   661
         _ExtentY        =   2566
         _Version        =   393216
         Appearance      =   1
         Orientation     =   1
      End
   End
   Begin VB.CommandButton Command13 
      Caption         =   "试验组别选择"
      Enabled         =   0   'False
      Height          =   495
      Left            =   7920
      TabIndex        =   48
      Top             =   6000
      Visible         =   0   'False
      Width           =   1215
   End
   Begin VB.CommandButton Command10 
      Caption         =   "试验项目完成"
      Enabled         =   0   'False
      Height          =   495
      Left            =   10920
      TabIndex        =   47
      Top             =   7200
      Width           =   1215
   End
   Begin VB.CommandButton Command9 
      Caption         =   "填写试验结果"
      Enabled         =   0   'False
      Height          =   495
      Left            =   10920
      TabIndex        =   46
      Top             =   6600
      Visible         =   0   'False
      Width           =   1215
   End
   Begin VB.CommandButton Command8 
      Caption         =   "降压"
      Enabled         =   0   'False
      Height          =   495
      Left            =   9480
      TabIndex        =   45
      Top             =   7200
      Width           =   1215
   End
   Begin VB.CommandButton Command7 
      Caption         =   "升压"
      Enabled         =   0   'False
      Height          =   495
      Left            =   9480
      TabIndex        =   44
      Top             =   6600
      Width           =   1215
   End
   Begin VB.CommandButton Command11 
      Caption         =   "继电器断开"
      Enabled         =   0   'False
      Height          =   495
      Left            =   7920
      TabIndex        =   43
      Top             =   7200
      Width           =   1215
   End
   Begin VB.CommandButton Command12 
      Caption         =   "继电器闭合"
      Enabled         =   0   'False
      Height          =   495
      Left            =   7920
      TabIndex        =   42
      Top             =   6600
      Width           =   1215
   End
   Begin TabDlg.SSTab SSTab1 
      Height          =   14415
      Left            =   0
      TabIndex        =   2
      Top             =   0
      Width           =   19125
      _ExtentX        =   33734
      _ExtentY        =   25426
      _Version        =   393216
      Tab             =   1
      TabHeight       =   520
      TabCaption(0)   =   "主变压器试验"
      TabPicture(0)   =   "dlgSS6BTesttype.frx":0000
      Tab(0).ControlEnabled=   0   'False
      Tab(0).Control(0)=   "Frame1"
      Tab(0).Control(1)=   "Frame8"
      Tab(0).Control(2)=   "Command2"
      Tab(0).Control(3)=   "Command1"
      Tab(0).Control(4)=   "Frame3"
      Tab(0).Control(5)=   "Image1(0)"
      Tab(0).ControlCount=   6
      TabCaption(1)   =   "平波电抗器试验"
      TabPicture(1)   =   "dlgSS6BTesttype.frx":001C
      Tab(1).ControlEnabled=   -1  'True
      Tab(1).Control(0)=   "Image1(1)"
      Tab(1).Control(0).Enabled=   0   'False
      Tab(1).Control(1)=   "Frame4"
      Tab(1).Control(1).Enabled=   0   'False
      Tab(1).Control(2)=   "Command3"
      Tab(1).Control(2).Enabled=   0   'False
      Tab(1).Control(3)=   "Command4"
      Tab(1).Control(3).Enabled=   0   'False
      Tab(1).Control(4)=   "Frame9"
      Tab(1).Control(4).Enabled=   0   'False
      Tab(1).Control(5)=   "Frame5"
      Tab(1).Control(5).Enabled=   0   'False
      Tab(1).ControlCount=   6
      TabCaption(2)   =   "滤波电抗器试验"
      TabPicture(2)   =   "dlgSS6BTesttype.frx":0038
      Tab(2).ControlEnabled=   0   'False
      Tab(2).Control(0)=   "Frame7"
      Tab(2).Control(0).Enabled=   0   'False
      Tab(2).Control(1)=   "Frame10"
      Tab(2).Control(1).Enabled=   0   'False
      Tab(2).Control(2)=   "Command5"
      Tab(2).Control(2).Enabled=   0   'False
      Tab(2).Control(3)=   "Command6"
      Tab(2).Control(3).Enabled=   0   'False
      Tab(2).Control(4)=   "Frame6"
      Tab(2).Control(4).Enabled=   0   'False
      Tab(2).Control(5)=   "Image1(2)"
      Tab(2).Control(5).Enabled=   0   'False
      Tab(2).ControlCount=   6
      Begin VB.Frame Frame7 
         Caption         =   "试验项目"
         Height          =   3615
         Left            =   -68760
         TabIndex        =   73
         Top             =   1320
         Width           =   6495
         Begin VB.OptionButton Option1 
            Caption         =   "外观检查"
            Height          =   495
            Index           =   19
            Left            =   600
            TabIndex        =   78
            Top             =   960
            Width           =   1215
         End
         Begin VB.OptionButton Option1 
            Caption         =   "绕组直流电阻测定"
            Height          =   495
            Index           =   20
            Left            =   2520
            TabIndex        =   77
            Top             =   960
            Width           =   1815
         End
         Begin VB.OptionButton Option1 
            Caption         =   "绝缘电阻值测定"
            Height          =   495
            Index           =   21
            Left            =   4560
            TabIndex        =   76
            Top             =   960
            Width           =   1575
         End
         Begin VB.OptionButton Option1 
            Caption         =   "外施工频耐压试验"
            Height          =   495
            Index           =   22
            Left            =   600
            TabIndex        =   75
            Top             =   2040
            Width           =   1815
         End
         Begin VB.OptionButton Option1 
            Caption         =   "测量交流电感值"
            Height          =   495
            Index           =   23
            Left            =   2520
            TabIndex        =   74
            Top             =   2040
            Width           =   1695
         End
      End
      Begin VB.Frame Frame5 
         Caption         =   "试验项目"
         Height          =   2895
         Left            =   6240
         TabIndex        =   66
         Top             =   1080
         Width           =   6855
         Begin VB.OptionButton Option1 
            Caption         =   "外观检查"
            Height          =   495
            Index           =   13
            Left            =   600
            TabIndex        =   72
            Top             =   600
            Width           =   1215
         End
         Begin VB.OptionButton Option1 
            Caption         =   "绕组直流电阻测定"
            Height          =   495
            Index           =   14
            Left            =   2640
            TabIndex        =   71
            Top             =   600
            Width           =   1815
         End
         Begin VB.OptionButton Option1 
            Caption         =   "绝缘电阻值测定"
            Height          =   495
            Index           =   15
            Left            =   4920
            TabIndex        =   70
            Top             =   600
            Width           =   1575
         End
         Begin VB.OptionButton Option1 
            Caption         =   "外施工频耐压试验"
            Height          =   495
            Index           =   16
            Left            =   600
            TabIndex        =   69
            Top             =   1800
            Width           =   1815
         End
         Begin VB.OptionButton Option1 
            Caption         =   "交流电感值测定"
            Height          =   495
            Index           =   17
            Left            =   2640
            TabIndex        =   68
            Top             =   1800
            Width           =   1815
         End
         Begin VB.OptionButton Option1 
            Caption         =   "绕组极性测定"
            Height          =   495
            Index           =   18
            Left            =   4920
            TabIndex        =   67
            Top             =   1800
            Width           =   1575
         End
      End
      Begin VB.Frame Frame1 
         Caption         =   "试验项目"
         Enabled         =   0   'False
         Height          =   4335
         Left            =   -68880
         TabIndex        =   52
         Top             =   1080
         Width           =   7095
         Begin VB.OptionButton Option1 
            Caption         =   "负载试验"
            Height          =   495
            Index           =   12
            Left            =   360
            TabIndex        =   65
            Top             =   3720
            Width           =   1215
         End
         Begin VB.OptionButton Option1 
            Caption         =   "冷却系统试验"
            Height          =   495
            Index           =   11
            Left            =   5280
            TabIndex        =   64
            Top             =   2880
            Width           =   1455
         End
         Begin VB.OptionButton Option1 
            Caption         =   "变压器油理化试验"
            Height          =   495
            Index           =   10
            Left            =   2760
            TabIndex        =   63
            Top             =   2880
            Width           =   1815
         End
         Begin VB.OptionButton Option1 
            Caption         =   "空载试验"
            Height          =   495
            Index           =   9
            Left            =   360
            TabIndex        =   62
            Top             =   2880
            Width           =   1215
         End
         Begin VB.OptionButton Option1 
            Caption         =   "感应耐压试验"
            Height          =   495
            Index           =   8
            Left            =   5280
            TabIndex        =   61
            Top             =   2040
            Width           =   1455
         End
         Begin VB.OptionButton Option1 
            Caption         =   "外施工频耐压试验"
            Height          =   495
            Index           =   7
            Left            =   2760
            Picture         =   "dlgSS6BTesttype.frx":0054
            TabIndex        =   60
            Top             =   2040

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -