📄 form_shiwuv.frm
字号:
VERSION 5.00
Object = "{86CF1D34-0C5F-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCT2.OCX"
Begin VB.Form form_ShiWuV
BorderStyle = 1 'Fixed Single
ClientHeight = 6240
ClientLeft = 45
ClientTop = 330
ClientWidth = 9000
KeyPreview = -1 'True
LinkTopic = "Form1"
MaxButton = 0 'False
MinButton = 0 'False
Picture = "form_ShiWuV.frx":0000
ScaleHeight = 6240
ScaleWidth = 9000
StartUpPosition = 2 'CenterScreen
Begin VB.CheckBox Check1
Height = 225
Left = 7440
TabIndex = 45
Top = 5130
Width = 195
End
Begin VB.TextBox Text11
Height = 345
Left = 6480
MaxLength = 2
TabIndex = 11
Text = "Text11"
Top = 3218
Width = 885
End
Begin VB.ComboBox Combo1
Height = 300
Left = 1380
TabIndex = 1
Text = "Combo1"
Top = 990
Width = 1185
End
Begin VB.TextBox Text15
Height = 345
Left = 5670
MaxLength = 4
TabIndex = 7
Text = "Text15"
Top = 2820
Width = 1245
End
Begin MSComCtl2.DTPicker DTPicker1
Height = 315
Left = 1410
TabIndex = 17
Top = 1920
Width = 1455
_ExtentX = 2566
_ExtentY = 556
_Version = 393216
Format = 20840449
CurrentDate = 38138
End
Begin VB.CommandButton Command2
Cancel = -1 'True
Height = 315
Left = 4710
Picture = "form_ShiWuV.frx":2209F
Style = 1 'Graphical
TabIndex = 36
Top = 5640
Width = 1065
End
Begin VB.CommandButton Command1
Height = 315
Left = 3060
Picture = "form_ShiWuV.frx":22177
Style = 1 'Graphical
TabIndex = 16
Top = 5640
Width = 1065
End
Begin VB.TextBox Text14
Height = 345
Left = 1410
TabIndex = 15
Text = "Text14"
Top = 5100
Width = 1245
End
Begin VB.TextBox Text13
Height = 345
Left = 1410
TabIndex = 14
Text = "Text13"
Top = 4650
Width = 2835
End
Begin VB.TextBox Text12
Height = 915
Left = 1410
MultiLine = -1 'True
TabIndex = 13
Text = "form_ShiWuV.frx":22254
Top = 3660
Width = 7155
End
Begin VB.TextBox Text10
Height = 345
Left = 4020
TabIndex = 35
Text = "Text10"
Top = 6840
Visible = 0 'False
Width = 1245
End
Begin VB.TextBox Text9
Height = 345
Left = 7860
TabIndex = 12
Text = "Text9"
Top = 3218
Width = 675
End
Begin VB.TextBox Text8
Height = 345
Left = 3375
TabIndex = 10
Text = "Text8"
Top = 3195
Width = 885
End
Begin VB.TextBox Text7
Height = 345
Left = 4950
TabIndex = 9
Text = "Text7"
Top = 3195
Width = 885
End
Begin VB.TextBox Text6
Height = 345
Left = 1410
MaxLength = 3
TabIndex = 8
Text = "Text6"
Top = 3218
Width = 885
End
Begin VB.TextBox Text5
Height = 345
Left = 5670
TabIndex = 5
Text = "Text5"
Top = 2340
Width = 1245
End
Begin VB.TextBox Text4
Height = 345
Left = 1410
TabIndex = 4
Text = "Text4"
Top = 2340
Width = 1245
End
Begin VB.TextBox Text3
Height = 345
Left = 5670
TabIndex = 3
Text = "Text3"
Top = 1890
Width = 2895
End
Begin VB.TextBox Text2
Height = 345
Left = 1380
TabIndex = 2
Text = "Text2"
Top = 1440
Width = 7185
End
Begin VB.TextBox Text1
Height = 345
Left = 1380
TabIndex = 0
Text = "Text1"
Top = 540
Width = 7185
End
Begin VB.ComboBox Combo2
Height = 300
Left = 1410
TabIndex = 6
Text = "Combo2"
Top = 2820
Width = 1215
End
Begin MSComCtl2.DTPicker DTPicker2
Height = 315
Left = 5610
TabIndex = 18
Top = 5100
Width = 1455
_ExtentX = 2566
_ExtentY = 556
_Version = 393216
Format = 20840449
CurrentDate = 38138
End
Begin MSComCtl2.DTPicker DTPicker3
Height = 315
Left = 1740
TabIndex = 40
Top = 6900
Visible = 0 'False
Width = 1395
_ExtentX = 2461
_ExtentY = 556
_Version = 393216
Format = 20840449
CurrentDate = 38138
End
Begin MSComCtl2.DTPicker DTPicker4
Height = 315
Left = 6000
TabIndex = 41
Top = 6900
Visible = 0 'False
Width = 1395
_ExtentX = 2461
_ExtentY = 556
_Version = 393216
Format = 20840449
CurrentDate = 38138
End
Begin VB.Label Label23
BackStyle = 0 'Transparent
Caption = "是否公开"
Height = 285
Left = 7710
TabIndex = 46
Top = 5160
Width = 1065
End
Begin VB.Label Label22
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "目录号"
Height = 180
Left = 5910
TabIndex = 44
Top = 3300
Width = 540
End
Begin VB.Label Label21
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "起始时间"
Height = 180
Left = 840
TabIndex = 43
Top = 6930
Visible = 0 'False
Width = 720
End
Begin VB.Label Label20
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "终止时间"
Height = 180
Left = 5160
TabIndex = 42
Top = 6990
Visible = 0 'False
Width = 720
End
Begin VB.Label Label19
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "类别号"
Height = 180
Left = 4410
TabIndex = 39
Top = 3300
Width = 540
End
Begin VB.Label Label18
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "门类号"
Height = 180
Left = 2700
TabIndex = 38
Top = 3300
Width = 540
End
Begin VB.Label Label17
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "归档年份"
ForeColor = &H000000C0&
Height = 180
Left = 4860
TabIndex = 37
Top = 2880
Width = 720
End
Begin VB.Label Label16
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "全宗号"
Height = 180
Left = 540
TabIndex = 34
Top = 3300
Width = 540
End
Begin VB.Label Label15
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "著录时间"
Height = 180
Left = 4770
TabIndex = 33
Top = 5160
Width = 720
End
Begin VB.Label Label14
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "件号"
Height = 180
Left = 7410
TabIndex = 32
Top = 3300
Width = 360
End
Begin VB.Label Label13
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "实物档案代号"
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -