📄 ¿
字号:
VERSION 5.00
Begin VB.Form frm_formula
AutoRedraw = -1 'True
BackColor = &H8000000B&
BorderStyle = 3 'Fixed Dialog
Caption = "函数公式向导"
ClientHeight = 4485
ClientLeft = 45
ClientTop = 330
ClientWidth = 5730
Icon = "定义函数公式向导.frx":0000
LinkTopic = "Form1"
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 4485
ScaleWidth = 5730
ShowInTaskbar = 0 'False
StartUpPosition = 2 '屏幕中心
Begin VB.Frame Frame2
Height = 660
Left = 120
TabIndex = 11
Top = 3300
Width = 5505
Begin VB.OptionButton Option1
Caption = "除"
Height = 300
Index = 3
Left = 4275
TabIndex = 35
Top = 255
Width = 555
End
Begin VB.OptionButton Option1
Caption = "乘"
Height = 300
Index = 2
Left = 3465
TabIndex = 33
Top = 255
Width = 555
End
Begin VB.OptionButton Option1
Caption = "减"
Height = 300
Index = 1
Left = 2625
TabIndex = 31
Top = 255
Width = 555
End
Begin VB.OptionButton Option1
Caption = "加"
Height = 300
Index = 0
Left = 1800
TabIndex = 14
Top = 255
Value = -1 'True
Width = 555
End
Begin VB.CheckBox Check1
Caption = "继续定义？"
Height = 285
Left = 225
TabIndex = 10
Top = 240
Width = 1305
End
End
Begin VB.Frame Frame1
Caption = "辅助项参数内容"
Height = 1485
Left = 120
TabIndex = 15
Top = 1710
Width = 5520
Begin VB.CommandButton YDCommand1
Height = 300
Index = 8
Left = 5100
Picture = "定义函数公式向导.frx":1042
Style = 1 'Graphical
TabIndex = 36
Top = 1080
Width = 300
End
Begin VB.CommandButton YDCommand1
Height = 300
Index = 6
Left = 5100
Picture = "定义函数公式向导.frx":13CC
Style = 1 'Graphical
TabIndex = 32
Top = 690
Width = 300
End
Begin VB.CommandButton YDCommand1
Height = 300
Index = 4
Left = 5100
Picture = "定义函数公式向导.frx":1756
Style = 1 'Graphical
TabIndex = 29
Top = 315
Width = 300
End
Begin VB.CommandButton YDCommand1
Height = 300
Index = 3
Left = 2460
Picture = "定义函数公式向导.frx":1AE0
Style = 1 'Graphical
TabIndex = 27
Top = 285
Width = 300
End
Begin VB.CommandButton YDCommand1
Height = 300
Index = 5
Left = 2460
Picture = "定义函数公式向导.frx":1E6A
Style = 1 'Graphical
TabIndex = 30
Top = 660
Width = 300
End
Begin VB.CommandButton YDCommand1
Height = 300
Index = 7
Left = 2460
Picture = "定义函数公式向导.frx":21F4
Style = 1 'Graphical
TabIndex = 34
Top = 1050
Width = 300
End
Begin VB.TextBox lrText
Height = 285
Index = 8
Left = 3825
TabIndex = 9
Top = 1080
Width = 1290
End
Begin VB.TextBox lrText
Height = 285
Index = 7
Left = 1080
TabIndex = 8
Top = 1065
Width = 1380
End
Begin VB.TextBox lrText
Height = 285
Index = 6
Left = 3825
TabIndex = 7
Top = 705
Width = 1290
End
Begin VB.TextBox lrText
Height = 285
Index = 5
Left = 1080
TabIndex = 6
Top = 675
Width = 1380
End
Begin VB.TextBox lrText
Height = 285
Index = 4
Left = 3825
TabIndex = 5
Top = 315
Width = 1290
End
Begin VB.TextBox lrText
Height = 285
Index = 3
Left = 1080
TabIndex = 4
Top = 285
Width = 1380
End
Begin VB.Label Label1
Caption = "供应商编码:"
Height = 255
Left = 2820
TabIndex = 37
Top = 1125
Width = 1020
End
Begin VB.Label Label6
Caption = "部门编码:"
Height = 330
Left = 180
TabIndex = 28
Top = 330
Width = 915
End
Begin VB.Label Label4
Caption = "职员编码:"
Height = 330
Left = 2970
TabIndex = 26
Top = 360
Width = 885
End
Begin VB.Label Label11
Caption = "项目编码:"
Height = 330
Left = 2970
TabIndex = 24
Top = 735
Width = 1005
End
Begin VB.Label Label8
Caption = "项目分类:"
Height = 270
Left = 180
TabIndex = 23
Top = 720
Width = 1215
End
Begin VB.Label Label7
Caption = "客户编码:"
Height = 255
Left = 180
TabIndex = 22
Top = 1125
Width = 1245
End
End
Begin VB.CommandButton QXCommand
Caption = "取消(&C)"
Height = 300
Left = 4515
Style = 1 'Graphical
TabIndex = 13
Top = 4065
Width = 1120
End
Begin VB.CommandButton QDCommand
Caption = "确定(&O)"
Height = 300
Left = 3300
Style = 1 'Graphical
TabIndex = 12
Top = 4065
Width = 1120
End
Begin VB.Frame Frame5
Caption = "函数参数内容"
Height = 1515
Left = 90
TabIndex = 16
Top = 60
Width = 5520
Begin VB.ComboBox Combo3
Height = 300
Left = 2415
Style = 2 'Dropdown List
TabIndex = 1
Top = 255
Width = 1005
End
Begin VB.ComboBox Combo1
Height = 300
Left = 1125
Style = 2 'Dropdown List
TabIndex = 0
Top = 255
Width = 1005
End
Begin VB.CommandButton YDCommand1
Height = 300
Index = 2
Left = 5100
Picture = "定义函数公式向导.frx":257E
Style = 1 'Graphical
TabIndex = 25
Top = 1050
Width = 300
End
Begin VB.TextBox lrText
Height = 300
Index = 2
Left = 1095
TabIndex = 3
Top = 1065
Width = 4005
End
Begin VB.ComboBox Combo2
Height = 300
Left = 1110
Style = 2 'Dropdown List
TabIndex = 2
Top = 660
Width = 4290
End
Begin VB.TextBox lrText
Height = 300
Index = 1
Left = 4920
TabIndex = 39
Top = 195
Visible = 0 'False
Width = 570
End
Begin VB.TextBox lrText
Height = 300
Index = 0
Left = 4305
TabIndex = 38
Top = 195
Visible = 0 'False
Width = 570
End
Begin VB.Label Label5
BackColor = &H8000000B&
Caption = "月"
Height = 225
Left = 3495
TabIndex = 21
Top = 315
Width = 405
End
Begin VB.Label Label2
BackColor = &H8000000B&
Caption = "年"
Height = 270
Left = 2190
TabIndex = 20
Top = 330
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -