【VB开源代码栏目提醒】:网学会员在VB开源代码频道为大家收集整理了SplitFile.frm提供大家参考,希望对大家有所帮助!
VERSION 5.00
Object = "{F9043C88-F6F2-101A-A3C9-08002B2F49FB}#1.2#0"; "COMDLG32.OCX"
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "mscomctl.ocx"
Begin VB.Form frmsplit
BorderStyle = 1 'Fixed Single
Caption = "文件分割合并系统"
ClientHeight = 5610
ClientLeft = 45
ClientTop = 330
ClientWidth = 8055
KeyPreview = -1 'True
LinkTopic = "Form1"
MaxButton = 0 'False
ScaleHeight = 5610
ScaleWidth = 8055
StartUpPosition = 3 'Windows Default
Begin MSComctlLib.ImageList ImageList2
Left = 600
Top = 4080
_ExtentX = 1005
_ExtentY = 1005
BackColor = -2147483643
ImageWidth = 16
ImageHeight = 16
MaskColor = 12632256
_Version = 393216
BeginProperty Images {2C247F25-8591-11D1-B16A-00C0F0283628}
NumListImages = 1
BeginProperty ListImage1 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "SplitFile.frx":0000
Key = "FILE"
EndProperty
EndProperty
End
Begin MSComctlLib.ImageList ImageList1
Left = 720
Top = 3360
_ExtentX = 1005
_ExtentY = 1005
BackColor = -2147483643
ImageWidth = 32
ImageHeight = 32
MaskColor = 12632256
_Version = 393216
BeginProperty Images {2C247F25-8591-11D1-B16A-00C0F0283628}
NumListImages = 9
BeginProperty ListImage1 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "SplitFile.frx":031A
Key = "EXIT"
EndProperty
BeginProperty ListImage2 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "SplitFile.frx":0424
Key = "ABOUT"
EndProperty
BeginProperty ListImage3 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "SplitFile.frx":0876
Key = "SPLITF"
EndProperty
BeginProperty ListImage4 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "SplitFile.frx":14C8
Key = "JOIN"
EndProperty
BeginProperty ListImage5 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "SplitFile.frx":211A
Key = ""
EndProperty
BeginProperty ListImage6 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "SplitFile.frx":2D6C
Key = ""
EndProperty
BeginProperty ListImage7 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "SplitFile.frx":39BE
Key = ""
EndProperty
BeginProperty ListImage8 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "SplitFile.frx":4610
Key = "SPLIT"
EndProperty
BeginProperty ListImage9 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "SplitFile.frx":5262
Key = "TOOLS"
EndProperty
EndProperty
End
Begin MSComctlLib.ListView ListView1
Height = 5653
Left = 0
TabIndex = 0
Top = 0
Width = 1575
_ExtentX = 2778
_ExtentY = 9975
LabelEdit = 1
LabelWrap = -1 'True
HideSelection = -1 'True
OLEDragMode = 1
HotTracking = -1 'True
HoverSelection = -1 'True
_Version = 393217
Icons = "ImageList1"
ForeColor = -2147483640
BackColor = -2147483643
BorderStyle = 1
Appearance = 1
OLEDragMode = 1
NumItems = 0
End
Begin MSComDlg.CommonDialog CmDlg
Left = 5520
Top = 2520
_ExtentX = 847
_ExtentY = 847
_Version = 393216
End
Begin VB.PictureBox Picture1
BackColor = &H00C0C0C0&
Height = 5760
Index = 0
Left = 1560
ScaleHeight = 5700
ScaleWidth = 6495
TabIndex = 1
Top = 0
Width = 6555
Begin MSComctlLib.ProgressBar ProgressBar1
Height = 255
Left = -120
TabIndex = 17
Top = 360
Visible = 0 'False
Width = 6795
_ExtentX = 11986
_ExtentY = 450
_Version = 393216
BorderStyle = 1
Appearance = 1
End
Begin MSComctlLib.ListView ListView2
Height = 2715
Left = 0
TabIndex = 16
Top = 2760
Width = 6315
_ExtentX = 11139
_ExtentY = 4789
View = 3
LabelEdit = 1
LabelWrap = -1 'True
HideSelection = -1 'True
OLEDragMode = 1
_Version = 393217
Icons = "ImageList2"
SmallIcons = "ImageList2"
ForeColor = -2147483640
BackColor = 16777215
BorderStyle = 1
Appearance = 0
OLEDragMode = 1
NumItems = 2
BeginProperty ColumnHeader(1) {BDD1F052-858B-11D1-B16A-00C0F0283628}
Key = "Name"
Text = "Splitted Files"
Object.Width = 8467
EndProperty
BeginProperty ColumnHeader(2) {BDD1F052-858B-11D1-B16A-00C0F0283628}
Alignment = 1
SubItemIndex = 1
Key = "Size"
Text = "Size"
Object.Width = 2682
EndProperty
End
Begin VB.Frame FraAbout
BorderStyle = 0 'None
Height = 5055
Left = 0
TabIndex = 30
Top = 600
Width = 6495
Begin
VB.PictureBox Picture2
BorderStyle = 0 'None
Height = 1095
Left = 120
Picture = "SplitFile.frx":5EB4
ScaleHeight = 1095
ScaleWidth = 1215
TabIndex = 31
Top = 360
Width = 1215
End
Begin VB.Label Label8
Height = 855
Left = 120
TabIndex = 34
Top = 4200
Width = 5415
End
Begin VB.Label Label5
Caption = "Copyright (c) 2005 ForWay"
Height = 495
Left = 3360
TabIndex = 33
Top = 1200
Width = 2295
End
Begin VB.Label Label4
Caption = "文件合分割
系统"
BeginProperty Font
Name = "Tahoma"
Size = 24