📄 setpage.frm
字号:
VERSION 5.00
Object = "{BDC217C8-ED16-11CD-956C-0000C04E4C0A}#1.1#0"; "TABCTL32.OCX"
Object = "{F9043C88-F6F2-101A-A3C9-08002B2F49FB}#1.2#0"; "COMDLG32.OCX"
Object = "{86CF1D34-0C5F-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCT2.OCX"
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCTL.OCX"
Begin VB.Form SetPage
BorderStyle = 1 'Fixed Single
Caption = "页面设置"
ClientHeight = 3690
ClientLeft = 45
ClientTop = 330
ClientWidth = 6315
Icon = "SetPage.frx":0000
LinkTopic = "Form1"
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 3690
ScaleWidth = 6315
StartUpPosition = 3 '窗口缺省
Begin MSComDlg.CommonDialog SefFontDialog
Left = 5400
Top = 480
_ExtentX = 847
_ExtentY = 847
_Version = 393216
End
Begin VB.CommandButton Command1
Caption = "取 消"
Height = 375
Index = 1
Left = 5400
TabIndex = 41
Top = 3240
Width = 855
End
Begin VB.CommandButton Command1
Caption = "确 定"
Height = 375
Index = 0
Left = 5400
TabIndex = 40
Top = 2760
Width = 855
End
Begin TabDlg.SSTab SSTab1
Height = 3615
Left = 0
TabIndex = 0
Top = 0
Width = 5295
_ExtentX = 9340
_ExtentY = 6376
_Version = 393216
Tab = 2
TabHeight = 520
TabCaption(0) = "页面设置"
TabPicture(0) = "SetPage.frx":08CA
Tab(0).ControlEnabled= 0 'False
Tab(0).Control(0)= "Frame1"
Tab(0).Control(1)= "Frame2"
Tab(0).Control(2)= "Frame3"
Tab(0).ControlCount= 3
TabCaption(1) = "页眉页脚"
TabPicture(1) = "SetPage.frx":08E6
Tab(1).ControlEnabled= 0 'False
Tab(1).Control(0)= "Frame8"
Tab(1).ControlCount= 1
TabCaption(2) = "表格设置"
TabPicture(2) = "SetPage.frx":0902
Tab(2).ControlEnabled= -1 'True
Tab(2).Control(0)= "Frame10"
Tab(2).Control(0).Enabled= 0 'False
Tab(2).Control(1)= "Frame6(0)"
Tab(2).Control(1).Enabled= 0 'False
Tab(2).Control(2)= "Frame6(1)"
Tab(2).Control(2).Enabled= 0 'False
Tab(2).ControlCount= 3
Begin VB.Frame Frame6
Caption = "脚注"
Height = 1455
Index = 1
Left = 2760
TabIndex = 66
Top = 1920
Width = 2415
Begin VB.TextBox Text2
Height = 270
Index = 7
Left = 600
TabIndex = 70
Top = 1080
Width = 1695
End
Begin VB.TextBox Text2
Height = 270
Index = 5
Left = 600
MaxLength = 2
TabIndex = 69
Top = 360
Width = 375
End
Begin VB.ComboBox Combo3
Height = 300
Index = 2
ItemData = "SetPage.frx":091E
Left = 600
List = "SetPage.frx":092B
Style = 2 'Dropdown List
TabIndex = 68
Top = 720
Width = 1695
End
Begin VB.CommandButton Command2
Caption = "字体..."
Height = 375
Index = 4
Left = 1440
TabIndex = 67
Top = 240
Width = 855
End
Begin VB.Label Label3
Caption = "文本:"
Height = 255
Index = 1
Left = 120
TabIndex = 73
Top = 1080
Width = 975
End
Begin VB.Label Label6
Caption = "高度: 毫米"
Height = 255
Left = 120
TabIndex = 72
Top = 360
Width = 1335
End
Begin VB.Label Label2
Caption = "对齐:"
Height = 255
Index = 5
Left = 120
TabIndex = 71
Top = 720
Width = 975
End
End
Begin VB.Frame Frame6
Caption = "标题"
Height = 1455
Index = 0
Left = 120
TabIndex = 58
Top = 1920
Width = 2415
Begin VB.TextBox Text2
Height = 270
Index = 6
Left = 600
TabIndex = 62
Top = 1080
Width = 1695
End
Begin VB.TextBox Text2
Height = 270
Index = 4
Left = 600
MaxLength = 2
TabIndex = 61
Top = 360
Width = 375
End
Begin VB.ComboBox Combo3
Height = 300
Index = 1
ItemData = "SetPage.frx":0949
Left = 600
List = "SetPage.frx":0956
Style = 2 'Dropdown List
TabIndex = 60
Top = 720
Width = 1695
End
Begin VB.CommandButton Command2
Caption = "字体..."
Height = 375
Index = 3
Left = 1440
TabIndex = 59
Top = 240
Width = 855
End
Begin VB.Label Label3
Caption = "文本:"
Height = 255
Index = 0
Left = 120
TabIndex = 65
Top = 1080
Width = 975
End
Begin VB.Label Label5
Caption = "高度: 毫米"
Height = 255
Left = 120
TabIndex = 64
Top = 360
Width = 1455
End
Begin VB.Label Label2
Caption = "对齐:"
Height = 255
Index = 4
Left = 120
TabIndex = 63
Top = 720
Width = 975
End
End
Begin VB.Frame Frame10
Caption = "表体"
Height = 1335
Left = 120
TabIndex = 44
Top = 480
Width = 5055
Begin VB.CommandButton Command2
Caption = "字体..."
Height = 375
Index = 2
Left = 3480
TabIndex = 56
Top = 840
Width = 1455
End
Begin VB.ComboBox Combo3
Height = 300
Index = 0
ItemData = "SetPage.frx":0974
Left = 3480
List = "SetPage.frx":0981
Style = 2 'Dropdown List
TabIndex = 55
Top = 480
Width = 1455
End
Begin VB.Frame Frame5
Caption = "数量"
Height = 975
Index = 0
Left = 240
TabIndex = 50
Top = 240
Width = 1335
Begin VB.TextBox Text2
Height = 270
Index = 0
Left = 600
MaxLength = 2
TabIndex = 52
Top = 240
Width = 375
End
Begin VB.TextBox Text2
Height = 270
Index = 1
Left = 600
MaxLength = 2
TabIndex = 51
Top = 600
Width = 375
End
Begin VB.Label Label2
Caption = "纵向: 个"
Height = 255
Index = 0
Left = 120
TabIndex = 54
Top = 240
Width = 1095
End
Begin VB.Label Label2
Caption = "横向: 个"
Height = 255
Index = 1
Left = 120
TabIndex = 53
Top = 600
Width = 1095
End
End
Begin VB.Frame Frame5
Caption = "间距(单位:毫米)"
Height = 975
Index = 1
Left = 1680
TabIndex = 45
Top = 240
Width = 1695
Begin VB.TextBox Text2
Height = 270
Index = 2
Left = 600
MaxLength = 2
TabIndex = 47
Top = 240
Width = 975
End
Begin VB.TextBox Text2
Height = 270
Index = 3
Left = 600
MaxLength = 2
TabIndex = 46
Top = 600
Width = 975
End
Begin VB.Label Label2
Caption = "横向:"
Height = 255
Index = 2
Left = 120
TabIndex = 49
Top = 600
Width = 1095
End
Begin VB.Label Label2
Caption = "纵向:"
Height = 255
Index = 3
Left = 120
TabIndex = 48
Top = 240
Width = 1095
End
End
Begin VB.Label Label2
Caption = "对齐方式:"
Height = 255
Index = 6
Left = 3480
TabIndex = 57
Top = 240
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -