?? mdiform1.frm
字號:
VERSION 5.00
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCTL.OCX"
Begin VB.MDIForm MDIForm1
BackColor = &H8000000C&
Caption = "工資統計系統"
ClientHeight = 5295
ClientLeft = 165
ClientTop = 555
ClientWidth = 8445
LinkTopic = "MDIForm1"
StartUpPosition = 2 'CenterScreen
WindowState = 2 'Maximized
Begin MSComctlLib.StatusBar StatusBar1
Align = 2 'Align Bottom
Height = 255
Left = 0
TabIndex = 0
Top = 5040
Width = 8445
_ExtentX = 14896
_ExtentY = 450
_Version = 393216
BeginProperty Panels {8E3867A5-8586-11D1-B16A-00C0F0283628}
NumPanels = 1
BeginProperty Panel1 {8E3867AB-8586-11D1-B16A-00C0F0283628}
Object.Width = 4410
MinWidth = 4410
Text = "版權所有:宜興龍達科技"
TextSave = "版權所有:宜興龍達科技"
EndProperty
EndProperty
End
Begin VB.Menu csh
Caption = "初始化"
Begin VB.Menu gxgl
Caption = "工序管理"
End
Begin VB.Menu tjzy
Caption = "職員管理"
End
Begin VB.Menu cpxxgl
Caption = "產品信息管理"
End
Begin VB.Menu djgl
Caption = "單價管理"
End
End
Begin VB.Menu sjsr
Caption = "數據輸入"
End
Begin VB.Menu tj
Caption = "統計"
End
Begin VB.Menu qtyggzll
Caption = "其他員工工資錄入"
End
Begin VB.Menu yhgl
Caption = "用戶管理"
Begin VB.Menu tjyh
Caption = "添加用戶"
End
Begin VB.Menu xgmm
Caption = "修改密碼"
End
Begin VB.Menu scyh
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 cpxxgl_Click()
Form_tjcp.Show
Form_tjcp.SetFocus
End Sub
Private Sub djgl_Click()
Form_djgl.Show
Form_djgl.SetFocus
End Sub
Private Sub gxgl_Click()
tjgj.Show
tjgj.SetFocus
End Sub
Private Sub qtyggzll_Click()
Form_qtyggz.Show
Form_qtyggz.SetFocus
End Sub
Private Sub scyh_Click()
Form_yhgl.Show
Form_yhgl.SetFocus
End Sub
Private Sub sjsr_Click()
Form_shuru.Show
Form_shuru.SetFocus
End Sub
Private Sub tj_Click()
Form_tongji.Show
Form_tongji.SetFocus
End Sub
Private Sub tjyh_Click()
Form_tjyh.Show
Form_tjyh.SetFocus
End Sub
Private Sub tjzy_Click()
form_tjzy.Show
form_tjzy.SetFocus
End Sub
Private Sub xgmm_Click()
Form_xgmm.Show 1
End Sub
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -