谁帮我解释下这段VB代码大概什么意思?

Private Sub mnuAbout_Click() '在一个叫mnuAbout的菜单上单击
frmAbout.Show vbModal, Me '名为frmAbout的窗口就以VBMODAL的方式显示出来.
End Sub

Private Sub mnuEmpmanager_Click() '与上面的差不多,也是点菜单弹出窗口
frmEmployees.Show vbModal
End Sub

Private Sub mnuEmpQuery_Click() '单击菜单
frmEmployees.tblEmployees.Visible = False '窗体frmEmployees上的tblEmployees控件被设为不可见
frmEmployees.tlbPrint.Left = 30 '定tlbPrint控件离开窗体左边30
frmEmployees.tlbExit.Left = frmEmployees.tlbPrint.Left + frmEmployees.tlbPrint.Width 'tlbExit的离开窗体左边=tlbPrint左边距+它的宽度.
frmEmployees.Caption = "员工查询" '窗体标题改为员工查询

frmEmployees.Show vbModal, Me '以上设置好后显示窗体
End Sub

Private Sub mnuExit_Click() '点击该菜单关闭本窗口
Unload Me
End Sub

Private Sub mnuLeavelQuery_Click()
frmLeavel.tblEmployees.Buttons("add").Visible = False '窗体上的ADD的按钮设置为不可见

frmLeavel.tblEmployees.Buttons("delete").Visible = False '窗体上的DELETE的按钮设置为不可见
frmLeavel.tblEmployees.Buttons("modify").Visible = False '窗体上的修改的按钮设置为不可见

frmLeavel.tlbPrint.Left = 30 '窗体frmLeavel上的tlbPrint控件离窗体左边距离为30
frmLeavel.tlbExit.Left = frmLeavel.tlbPrint.Width '窗体frmLeavel上的tlbExit控件的左边与上一控件左边距离相等frmLeavel.Caption = "请假查询" '窗体的标题改为"请假查询"
frmLeavel.Show vbModal, Me '设置好后显示本窗体.
End Sub

Private Sub mnuOperater_Click() '也是点菜单弹出窗口
frmOperator.Show vbModal, Me
End Sub

Private Sub mnuSubLeavle_Click() '也是点菜单弹出窗口
frmLeavel.Show vbModal, Me
End Sub

Private Sub mnuUnit_Click() '也是点菜单弹出窗口
frmUnit.Show vbModal
End Sub

Private Sub tmrSta_Timer() '时间控件设置的时间到时发生以下过程
staMain.Panels("time").Text = Now() '状态栏的时间被设置为当前时间
End Sub