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

📄 frmmdi.frm

📁 本人用VB 6.0和ACCESS编写的图书管理系统
💻 FRM
📖 第 1 页 / 共 3 页
字号:
               Style           =   3
            EndProperty
            BeginProperty Button16 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Caption         =   "关于"
               Key             =   "About"
               ImageKey        =   "About"
            EndProperty
            BeginProperty Button17 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Style           =   3
            EndProperty
            BeginProperty Button18 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Caption         =   "注销"
               Key             =   "Logout"
               ImageKey        =   "Logout"
            EndProperty
            BeginProperty Button19 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Caption         =   "退出"
               Key             =   "Shutdown"
               ImageKey        =   "Shutdown"
            EndProperty
            BeginProperty Button20 {66833FEA-8583-11D1-B16A-00C0F0283628} 
               Style           =   3
            EndProperty
         EndProperty
         BorderStyle     =   1
      End
      Begin AgentObjectsCtl.Agent MsAgent 
         Left            =   14520
         Top             =   120
      End
   End
   Begin MSComctlLib.StatusBar StatusBar1 
      Align           =   2  'Align Bottom
      Height          =   390
      Left            =   0
      TabIndex        =   0
      Top             =   2700
      Width           =   4680
      _ExtentX        =   8255
      _ExtentY        =   688
      _Version        =   393216
      BeginProperty Panels {8E3867A5-8586-11D1-B16A-00C0F0283628} 
         NumPanels       =   9
         BeginProperty Panel1 {8E3867AB-8586-11D1-B16A-00C0F0283628} 
            Alignment       =   1
            AutoSize        =   2
            Bevel           =   0
            Picture         =   "frmMDI.frx":2CCE5D
            Key             =   "OperatorPersonName"
         EndProperty
         BeginProperty Panel2 {8E3867AB-8586-11D1-B16A-00C0F0283628} 
            Alignment       =   1
            AutoSize        =   2
            Bevel           =   0
            Key             =   "OperatorName"
         EndProperty
         BeginProperty Panel3 {8E3867AB-8586-11D1-B16A-00C0F0283628} 
            Alignment       =   2
            Bevel           =   0
            Picture         =   "frmMDI.frx":2D30F7
         EndProperty
         BeginProperty Panel4 {8E3867AB-8586-11D1-B16A-00C0F0283628} 
            Alignment       =   2
            AutoSize        =   2
            Bevel           =   0
            Object.Width           =   6879
            Picture         =   "frmMDI.frx":2D3549
            Text            =   "  北京电子科技学院——图书管理系统  "
            TextSave        =   "  北京电子科技学院——图书管理系统  "
            Key             =   "Explain"
         EndProperty
         BeginProperty Panel5 {8E3867AB-8586-11D1-B16A-00C0F0283628} 
            Style           =   2
            Alignment       =   1
            AutoSize        =   2
            Bevel           =   0
            TextSave        =   "NUM"
            Key             =   "Num"
         EndProperty
         BeginProperty Panel6 {8E3867AB-8586-11D1-B16A-00C0F0283628} 
            Style           =   1
            Alignment       =   1
            AutoSize        =   2
            Bevel           =   0
            Enabled         =   0   'False
            TextSave        =   "CAPS"
            Key             =   "Caps"
         EndProperty
         BeginProperty Panel7 {8E3867AB-8586-11D1-B16A-00C0F0283628} 
            Style           =   3
            Alignment       =   1
            AutoSize        =   2
            Bevel           =   0
            Enabled         =   0   'False
            TextSave        =   "Ins"
            Key             =   "Ins"
         EndProperty
         BeginProperty Panel8 {8E3867AB-8586-11D1-B16A-00C0F0283628} 
            Alignment       =   1
            AutoSize        =   1
            Bevel           =   0
            Key             =   "Date"
         EndProperty
         BeginProperty Panel9 {8E3867AB-8586-11D1-B16A-00C0F0283628} 
            Style           =   5
            Alignment       =   2
            AutoSize        =   1
            Bevel           =   0
            Picture         =   "frmMDI.frx":2D399B
            TextSave        =   "2:18"
            Key             =   "Time"
         EndProperty
      EndProperty
   End
   Begin VB.Menu mnuSystemManager 
      Caption         =   "系统管理(&S)"
      Begin VB.Menu mnuPersonnelManager 
         Caption         =   "人员管理(&M)"
      End
      Begin VB.Menu mnuChangePassword 
         Caption         =   "修改密码(&P)"
      End
      Begin VB.Menu mnuSystemSep1 
         Caption         =   "-"
      End
      Begin VB.Menu mnuParameterMaintenance 
         Caption         =   "参数维护(&R)"
      End
      Begin VB.Menu mnuSystemSep2 
         Caption         =   "-"
      End
      Begin VB.Menu mnuCalculator 
         Caption         =   "计算器(&C)"
         Shortcut        =   {F11}
      End
      Begin VB.Menu mnuNotepad 
         Caption         =   "记事本(&N)"
         Shortcut        =   {F12}
      End
      Begin VB.Menu mnuSystemSep3 
         Caption         =   "-"
      End
      Begin VB.Menu mnuLogOut 
         Caption         =   "注销(&O)"
      End
      Begin VB.Menu mnuExit 
         Caption         =   "退出(&X)"
         Shortcut        =   ^X
      End
   End
   Begin VB.Menu mnuBooksManager 
      Caption         =   "图书管理(&B)"
      Begin VB.Menu mnuNewBook 
         Caption         =   "新书入库(&N)"
         Shortcut        =   ^B
      End
      Begin VB.Menu mnuModifyBook 
         Caption         =   "图书资料修改(&M)"
      End
   End
   Begin VB.Menu mnuReaderManager 
      Caption         =   "读者管理(&R)"
      Begin VB.Menu mnuAddReader 
         Caption         =   "新增读者(&N)"
         Shortcut        =   ^R
      End
      Begin VB.Menu mnuModifyReader 
         Caption         =   "读者资料修改(&M)"
      End
      Begin VB.Menu mnuReaderSeparator 
         Caption         =   "-"
      End
      Begin VB.Menu mnuLibraryCardManager 
         Caption         =   "借书证管理(&L)"
      End
   End
   Begin VB.Menu mnuBorrowReturn 
      Caption         =   "借还书管理(&M)"
      Begin VB.Menu mnuBorrow 
         Caption         =   "借书作业(&B)"
      End
      Begin VB.Menu mnuReturn 
         Caption         =   "还书作业(&R)"
      End
   End
   Begin VB.Menu mnuQueryStatistics 
      Caption         =   "查询统计(&Q)"
      Begin VB.Menu mnuAssortBook 
         Caption         =   "图书分类查询(&A)"
         Shortcut        =   ^Q
      End
      Begin VB.Menu mnuQueryReader 
         Caption         =   "读者查询(&R)"
      End
      Begin VB.Menu mnuQueryCard 
         Caption         =   "借书证查询(&C)"
         Shortcut        =   ^L
      End
      Begin VB.Menu mnuQueryBook 
         Caption         =   "借还书情况查询(&B)"
      End
      Begin VB.Menu mnuQuerySep1 
         Caption         =   "-"
      End
      Begin VB.Menu mnuStatisticLend 
         Caption         =   "借出情况统计表(&L)"
         Shortcut        =   ^S
      End
      Begin VB.Menu mnuStatisticsMonthly 
         Caption         =   "按月统计表(&M)"
         Shortcut        =   ^M
      End
      Begin VB.Menu mnuStatOrder 
         Caption         =   "统计排名(&S)"
      End
   End
   Begin VB.Menu mnuPrintReport 
      Caption         =   "数据打印(&P)"
      Begin VB.Menu mnuPrintBook 
         Caption         =   "打印图书资料(&B)"
      End
      Begin VB.Menu mnuPrintReader 
         Caption         =   "打印读者资料(&R)"
      End
      Begin VB.Menu mnuPrintCard 
         Caption         =   "打印资料卡(&C)"
      End
      Begin VB.Menu mnuPrintSeparator 
         Caption         =   "-"
      End
      Begin VB.Menu mnuPrinterSetting 
         Caption         =   "打印机设置(&S)"
         Shortcut        =   ^{F2}
      End
   End
   Begin VB.Menu mnuWindow 
      Caption         =   "窗口(&W)"
      Begin VB.Menu mnuWindowTileHorizontal 
         Caption         =   "水平平铺(&H)"
      End
      Begin VB.Menu mnuWindowTileVertical 
         Caption         =   "垂直平铺(&V)"
      End
      Begin VB.Menu mnuWindowCascade 
         Caption         =   "层叠(&C)"
      End
      Begin VB.Menu mnuWindowArrange 
         Caption         =   "排列图标(&A)"
         Shortcut        =   ^A
      End
   End
   Begin VB.Menu mnuHelp 
      Caption         =   "帮助(&H)"
      Begin VB.Menu mnuContent 
         Caption         =   "内容(&C)"
         Enabled         =   0   'False
         Shortcut        =   {F1}
      End
      Begin VB.Menu mnuHelpSeparator 
         Caption         =   "-"
      End
      Begin VB.Menu mnuAbout 
         Caption         =   "关于(A)"
      End
   End
End

⌨️ 快捷键说明

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