📄 frmwiz1.frm
字号:
Left = 2400
TabIndex = 34
Top = 540
Width = 4575
_ExtentX = 8065
_ExtentY = 3302
View = 3
LabelEdit = 1
LabelWrap = 0 'False
HideSelection = 0 'False
HideColumnHeaders= -1 'True
_Version = 327682
ForeColor = -2147483640
BackColor = -2147483643
BorderStyle = 1
Appearance = 0
NumItems = 1
BeginProperty ColumnHeader(1) {0713E8C7-850A-101B-AFC0-4210102A8DA7}
Key = ""
Object.Tag = ""
Text = ""
Object.Width = 7408
EndProperty
End
Begin VB.Label lblHelp
Caption = "Tell the wizard how this particular type of line can be recognized from the other lines that may occur in the input document."
Height = 1755
Index = 3
Left = 60
TabIndex = 36
Top = 2220
Width = 1995
End
Begin VB.Image imgImage
Appearance = 0 'Flat
BorderStyle = 1 'Fixed Single
Height = 2010
Index = 3
Left = 60
Picture = "frmWiz1.frx":12314
Stretch = -1 'True
Top = 60
Width = 2010
End
Begin VB.Label lblHowLineIsRecognized
Caption = "How the line is recognized"
Height = 255
Left = 2400
TabIndex = 35
Top = 240
Width = 4515
End
End
Begin VB.Frame fraStep
Caption = "AddFields"
Height = 3975
Index = 4
Left = 540
TabIndex = 12
Top = 720
Width = 7335
Begin VB.PictureBox picUpField
Appearance = 0 'Flat
BackColor = &H80000005&
ForeColor = &H80000008&
Height = 255
Left = 7020
Picture = "frmWiz1.frx":14396
ScaleHeight = 228
ScaleWidth = 228
TabIndex = 14
Top = 1200
Width = 255
End
Begin VB.PictureBox picDnField
Appearance = 0 'Flat
BackColor = &H80000005&
ForeColor = &H80000008&
Height = 255
Left = 7020
Picture = "frmWiz1.frx":147D8
ScaleHeight = 228
ScaleWidth = 228
TabIndex = 15
Top = 1920
Width = 255
End
Begin VB.CommandButton btnAddField
Caption = "&Add..."
Height = 315
Left = 5340
TabIndex = 16
Top = 2880
Width = 735
End
Begin VB.CommandButton btnDeleteField
Caption = "De&lete"
Enabled = 0 'False
Height = 315
Left = 6240
TabIndex = 17
Top = 2880
Width = 735
End
Begin ComctlLib.ListView lstFields
Height = 2055
Left = 2400
TabIndex = 13
Top = 660
Width = 4575
_ExtentX = 8065
_ExtentY = 3620
View = 3
LabelWrap = 0 'False
HideSelection = 0 'False
HideColumnHeaders= -1 'True
_Version = 327682
ForeColor = -2147483640
BackColor = -2147483643
BorderStyle = 1
Appearance = 0
NumItems = 1
BeginProperty ColumnHeader(1) {0713E8C7-850A-101B-AFC0-4210102A8DA7}
Key = ""
Object.Tag = ""
Text = ""
Object.Width = 7408
EndProperty
End
Begin VB.Label lblHelp
Caption = "Give a name to each of the different data items on this line that contain data you wish to import."
Height = 1755
Index = 4
Left = 60
TabIndex = 19
Top = 2220
Width = 1995
End
Begin VB.Image imgImage
Appearance = 0 'Flat
BorderStyle = 1 'Fixed Single
Height = 2010
Index = 4
Left = 60
Picture = "frmWiz1.frx":14C1A
Stretch = -1 'True
Top = 60
Width = 2010
End
Begin VB.Label lblFieldsForLine
Caption = "Fields for the line"
Height = 255
Left = 2400
TabIndex = 18
Top = 360
Width = 4635
End
End
Begin VB.Frame fraStep
Caption = "SkipLines"
Height = 3975
Index = 16
Left = 120
TabIndex = 115
Top = 540
Width = 7335
Begin VB.TextBox txtNumLinesToSkip
Height = 285
Left = 2460
TabIndex = 116
Text = "0"
Top = 1140
Width = 675
End
Begin VB.Image imgImage
Appearance = 0 'Flat
BorderStyle = 1 'Fixed Single
Height = 2010
Index = 16
Left = 60
Picture = "frmWiz1.frx":1541C
Stretch = -1 'True
Top = 60
Width = 2010
End
Begin VB.Label lblHelp
Height = 1755
Index = 16
Left = 60
TabIndex = 118
Top = 2220
Width = 1995
End
Begin VB.Label Label21
Caption = $"frmWiz1.frx":1BDFE
Height = 855
Left = 2460
TabIndex = 117
Top = 240
Width = 4515
End
End
Begin VB.Frame fraStep
Caption = "InputDescription"
Height = 3975
Index = 12
Left = 660
TabIndex = 95
Top = 120
Width = 7335
Begin VB.Label Label7
Caption = $"frmWiz1.frx":1BEE7
Height = 1155
Left = 2460
TabIndex = 99
Top = 2040
Width = 4695
End
Begin VB.Label Label5
Caption = $"frmWiz1.frx":1BFAB
Height = 1455
Left = 2460
TabIndex = 98
Top = 600
Width = 4695
End
Begin VB.Label Label4
Caption = "This part of the Wizard will guide you through defining the Input Source which contains the data you wish to import."
Height = 495
Left = 2460
TabIndex = 97
Top = 120
Width = 4695
End
Begin VB.Label lblHelp
Caption = "Define the input"
Height = 1755
Index = 12
Left = 60
TabIndex = 96
Top = 2220
Width = 1995
End
Begin VB.Image imgImage
Appearance = 0 'Flat
BorderStyle = 1 'Fixed Single
Height = 2010
Index = 12
Left = 60
Picture = "frmWiz1.frx":1C149
Stretch = -1 'True
Top = 60
Width = 2010
End
End
Begin VB.Frame fraStep
Caption = "OutputProperties"
Height = 3975
Index = 5
Left = 4620
TabIndex = 47
Top = 2460
Width = 7335
Begin VB.OptionButton rbNoSchema
Caption = "Don't add a schema at this time"
Height = 195
Left = 2340
TabIndex = 56
Top = 1860
Width = 4095
End
Begin VB.OptionButton rbSelectExistingSchema
Caption = "Select an existing output schema"
Height = 195
Left = 2340
TabIndex = 51
Top = 1140
Value = -1 'True
Width = 4095
End
Begin VB.OptionButton rbManuallyEnterSchema
Caption = "Enter an output schema manually"
Height = 195
Left = 2340
TabIndex = 55
Top = 1620
Width = 4095
End
Begin VB.OptionButton rbImportSchema
Caption = "Import schema from an ODBC database"
Height = 195
Left = 2340
TabIndex = 53
Top = 1380
Width = 4455
End
Begin VB.Label Label6
Caption = $"frmWiz1.frx":1C94B
Height = 855
Left = 2400
TabIndex = 52
Top = 180
Width = 4875
End
Begin VB.Image imgImage
Appearance = 0 'Flat
BorderStyle = 1 'Fixed Single
Height = 2010
Index = 5
Left = 60
Picture = "frmWiz1.frx":1CA4A
Stretch = -1 'True
Top = 60
Width = 2010
End
Begin VB.Label lblHelp
Caption = "You will need some sort of output device. This part of the wizard will assist you in creating an output source."
Height = 1755
Index = 5
Left = 60
TabIndex = 48
Top = 2220
Width = 1995
End
End
Begin VB.Frame fraStep
Caption = "SelectExistingSchema"
Height = 3975
Index = 7
Left = 3000
TabIndex = 49
Top = 2460
Width = 7335
Begin VB.ListBox lstSelectedSchemas
Appearance = 0 'Flat
Height = 1050
IntegralHeight = 0 'False
Left = 2400
Sorted = -1 'True
TabIndex = 94
Top = 2520
Width = 3855
End
Begin VB.ListBox lstOutputSources
Appearance = 0 'Flat
Height = 1050
IntegralHeight = 0 'False
Left = 2400
Sorted = -1 'True
TabIndex = 93
Top = 360
Width = 3855
End
Begin VB.CommandButton btnRemoveSchema
Caption = "Remove Schema"
Height = 315
Left = 4800
TabIndex = 92
Top = 2100
Width = 1455
End
Begin VB.CommandButton btnAddSchema
Caption = "Add Schema"
Height = 315
Left = 4800
TabIndex = 91
Top = 1500
Width = 1455
End
Begin VB.CommandButton btnBrowseForSchemas
Caption = "&Browse..."
Height = 375
Left = 6360
TabIndex = 78
Top = 360
Width = 855
End
Begin MSComDlg.CommonDialog dlgCommon
Left = 6660
Top = 3300
_ExtentX = 847
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -