来自「As information technology is more and mo」· 代码 · 共 54 行

VERSION 5.00
Begin VB.Form Form10 
   Caption         =   "工作界面"
   ClientHeight    =   5235
   ClientLeft      =   165
   ClientTop       =   855
   ClientWidth     =   7395
   LinkTopic       =   "Form10"
   ScaleHeight     =   5235
   ScaleWidth      =   7395
   StartUpPosition =   3  '窗口缺省
   Begin VB.PictureBox Picture1 
      Height          =   5295
      Left            =   0
      Picture         =   "工作界面.frx":0000
      ScaleHeight     =   5235
      ScaleWidth      =   7395
      TabIndex        =   0
      Top             =   0
      Width           =   7455
   End
   Begin VB.Menu guanli 
      Caption         =   "流通管理"
      Begin VB.Menu jieyue 
         Caption         =   "借阅书籍"
      End
      Begin VB.Menu guihuan 
         Caption         =   "归还书籍"
      End
   End
   Begin VB.Menu exit 
      Caption         =   "退出"
   End
End
Attribute VB_Name = "Form10"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Private Sub exit_Click()
Form10.Hide
Form1.Show
End Sub

Private Sub guihuan_Click()
Form10.Hide
frmbackbookinfo.Show
End Sub

Private Sub jieyue_Click()
Form10.Hide
frmfindbookinfo.Show
End Sub