VERSION 5.00
Begin VB.Form frm_Main 
   Caption         =   "藥品存銷管理系統"
   ClientHeight    =   3330
   ClientLeft      =   60
   ClientTop       =   750
   ClientWidth     =   6630
   LinkTopic       =   "Form1"
   ScaleHeight     =   3330
   ScaleWidth      =   6630
   StartUpPosition =   3  'Windows Default
   Begin VB.Menu Menu_import 
      Caption         =   "藥品入庫管理"
      Begin VB.Menu Menu_im_add 
         Caption         =   "添加入庫信息"
      End
      Begin VB.Menu Menu_im_del 
         Caption         =   "刪除入庫信息"
      End
      Begin VB.Menu Menu_im_upd 
         Caption         =   "修改入庫信息"
      End
      Begin VB.Menu Menu_im_que 
         Caption         =   "查詢入庫信息"
      End
   End
   Begin VB.Menu Menu_info 
      Caption         =   "庫存藥品管理"
      Begin VB.Menu Menu_inf_add 
         Caption         =   "添加庫存信息"
      End
      Begin VB.Menu Menu_inf_del 
         Caption         =   "刪除庫存信息"
      End
      Begin VB.Menu Menu_inf_upd 
         Caption         =   "修改庫存信息"
      End
      Begin VB.Menu Menu_inf_que 
         Caption         =   "查詢庫存信息"
      End
   End
   Begin VB.Menu Menu_export 
      Caption         =   "藥品出庫管理"
      Begin VB.Menu Menu_ex_add 
         Caption         =   "添加出庫信息"
      End
      Begin VB.Menu Menu_ex_del 
         Caption         =   "刪除出庫信息"
      End
      Begin VB.Menu Menu_ex_upd 
         Caption         =   "修改出庫信息"
      End
      Begin VB.Menu Menu_ex_que 
         Caption         =   "查詢出庫信息"
      End
   End
   Begin VB.Menu Menu_quit 
      Caption         =   "退出藥品存銷管理系統"
   End
End
Attribute VB_Name = "frm_Main"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Private Sub Form_Load()


End Sub
Private Sub Menu_im_add_Click()
    frm_im_add.Show
End Sub
Private Sub Menu_im_del_Click()
    frm_im_del.Show
End Sub
Private Sub Menu_im_upd_Click()
    frm_im_upd.Show
End Sub
Private Sub Menu_im_que_Click()
    frm_im_que.Show
End Sub
Private Sub Menu_inf_add_Click()
    frm_inf_add.Show
End Sub
Private Sub Menu_inf_del_Click()
    frm_inf_del.Show
End Sub
Private Sub Menu_inf_upd_Click()
    frm_inf_upd.Show
End Sub
Private Sub Menu_inf_que_Click()
    frm_inf_que.Show
End Sub
Private Sub Menu_ex_add_Click()
    frm_ex_add.Show
End Sub
Private Sub Menu_ex_del_Click()
    frm_ex_del.Show
End Sub
Private Sub Menu_ex_upd_Click()
    frm_ex_upd.Show
End Sub
Private Sub Menu_ex_que_Click()
    frm_ex_que.Show
End Sub
Private Sub Menu_quit_Click()
    Unload Me
End Sub