mdiform1.frm

经费软件

VERSION 5.00
Begin VB.MDIForm MDIForm1 
   BackColor       =   &H8000000C&
   Caption         =   "经费支出管理系统"
   ClientHeight    =   8430
   ClientLeft      =   60
   ClientTop       =   750
   ClientWidth     =   10065
   LinkTopic       =   "MDIForm1"
   WindowState     =   2  'Maximized
   Begin VB.Menu zhichu 
      Caption         =   "经费支出管理"
      Begin VB.Menu wupin 
         Caption         =   "购买物品"
      End
      Begin VB.Menu chuchai 
         Caption         =   "试验出差"
      End
   End
   Begin VB.Menu xiangmu 
      Caption         =   "经费项目管理"
      Begin VB.Menu add 
         Caption         =   "添加/删除经费本"
      End
      Begin VB.Menu shiyong 
         Caption         =   "经费本使用情况"
      End
   End
End
Attribute VB_Name = "MDIForm1"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False


Private Sub add_Click()
frmadddelete.Show
End Sub

Private Sub chuchai_Click()
frmchuchai.Show
End Sub

Private Sub shiyong_Click()
frmben.Show

End Sub

Private Sub wupin_Click()
frmzhichu.Show

End Sub