mdiform1.frm

(VB)人力资源系统源码+源码+25000字论文+开题+文献+外文翻译+论文答辩稿

VERSION 5.00
Begin VB.MDIForm MDIForm1 
   BackColor       =   &H8000000C&
   Caption         =   "人事管理系统"
   ClientHeight    =   5085
   ClientLeft      =   165
   ClientTop       =   855
   ClientWidth     =   8085
   LinkTopic       =   "MDIForm1"
   StartUpPosition =   3  '窗口缺省
   WindowState     =   2  'Maximized
   Begin VB.Menu a 
      Caption         =   "人事档案信息"
      Begin VB.Menu a1 
         Caption         =   "添加信息"
      End
      Begin VB.Menu a2 
         Caption         =   "修改信息"
      End
   End
   Begin VB.Menu b 
      Caption         =   "企业部门情况"
      Begin VB.Menu b1 
         Caption         =   "添加信息"
      End
      Begin VB.Menu b2 
         Caption         =   "修改信息"
      End
   End
   Begin VB.Menu c 
      Caption         =   "工资信息"
      Begin VB.Menu c1 
         Caption         =   "添加信息"
      End
      Begin VB.Menu c2 
         Caption         =   "修改信息"
      End
   End
   Begin VB.Menu d 
      Caption         =   "家庭关系"
      Begin VB.Menu d1 
         Caption         =   "添加信息"
      End
      Begin VB.Menu d2 
         Caption         =   "修改信息"
      End
   End
   Begin VB.Menu e 
      Caption         =   "查询"
      Begin VB.Menu e1 
         Caption         =   "组合查询人事信息"
      End
      Begin VB.Menu e2 
         Caption         =   "查询工资 "
      End
   End
   Begin VB.Menu y 
      Caption         =   "统计"
      Begin VB.Menu y1 
         Caption         =   "统计工资"
      End
   End
   Begin VB.Menu f 
      Caption         =   "打印"
      Begin VB.Menu f1 
         Caption         =   "打印人事档案信息"
      End
      Begin VB.Menu f2 
         Caption         =   "打印工资信息"
      End
   End
   Begin VB.Menu g 
      Caption         =   "用户管理"
   End
   Begin VB.Menu h 
      Caption         =   "退出"
   End
End
Attribute VB_Name = "MDIForm1"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Private Sub a1_Click()
Form9.Show
End Sub

Private Sub a2_Click()
Form4.Show
End Sub

Private Sub b1_Click()
Form10.Show
End Sub

Private Sub b2_Click()
Form5.Show
End Sub

Private Sub c1_Click()
Form6.Show
End Sub

Private Sub c2_Click()
Form11.Show
End Sub

Private Sub d1_Click()
Form12.Show
End Sub

Private Sub d2_Click()
Form7.Show
End Sub

Private Sub e1_Click()
Form8.Show
End Sub

Private Sub e2_Click()
Form13.Show
End Sub

Private Sub f1_Click()
DataReport1.Show
End Sub

Private Sub f2_Click()
DataReport2.Show
End Sub

Private Sub g_Click()
Form3.Show
End Sub

Private Sub h_Click()
End
End Sub

Private Sub MDIForm_Load()

End Sub

Private Sub y1_Click()
Form14.Show
End Sub