📄 frm_setoperator.frm
字号:
VERSION 5.00
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCTL.OCX"
Object = "{67397AA1-7FB1-11D0-B148-00A0C922E820}#6.0#0"; "MSADODC.OCX"
Object = "{BDC217C8-ED16-11CD-956C-0000C04E4C0A}#1.1#0"; "TABCTL32.OCX"
Begin VB.Form frm_setoperator
BorderStyle = 3 'Fixed Dialog
Caption = "操作员设置"
ClientHeight = 4320
ClientLeft = 45
ClientTop = 330
ClientWidth = 8130
LinkTopic = "Form1"
LockControls = -1 'True
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 4320
ScaleWidth = 8130
ShowInTaskbar = 0 'False
StartUpPosition = 3 '窗口缺省
Begin VB.Frame Frame2
Height = 3780
Left = 120
TabIndex = 4
Top = 120
Width = 7905
Begin VB.Frame Frame3
Caption = "设置操作员权限"
ForeColor = &H00800000&
Height = 3435
Left = 2790
TabIndex = 7
Top = 225
Width = 4980
Begin TabDlg.SSTab SSTab1
Height = 3135
Left = 150
TabIndex = 9
Top = 225
Width = 4665
_ExtentX = 8229
_ExtentY = 5530
_Version = 393216
Style = 1
Tabs = 5
TabsPerRow = 6
TabHeight = 520
TabCaption(0) = "期初设置"
TabPicture(0) = "frm_setoperator.frx":0000
Tab(0).ControlEnabled= -1 'True
Tab(0).Control(0)= "Check1"
Tab(0).Control(0).Enabled= 0 'False
Tab(0).Control(1)= "Check2"
Tab(0).Control(1).Enabled= 0 'False
Tab(0).Control(2)= "Check21"
Tab(0).Control(2).Enabled= 0 'False
Tab(0).ControlCount= 3
TabCaption(1) = "货品管理"
TabPicture(1) = "frm_setoperator.frx":001C
Tab(1).ControlEnabled= 0 'False
Tab(1).Control(0)= "Check4"
Tab(1).Control(1)= "Check5"
Tab(1).Control(2)= "Check3"
Tab(1).Control(3)= "Check19"
Tab(1).Control(4)= "Check20"
Tab(1).ControlCount= 5
TabCaption(2) = "查询统计"
TabPicture(2) = "frm_setoperator.frx":0038
Tab(2).ControlEnabled= 0 'False
Tab(2).Control(0)= "Check6"
Tab(2).Control(1)= "Check7"
Tab(2).Control(2)= "Check8"
Tab(2).Control(3)= "Check9"
Tab(2).ControlCount= 4
TabCaption(3) = "数据报表"
TabPicture(3) = "frm_setoperator.frx":0054
Tab(3).ControlEnabled= 0 'False
Tab(3).Control(0)= "Check10"
Tab(3).Control(1)= "Check11"
Tab(3).ControlCount= 2
TabCaption(4) = "系统维护"
TabPicture(4) = "frm_setoperator.frx":0070
Tab(4).ControlEnabled= 0 'False
Tab(4).Control(0)= "Check13"
Tab(4).Control(1)= "Check12"
Tab(4).Control(2)= "Check14"
Tab(4).Control(3)= "Check15"
Tab(4).Control(4)= "Check16"
Tab(4).Control(5)= "Check17"
Tab(4).Control(6)= "Check18"
Tab(4).ControlCount= 7
Begin VB.CheckBox Check21
Caption = "供应商信息维护"
Height = 375
Left = 2580
TabIndex = 30
Top = 1020
Width = 1635
End
Begin VB.CheckBox Check20
Caption = "货品归还"
Height = 450
Left = -74250
TabIndex = 29
Top = 2220
Width = 1050
End
Begin VB.CheckBox Check19
Caption = "货品借出"
Height = 420
Left = -72450
TabIndex = 28
Top = 1545
Width = 1275
End
Begin VB.CheckBox Check3
Caption = "货品入库"
Height = 480
Left = -74250
TabIndex = 27
Top = 840
Width = 1440
End
Begin VB.CheckBox Check5
Caption = "库存盘点"
Height = 495
Left = -74250
TabIndex = 26
Top = 1545
Width = 1695
End
Begin VB.CheckBox Check18
Caption = "清理日志"
Height = 240
Left = -74145
TabIndex = 25
Top = 2595
Width = 1260
End
Begin VB.CheckBox Check9
Caption = "出入库统计"
Height = 405
Left = -72420
TabIndex = 24
Top = 1470
Width = 1290
End
Begin VB.CheckBox Check17
Caption = "数据清理"
Height = 495
Left = -72120
TabIndex = 23
Top = 1920
Width = 1305
End
Begin VB.CheckBox Check16
Caption = "数据恢复"
Height = 495
Left = -74145
TabIndex = 22
Top = 1920
Width = 1815
End
Begin VB.CheckBox Check15
Caption = "数据备份"
Height = 375
Left = -72120
TabIndex = 21
Top = 1425
Width = 1260
End
Begin VB.CheckBox Check14
Caption = "权限设置"
Height = 375
Left = -74145
TabIndex = 20
Top = 1440
Width = 1815
End
Begin VB.CheckBox Check11
Caption = "库存报表"
Height = 375
Left = -72690
TabIndex = 19
Top = 930
Width = 1575
End
Begin VB.CheckBox Check10
Caption = "出库报表"
Height = 375
Left = -74400
TabIndex = 18
Top = 900
Width = 1575
End
Begin VB.CheckBox Check8
Caption = "库存查询"
Height = 375
Left = -74085
TabIndex = 17
Top = 1500
Width = 1575
End
Begin VB.CheckBox Check7
Caption = "出库查询"
Height = 375
Left = -72420
TabIndex = 16
Top = 765
Width = 1575
End
Begin VB.CheckBox Check6
Caption = "入库查询"
Height = 375
Left = -74085
TabIndex = 15
Top = 795
Width = 1695
End
Begin VB.CheckBox Check4
Caption = "货品出库"
Height = 500
Left = -72450
TabIndex = 14
Top = 840
Width = 1695
End
Begin VB.CheckBox Check2
Caption = "期初库存设置"
Height = 375
Left = 855
TabIndex = 13
Top = 1710
Width = 1815
End
Begin VB.CheckBox Check1
Caption = "仓库设置"
Height = 375
Left = 855
TabIndex = 12
Top = 1020
Width = 2175
End
Begin VB.CheckBox Check12
Caption = "操作员管理"
Height = 375
Left = -74145
TabIndex = 11
Top = 840
Width = 1935
End
Begin VB.CheckBox Check13
Caption = "密码修改"
Height = 375
Left = -72120
TabIndex = 10
Top = 825
Width = 1125
End
End
End
Begin VB.Frame Frame1
Caption = "操作员信息"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00008000&
Height = 3450
Left = 120
TabIndex = 5
Top = 200
Width = 2610
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -