frmmain.vb

来自「vb2005人事管理系统源码」· VB 代码 · 共 36 行

Friend Class FrmMain
	Inherits System.Windows.Forms.Form

	
    Private Sub lblDep_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lblDep.Click
        FrmDepMan.ShowDialog()
    End Sub
	
	
    Private Sub lblEmp_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lblEmp.Click
        FrmEmpMan.Show()
    End Sub

    Private Sub lblexit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lblexit.Click
        End
    End Sub

    Private Sub lblCheck_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lblCheck.Click
        FrmCheckMan.ShowDialog()
    End Sub

    Private Sub lblEvaluate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lblEvaluate.Click
        FrmEvaMan.ShowDialog()
    End Sub

    Private Sub lblSalary_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lblSalary.Click
        FrmSalaryMan.ShowDialog()
    End Sub

    Private Sub lblUsers_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lblUsers.Click
        FrmUserMan.ShowDialog()
    End Sub

  
End Class