📄 frmsystemset.frm
字号:
VERSION 5.00
Object = "{BDC217C8-ED16-11CD-956C-0000C04E4C0A}#1.1#0"; "TABCTL32.OCX"
Begin VB.Form frmSystemSet
BorderStyle = 3 'Fixed Dialog
Caption = "系统设置窗口"
ClientHeight = 5475
ClientLeft = 45
ClientTop = 330
ClientWidth = 7695
Icon = "frmSystemSet.frx":0000
LinkTopic = "Form1"
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 5475
ScaleWidth = 7695
ShowInTaskbar = 0 'False
StartUpPosition = 2 '屏幕中心
Begin VB.CommandButton Command2
Caption = "取消"
Height = 465
Left = 4470
TabIndex = 9
Top = 4845
Width = 1200
End
Begin VB.CommandButton Command1
Caption = "确定"
Height = 450
Left = 1680
TabIndex = 8
Top = 4845
Width = 1335
End
Begin TabDlg.SSTab SSTab1
Height = 4380
Left = 105
TabIndex = 0
Top = 270
Width = 7425
_ExtentX = 13097
_ExtentY = 7726
_Version = 393216
Style = 1
Tabs = 6
Tab = 4
TabsPerRow = 6
TabHeight = 520
TabCaption(0) = "单据打印"
TabPicture(0) = "frmSystemSet.frx":0442
Tab(0).ControlEnabled= 0 'False
Tab(0).Control(0)= "Frame1"
Tab(0).Control(0).Enabled= 0 'False
Tab(0).ControlCount= 1
TabCaption(1) = "标题"
TabPicture(1) = "frmSystemSet.frx":045E
Tab(1).ControlEnabled= 0 'False
Tab(1).Control(0)= "Frame2"
Tab(1).Control(0).Enabled= 0 'False
Tab(1).ControlCount= 1
TabCaption(2) = "单号设置"
TabPicture(2) = "frmSystemSet.frx":047A
Tab(2).ControlEnabled= 0 'False
Tab(2).Control(0)= "Frame3"
Tab(2).Control(0).Enabled= 0 'False
Tab(2).ControlCount= 1
TabCaption(3) = "数据库设置"
TabPicture(3) = "frmSystemSet.frx":0496
Tab(3).ControlEnabled= 0 'False
Tab(3).Control(0)= "Frame5"
Tab(3).Control(0).Enabled= 0 'False
Tab(3).Control(1)= "Frame4"
Tab(3).Control(1).Enabled= 0 'False
Tab(3).Control(2)= "Frame6"
Tab(3).Control(2).Enabled= 0 'False
Tab(3).ControlCount= 3
TabCaption(4) = "库存设置"
TabPicture(4) = "frmSystemSet.frx":04B2
Tab(4).ControlEnabled= -1 'True
Tab(4).Control(0)= "Frame7"
Tab(4).Control(0).Enabled= 0 'False
Tab(4).ControlCount= 1
TabCaption(5) = "价格提示"
TabPicture(5) = "frmSystemSet.frx":04CE
Tab(5).ControlEnabled= 0 'False
Tab(5).Control(0)= "Frame11"
Tab(5).Control(0).Enabled= 0 'False
Tab(5).Control(1)= "Frame9"
Tab(5).Control(1).Enabled= 0 'False
Tab(5).Control(2)= "Frame10"
Tab(5).Control(2).Enabled= 0 'False
Tab(5).ControlCount= 3
Begin VB.Frame Frame11
Caption = "进货价格提示"
Height = 825
Left = -74505
TabIndex = 69
Top = 2685
Width = 6315
Begin VB.OptionButton optIprc3
Caption = "进价提示"
Height = 300
Left = 420
TabIndex = 73
Top = 345
Value = -1 'True
Width = 1035
End
Begin VB.OptionButton optRprc3
Caption = "售价提示"
Height = 360
Left = 1725
TabIndex = 72
Top = 300
Width = 1200
End
Begin VB.OptionButton optPF13
Caption = "批发价1"
Height = 240
Left = 2955
TabIndex = 71
Top = 345
Width = 1035
End
Begin VB.OptionButton optPF23
Caption = "批发价2"
Height = 255
Left = 4500
TabIndex = 70
Top = 330
Width = 1530
End
End
Begin VB.Frame Frame9
Caption = "销售价格提示"
Height = 825
Left = -74505
TabIndex = 64
Top = 690
Width = 6315
Begin VB.OptionButton optIprc
Caption = "进价提示"
Height = 300
Left = 420
TabIndex = 68
Top = 345
Value = -1 'True
Width = 1035
End
Begin VB.OptionButton optRprc
Caption = "售价提示"
Height = 360
Left = 1725
TabIndex = 67
Top = 300
Width = 1200
End
Begin VB.OptionButton optPF1
Caption = "批发价1"
Height = 240
Left = 2955
TabIndex = 66
Top = 345
Width = 1035
End
Begin VB.OptionButton optPF2
Caption = "批发价2"
Height = 255
Left = 4155
TabIndex = 65
Top = 345
Width = 1530
End
End
Begin VB.Frame Frame10
Caption = "配送价格提示"
Height = 825
Left = -74520
TabIndex = 59
Top = 1590
Width = 6315
Begin VB.OptionButton optPF22
Caption = "批发价2"
Height = 255
Left = 4500
TabIndex = 63
Top = 330
Width = 1530
End
Begin VB.OptionButton optPF12
Caption = "批发价1"
Height = 240
Left = 2955
TabIndex = 62
Top = 345
Width = 1035
End
Begin VB.OptionButton optRprc2
Caption = "售价提示"
Height = 360
Left = 1725
TabIndex = 61
Top = 300
Width = 1200
End
Begin VB.OptionButton optIprc2
Caption = "进价提示"
Height = 300
Left = 420
TabIndex = 60
Top = 345
Value = -1 'True
Width = 1035
End
End
Begin VB.Frame Frame7
Height = 3750
Left = 105
TabIndex = 48
Top = 465
Width = 7140
Begin VB.CheckBox chkUsePro
Caption = "使用存储过程"
Height = 285
Left = 480
TabIndex = 82
Top = 3000
Width = 1950
End
Begin VB.CheckBox chkPSKC
Caption = "配送库存计算"
Height = 285
Left = 5355
TabIndex = 81
Top = 3180
Width = 1950
End
Begin VB.CheckBox chkINHS
Caption = "进货打印含税价"
Height = 285
Left = 3570
TabIndex = 80
Top = 3150
Width = 1950
End
Begin VB.CheckBox chkPD
Caption = "显示盘点提示"
Height = 285
Left = 5370
TabIndex = 79
Top = 2685
Width = 1515
End
Begin VB.CheckBox chkPrintSJ
Caption = "打印税金"
Height = 285
Left = 3585
TabIndex = 78
Top = 2670
Width = 1515
End
Begin VB.CheckBox chkPrintLSJ
Caption = "打印零售价"
Height = 285
Left = 5355
TabIndex = 77
Top = 2190
Width = 1515
End
Begin VB.CheckBox chkDD
Caption = "显示订单号"
Height = 285
Left = 3555
TabIndex = 76
Top = 2220
Width = 1515
End
Begin VB.CheckBox chkYWY
Caption = "显示业务员"
Height = 240
Left = 5355
TabIndex = 75
Top = 1725
Width = 1545
End
Begin VB.CheckBox chkPayType
Caption = "显示付款方式"
Height = 375
Left = 3555
TabIndex = 74
Top = 1665
Width = 1485
End
Begin VB.CheckBox chkPSDJD
Caption = "配送单加点提示"
Height = 330
Left = 5340
TabIndex = 58
Top = 1155
Width = 1590
End
Begin VB.CheckBox chkAutoSave
Caption = "配送单自动保存 "
Height = 270
Left = 3540
TabIndex = 57
Top = 1170
Width = 1635
End
Begin VB.Frame Frame8
Caption = "货币小数位数设置"
Height = 885
Left = 360
TabIndex = 53
Top = 900
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -