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

📄 frmmain.frm

📁 这是我们公司的题库管理系统,用VB实现,可以进行试题制作,编辑、试卷制作、试卷生成和试卷打印(A3/和A4)
💻 FRM
📖 第 1 页 / 共 2 页
字号:
VERSION 5.00
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCTL.OCX"
Object = "{F9043C88-F6F2-101A-A3C9-08002B2F49FB}#1.2#0"; "COMDLG32.OCX"
Begin VB.Form FrmMain 
   BorderStyle     =   3  'Fixed Dialog
   Caption         =   "题库管理系统"
   ClientHeight    =   8340
   ClientLeft      =   150
   ClientTop       =   435
   ClientWidth     =   11910
   LinkTopic       =   "Form1"
   MaxButton       =   0   'False
   MinButton       =   0   'False
   ScaleHeight     =   8340
   ScaleWidth      =   11910
   ShowInTaskbar   =   0   'False
   StartUpPosition =   2  '屏幕中心
   Begin MSComDlg.CommonDialog CDialog1 
      Left            =   600
      Top             =   2040
      _ExtentX        =   847
      _ExtentY        =   847
      _Version        =   393216
   End
   Begin VB.PictureBox Pic42 
      Height          =   375
      Left            =   480
      Picture         =   "FrmMain.frx":0000
      ScaleHeight     =   315
      ScaleWidth      =   315
      TabIndex        =   17
      Top             =   1200
      Visible         =   0   'False
      Width           =   375
   End
   Begin MSComctlLib.StatusBar StatusBar1 
      Align           =   2  'Align Bottom
      Height          =   375
      Left            =   0
      TabIndex        =   16
      Top             =   7965
      Width           =   11910
      _ExtentX        =   21008
      _ExtentY        =   661
      _Version        =   393216
      BeginProperty Panels {8E3867A5-8586-11D1-B16A-00C0F0283628} 
         NumPanels       =   5
         BeginProperty Panel1 {8E3867AB-8586-11D1-B16A-00C0F0283628} 
            AutoSize        =   2
            Bevel           =   2
            Text            =   "日期:"
            TextSave        =   "日期:"
            Object.ToolTipText     =   "当前时间"
         EndProperty
         BeginProperty Panel2 {8E3867AB-8586-11D1-B16A-00C0F0283628} 
            Style           =   6
            TextSave        =   "2004-4-11"
         EndProperty
         BeginProperty Panel3 {8E3867AB-8586-11D1-B16A-00C0F0283628} 
            Alignment       =   1
            Bevel           =   2
            Text            =   "时间:"
            TextSave        =   "时间:"
         EndProperty
         BeginProperty Panel4 {8E3867AB-8586-11D1-B16A-00C0F0283628} 
            Style           =   5
            Alignment       =   1
            AutoSize        =   1
            Bevel           =   2
            Object.Width           =   10689
            Text            =   "Email:ggggfnpl800306@sina.com"
            TextSave        =   "11:38"
            Key             =   "status_4"
         EndProperty
         BeginProperty Panel5 {8E3867AB-8586-11D1-B16A-00C0F0283628} 
         EndProperty
      EndProperty
   End
   Begin MSComctlLib.ImageList ImageList1 
      Left            =   240
      Top             =   2640
      _ExtentX        =   1005
      _ExtentY        =   1005
      BackColor       =   -2147483630
      ImageWidth      =   16
      ImageHeight     =   16
      MaskColor       =   255
      _Version        =   393216
      BeginProperty Images {2C247F25-8591-11D1-B16A-00C0F0283628} 
         NumListImages   =   16
         BeginProperty ListImage1 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "FrmMain.frx":061A
            Key             =   ""
         EndProperty
         BeginProperty ListImage2 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "FrmMain.frx":0B1C
            Key             =   ""
         EndProperty
         BeginProperty ListImage3 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "FrmMain.frx":1020
            Key             =   ""
         EndProperty
         BeginProperty ListImage4 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "FrmMain.frx":1524
            Key             =   ""
         EndProperty
         BeginProperty ListImage5 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "FrmMain.frx":1A28
            Key             =   ""
         EndProperty
         BeginProperty ListImage6 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "FrmMain.frx":1F2C
            Key             =   ""
         EndProperty
         BeginProperty ListImage7 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "FrmMain.frx":24BE
            Key             =   ""
         EndProperty
         BeginProperty ListImage8 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "FrmMain.frx":29FC
            Key             =   ""
         EndProperty
         BeginProperty ListImage9 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "FrmMain.frx":2EFE
            Key             =   ""
         EndProperty
         BeginProperty ListImage10 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "FrmMain.frx":3528
            Key             =   ""
         EndProperty
         BeginProperty ListImage11 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "FrmMain.frx":3B52
            Key             =   ""
         EndProperty
         BeginProperty ListImage12 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "FrmMain.frx":417C
            Key             =   ""
         EndProperty
         BeginProperty ListImage13 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "FrmMain.frx":470E
            Key             =   ""
         EndProperty
         BeginProperty ListImage14 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "FrmMain.frx":4D38
            Key             =   ""
         EndProperty
         BeginProperty ListImage15 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "FrmMain.frx":514A
            Key             =   ""
         EndProperty
         BeginProperty ListImage16 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "FrmMain.frx":564C
            Key             =   ""
         EndProperty
      EndProperty
   End
   Begin MSComctlLib.Toolbar Toolbar1 
      Align           =   1  'Align Top
      Height          =   615
      Left            =   0
      TabIndex        =   15
      Top             =   0
      Width           =   11910
      _ExtentX        =   21008
      _ExtentY        =   1085
      ButtonWidth     =   1455
      ButtonHeight    =   926
      Wrappable       =   0   'False
      Appearance      =   1
      ImageList       =   "ImageList1"
      _Version        =   393216
      BeginProperty Buttons {66833FE8-8583-11D1-B16A-00C0F0283628} 
         NumButtons      =   17
         BeginProperty Button1 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Caption         =   "修改用户"
            Key             =   "modipwd"
            Object.ToolTipText     =   "修改密码"
            ImageIndex      =   1
         EndProperty
         BeginProperty Button2 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Caption         =   "用户管理"
            Key             =   "add_user"
            Object.ToolTipText     =   "增加用户"
            ImageIndex      =   2
         EndProperty
         BeginProperty Button3 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Caption         =   "icut"
            Key             =   "icut"
            Style           =   3
         EndProperty
         BeginProperty Button4 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Caption         =   "数据备份"
            Key             =   "bar_backup"
            Object.ToolTipText     =   "对数据库进行备份"
            ImageIndex      =   4
         EndProperty
         BeginProperty Button5 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Caption         =   "数据恢复"
            Key             =   "bar_restore"
            Object.ToolTipText     =   "对数据库进行恢复"
            ImageIndex      =   5
         EndProperty
         BeginProperty Button6 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Caption         =   "sp2"
            Key             =   "bar_sp2"
            Style           =   3
         EndProperty
         BeginProperty Button7 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Caption         =   "自动生成"
            Key             =   "bar_auto"
            Object.ToolTipText     =   "自动生成试卷"
            ImageIndex      =   6
         EndProperty
         BeginProperty Button8 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Caption         =   "手动生成"
            Key             =   "bar_hand"
            Object.ToolTipText     =   "手动生成试卷"
            ImageIndex      =   7
         EndProperty
         BeginProperty Button9 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Caption         =   "试卷管理"
            Key             =   "bar_open"
            Object.ToolTipText     =   "打开已有试卷"
            ImageIndex      =   8
         EndProperty
         BeginProperty Button10 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Caption         =   "sp3"
            Key             =   "bar-sp3"
            ImageIndex      =   9
            Style           =   3
         EndProperty
         BeginProperty Button11 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Caption         =   "试题录入"
            Key             =   "bar_addtopic"
            Object.ToolTipText     =   "试题录入"
            ImageIndex      =   9
         EndProperty
         BeginProperty Button12 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Caption         =   "题型设置"
            Key             =   "bar_tixin_install"
            Object.ToolTipText     =   "题型设置"
            ImageIndex      =   11
         EndProperty
         BeginProperty Button13 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Caption         =   "sp4"
            Key             =   "bar-sp4"
            ImageIndex      =   12
            Style           =   3
         EndProperty
         BeginProperty Button14 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Caption         =   "管理科目"
            Key             =   "bar_choice_subject"
            Object.ToolTipText     =   "请选择科目"
            ImageIndex      =   12
         EndProperty
         BeginProperty Button15 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Caption         =   "章节管理"
            Key             =   "bar_choice_myself"
            Object.ToolTipText     =   "管理自己的课程"
            ImageIndex      =   13
         EndProperty
         BeginProperty Button16 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Caption         =   "sp5"
            Key             =   "bar-sp5"
            Style           =   3
         EndProperty
         BeginProperty Button17 {66833FEA-8583-11D1-B16A-00C0F0283628} 
            Caption         =   "如何使用"
            Key             =   "bar_help"
            Object.ToolTipText     =   "如何使用"
            ImageIndex      =   14
         EndProperty
      EndProperty
      BorderStyle     =   1
   End
   Begin VB.PictureBox Pic61 
      Height          =   375
      Left            =   1920
      Picture         =   "FrmMain.frx":5B4E
      ScaleHeight     =   315
      ScaleWidth      =   315
      TabIndex        =   14
      Top             =   4440
      Visible         =   0   'False
      Width           =   375
   End
   Begin VB.PictureBox Pic51 
      Height          =   375
      Left            =   1800
      Picture         =   "FrmMain.frx":6040
      ScaleHeight     =   315
      ScaleWidth      =   315
      TabIndex        =   13
      Top             =   3720
      Visible         =   0   'False
      Width           =   375
   End
   Begin VB.PictureBox Pic52 
      Height          =   495
      Left            =   240
      Picture         =   "FrmMain.frx":6442
      ScaleHeight     =   435
      ScaleWidth      =   435
      TabIndex        =   12
      Top             =   5280
      Visible         =   0   'False
      Width           =   495
   End
   Begin VB.PictureBox Pic41 
      Height          =   375
      Left            =   1800
      Picture         =   "FrmMain.frx":6934
      ScaleHeight     =   225
      ScaleMode       =   0  'User
      ScaleWidth      =   225
      TabIndex        =   11
      Top             =   3240
      Visible         =   0   'False
      Width           =   375
   End
   Begin VB.PictureBox Pic33 
      Height          =   375
      Left            =   840
      Picture         =   "FrmMain.frx":6EB6
      ScaleHeight     =   315
      ScaleWidth      =   435
      TabIndex        =   10
      Top             =   4080
      Visible         =   0   'False
      Width           =   495
   End
   Begin VB.PictureBox Pic32 
      Height          =   375
      Left            =   120
      Picture         =   "FrmMain.frx":74D0
      ScaleHeight     =   315
      ScaleWidth      =   435
      TabIndex        =   9
      Top             =   4080
      Visible         =   0   'False
      Width           =   495
   End
   Begin VB.PictureBox Pic31 
      Height          =   375
      Left            =   1800
      Picture         =   "FrmMain.frx":7AEA
      ScaleHeight     =   315
      ScaleWidth      =   315
      TabIndex        =   8
      Top             =   2400
      Visible         =   0   'False
      Width           =   375
   End
   Begin VB.PictureBox Pic_open 
      Height          =   375
      Left            =   840

⌨️ 快捷键说明

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