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

📄 frmdataadm_bkup.frm

📁 采用面向负荷控制技术
💻 FRM
📖 第 1 页 / 共 5 页
字号:
VERSION 5.00
Object = "{BDC217C8-ED16-11CD-956C-0000C04E4C0A}#1.1#0"; "TABCTL32.OCX"
Object = "{CDE57A40-8B86-11D0-B3C6-00A0C90AEA82}#1.0#0"; "MSDATGRD.OCX"
Begin VB.Form frmDataAdm 
   Caption         =   "数据维护"
   ClientHeight    =   6960
   ClientLeft      =   60
   ClientTop       =   345
   ClientWidth     =   11700
   MDIChild        =   -1  'True
   ScaleHeight     =   6960
   ScaleWidth      =   11700
   Begin VB.CommandButton cmd_add 
      Caption         =   "增加"
      Height          =   495
      Left            =   3600
      TabIndex        =   9
      Top             =   6360
      Width           =   975
   End
   Begin VB.CommandButton cmd_cancel 
      Caption         =   "取消"
      Height          =   495
      Left            =   7740
      TabIndex        =   8
      Top             =   6360
      Width           =   975
   End
   Begin VB.CommandButton cmd_ok 
      Caption         =   "确认"
      Height          =   495
      Left            =   6375
      TabIndex        =   7
      Top             =   6375
      Width           =   975
   End
   Begin VB.CommandButton cmd_del 
      Caption         =   "删除"
      Height          =   495
      Left            =   4980
      TabIndex        =   6
      Top             =   6360
      Width           =   975
   End
   Begin TabDlg.SSTab SSTab1 
      Height          =   5685
      Left            =   0
      TabIndex        =   5
      Top             =   0
      Width           =   11400
      _ExtentX        =   20108
      _ExtentY        =   10028
      _Version        =   393216
      Tabs            =   6
      Tab             =   4
      TabsPerRow      =   6
      TabHeight       =   520
      BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
         Name            =   "宋体"
         Size            =   11.25
         Charset         =   134
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      TabCaption(0)   =   "设备类别"
      TabPicture(0)   =   "frmdataadm_bkup.frx":0000
      Tab(0).ControlEnabled=   0   'False
      Tab(0).Control(0)=   "dgd_deviceclass"
      Tab(0).Control(1)=   "Frame1"
      Tab(0).ControlCount=   2
      TabCaption(1)   =   "设备"
      TabPicture(1)   =   "frmdataadm_bkup.frx":001C
      Tab(1).ControlEnabled=   0   'False
      Tab(1).Control(0)=   "Frame3"
      Tab(1).Control(1)=   "dgd_device"
      Tab(1).ControlCount=   2
      TabCaption(2)   =   "工艺"
      TabPicture(2)   =   "frmdataadm_bkup.frx":0038
      Tab(2).ControlEnabled=   0   'False
      Tab(2).Control(0)=   "pro_txt(4)"
      Tab(2).Control(1)=   "dgd_process"
      Tab(2).Control(2)=   "Frame4"
      Tab(2).ControlCount=   3
      TabCaption(3)   =   "产品"
      TabPicture(3)   =   "frmdataadm_bkup.frx":0054
      Tab(3).ControlEnabled=   0   'False
      Tab(3).Control(0)=   "Frame2"
      Tab(3).Control(1)=   "dgd_bom"
      Tab(3).ControlCount=   2
      TabCaption(4)   =   "操作员"
      TabPicture(4)   =   "frmdataadm_bkup.frx":0070
      Tab(4).ControlEnabled=   -1  'True
      Tab(4).Control(0)=   "dgd_opr"
      Tab(4).Control(0).Enabled=   0   'False
      Tab(4).Control(1)=   "Frame5"
      Tab(4).Control(1).Enabled=   0   'False
      Tab(4).ControlCount=   2
      TabCaption(5)   =   "订单"
      TabPicture(5)   =   "frmdataadm_bkup.frx":008C
      Tab(5).ControlEnabled=   0   'False
      Tab(5).ControlCount=   0
      Begin VB.Frame Frame5 
         Height          =   4455
         Left            =   240
         TabIndex        =   68
         Top             =   600
         Width           =   6615
         Begin VB.TextBox txt_name 
            BeginProperty Font 
               Name            =   "宋体"
               Size            =   10.5
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            Height          =   375
            Left            =   1680
            TabIndex        =   76
            Top             =   720
            Width           =   1575
         End
         Begin VB.TextBox txt_pass2 
            BeginProperty Font 
               Name            =   "宋体"
               Size            =   10.5
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            Height          =   375
            IMEMode         =   3  'DISABLE
            Left            =   1680
            PasswordChar    =   "*"
            TabIndex        =   75
            Top             =   1800
            Width           =   1575
         End
         Begin VB.ComboBox cmb_group 
            BeginProperty Font 
               Name            =   "宋体"
               Size            =   10.5
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            Height          =   330
            Left            =   1680
            TabIndex        =   74
            Top             =   2640
            Width           =   1575
         End
         Begin VB.Frame Frame6 
            Height          =   2055
            Left            =   4440
            TabIndex        =   70
            Top             =   480
            Width           =   2055
            Begin VB.OptionButton optSys 
               Caption         =   "管理员"
               Height          =   255
               Left            =   240
               TabIndex        =   73
               Top             =   360
               Width           =   1455
            End
            Begin VB.OptionButton optTra 
               Caption         =   "调度员"
               Height          =   375
               Left            =   240
               TabIndex        =   72
               Top             =   720
               Width           =   975
            End
            Begin VB.OptionButton optOpr 
               Caption         =   "班组长"
               Height          =   495
               Left            =   240
               TabIndex        =   71
               Top             =   1080
               Width           =   975
            End
         End
         Begin VB.TextBox txt_pass 
            BeginProperty Font 
               Name            =   "宋体"
               Size            =   10.5
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            Height          =   315
            IMEMode         =   3  'DISABLE
            Left            =   1680
            PasswordChar    =   "*"
            TabIndex        =   69
            Top             =   1200
            Width           =   1575
         End
         Begin VB.Label Label5 
            AutoSize        =   -1  'True
            Caption         =   "姓   名"
            BeginProperty Font 
               Name            =   "宋体"
               Size            =   10.5
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            Height          =   210
            Left            =   240
            TabIndex        =   81
            Top             =   720
            Width           =   735
         End
         Begin VB.Label Label7 
            AutoSize        =   -1  'True
            Caption         =   "密码确认"
            BeginProperty Font 
               Name            =   "宋体"
               Size            =   10.5
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            Height          =   210
            Left            =   240
            TabIndex        =   80
            Top             =   1920
            Width           =   840
         End
         Begin VB.Label Label8 
            AutoSize        =   -1  'True
            Caption         =   "密   码"
            BeginProperty Font 
               Name            =   "宋体"
               Size            =   10.5
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            Height          =   210
            Left            =   240
            TabIndex        =   79
            Top             =   1200
            Width           =   735
         End
         Begin VB.Label Label9 
            AutoSize        =   -1  'True
            Caption         =   "部   门"
            BeginProperty Font 
               Name            =   "宋体"
               Size            =   10.5
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            Height          =   210
            Left            =   240
            TabIndex        =   78
            Top             =   2640
            Width           =   735
         End
         Begin VB.Label Label10 
            AutoSize        =   -1  'True
            Caption         =   "权   限"
            BeginProperty Font 
               Name            =   "宋体"
               Size            =   10.5
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            Height          =   210
            Left            =   3360
            TabIndex        =   77
            Top             =   720
            Width           =   735
         End
      End
      Begin VB.Frame Frame4 
         Height          =   1815
         Left            =   -74925
         TabIndex        =   46
         Top             =   450
         Width           =   11115
         Begin VB.TextBox pro_txt 
            Height          =   390
            Index           =   0
            Left            =   1575
            TabIndex        =   56
            Top             =   225
            Width           =   1215
         End
         Begin VB.ComboBox cbo_dno 
            Height          =   300
            Left            =   6120
            TabIndex        =   55
            Top             =   300
            Width           =   1335
         End
         Begin VB.TextBox pro_txt 
            Alignment       =   1  'Right Justify
            Height          =   390
            Index           =   1
            Left            =   1575
            TabIndex        =   54
            Top             =   750
            Width           =   1215
         End
         Begin VB.TextBox pro_txt 
            Height          =   390
            Index           =   5
            Left            =   9225
            TabIndex        =   53
            Top             =   195
            Width           =   1215
         End
         Begin VB.TextBox pro_txt 
            Height          =   390
            Index           =   7
            Left            =   1575
            TabIndex        =   52
            Top             =   1350
            Width           =   1215
         End
         Begin VB.TextBox pro_txt 
            Height          =   390
            Index           =   8
            Left            =   3900
            TabIndex        =   51
            Top             =   1275
            Width           =   1215
         End
         Begin VB.TextBox pro_txt 
            Height          =   390
            Index           =   2
            Left            =   3900
            TabIndex        =   50
            Top             =   225
            Width           =   1215
         End
         Begin VB.TextBox pro_txt 
            Height          =   390
            Index           =   6
            Left            =   9225
            TabIndex        =   49
            Top             =   825
            Width           =   1215
         End
         Begin VB.ComboBox cbo_dname 
            Height          =   300
            Left            =   6030
            TabIndex        =   48

⌨️ 快捷键说明

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