📄 from.frm
字号:
VERSION 5.00
Begin VB.Form ControlForm
BackColor = &H00D0D0D0&
BorderStyle = 3 'Fixed Dialog
Caption = "OpenPlayer"
ClientHeight = 7470
ClientLeft = 4740
ClientTop = 1020
ClientWidth = 4890
ForeColor = &H00FF8080&
Icon = "From.frx":0000
KeyPreview = -1 'True
LinkTopic = "Form2"
MaxButton = 0 'False
Picture = "From.frx":08CA
ScaleHeight = 7470
ScaleWidth = 4890
WhatsThisHelp = -1 'True
Begin VB.Timer SpeedTimer
Enabled = 0 'False
Interval = 80
Left = 2430
Top = 1755
End
Begin VB.Frame PropertiyFrame
Appearance = 0 'Flat
BackColor = &H00D0D0D0&
BorderStyle = 0 'None
ForeColor = &H80000008&
Height = 2295
Left = 60
TabIndex = 23
Top = 2565
Width = 4935
Begin VB.PictureBox Picture1
Height = 525
Left = 3180
ScaleHeight = 465
ScaleWidth = 855
TabIndex = 25
Top = 960
Visible = 0 'False
Width = 915
End
Begin VB.ComboBox ComboAddr
Appearance = 0 'Flat
ForeColor = &H00000000&
Height = 300
ItemData = "From.frx":1980
Left = 810
List = "From.frx":1982
TabIndex = 24
Top = 180
Width = 3825
End
Begin VB.Line Line10
BorderColor = &H80000005&
Index = 1
X1 = 4740
X2 = 4740
Y1 = 2250
Y2 = -60
End
Begin VB.Line Line10
Index = 0
X1 = 4800
X2 = 4800
Y1 = -90
Y2 = 2280
End
Begin VB.Line Line5
BorderColor = &H80000000&
X1 = 4740
X2 = 4740
Y1 = -60
Y2 = 2250
End
Begin VB.Label PropertiyLabelLabel
BackStyle = 0 'Transparent
Caption = "电影属性："
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF0000&
Height = 225
Left = 60
TabIndex = 35
Top = 570
Width = 1035
End
Begin VB.Label PropertiyLabel
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "文件名 ：未知"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000FF&
Height = 180
Index = 0
Left = 60
TabIndex = 34
Top = 750
Width = 1290
End
Begin VB.Label PropertiyLabel
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "大 小：未知"
ForeColor = &H000080FF&
Height = 180
Index = 1
Left = 60
TabIndex = 33
Top = 930
Width = 1260
End
Begin VB.Label PropertiyLabel
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "完成日期：未知"
ForeColor = &H000080FF&
Height = 180
Index = 3
Left = 60
TabIndex = 32
Top = 1110
Width = 1260
End
Begin VB.Label PropertiyLabel
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "帧 数：未知"
ForeColor = &H000080FF&
Height = 180
Index = 4
Left = 60
TabIndex = 31
Top = 1470
Width = 1260
End
Begin VB.Label PropertiyLabel
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "速 度：未知"
ForeColor = &H000080FF&
Height = 180
Index = 5
Left = 60
TabIndex = 30
Top = 1650
Width = 1260
End
Begin VB.Label PropertiyLabel
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "高 × 宽：未知"
ForeColor = &H000080FF&
Height = 180
Index = 6
Left = 60
TabIndex = 29
Top = 1830
Width = 1260
End
Begin VB.Label PropertiyLabel
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "估计时间：未知"
ForeColor = &H000080FF&
Height = 180
Index = 7
Left = 60
TabIndex = 28
Top = 2010
Width = 1260
End
Begin VB.Label PropertiyLabel
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "版 本：未知"
ForeColor = &H000080FF&
Height = 180
Index = 2
Left = 60
TabIndex = 27
Top = 1290
Width = 1260
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "地址(&D)："
Height = 255
Left = 60
TabIndex = 26
Top = 210
Width = 945
End
Begin VB.Line Line1
X1 = 0
X2 = 0
Y1 = 0
Y2 = 2250
End
Begin VB.Line Line3
BorderColor = &H00FFFFFF&
X1 = 4740
X2 = 0
Y1 = 2250
Y2 = 2250
End
End
Begin VB.Timer SearchTimer
Enabled = 0 'False
Left = 3240
Top = 6930
End
Begin VB.Timer FileTimer
Interval = 100
Left = 4320
Top = 1350
End
Begin VB.ListBox List
Columns = 1
Height = 780
Index = 5
Left = 5580
TabIndex = 20
Top = 6150
Visible = 0 'False
Width = 675
End
Begin VB.ListBox List
Columns = 1
Height = 780
Index = 3
Left = 5550
TabIndex = 18
Top = 5340
Visible = 0 'False
Width = 675
End
Begin VB.ListBox List
Columns = 1
Height = 780
Index = 1
Left = 5550
TabIndex = 17
Top = 4500
Visible = 0 'False
Width = 675
End
Begin VB.Timer ProgressTimer
Interval = 100
Left = 870
Top = 1290
End
Begin VB.Frame ListFrame
Appearance = 0 'Flat
BackColor = &H00D0D0D0&
BorderStyle = 0 'None
Caption = "Frame2"
ForeColor = &H80000008&
Height = 2385
Left = 15
TabIndex = 9
Top = 5100
Width = 4965
Begin VB.Frame StatusFrame
BackColor = &H00FFC0C0&
BorderStyle = 0 'None
Height = 235
Left = 120
TabIndex = 15
Top = 1750
Visible = 0 'False
Width = 4315
Begin VB.Label StatusLabel
Appearance = 0 'Flat
AutoSize = -1 'True
BackColor = &H80000006&
BackStyle = 0 'Transparent
ForeColor = &H00E3E3E3&
Height = 240
Left = 30
TabIndex = 16
Top = 30
Width = 4095
End
End
Begin VB.ListBox List
Appearance = 0 'Flat
BackColor = &H00FFFFFF&
BeginProperty Font
Name = "黑体"
Size = 9
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00404040&
Height = 2010
Index = 4
Left = 90
TabIndex = 0
Top = 0
Visible = 0 'False
Width = 4635
End
Begin VB.ListBox List
Appearance = 0 'Flat
BackColor = &H00FFFFFF&
BeginProperty Font
Name = "黑体"
Size = 9
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00ED6196&
Height = 2010
Index = 2
Left = 90
TabIndex = 19
Top = 0
Visible = 0 'False
Width = 4635
End
Begin VB.ListBox List
Appearance = 0 'Flat
BackColor = &H00FFFFFF&
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF0000&
Height = 2010
Index = 0
Left = 90
TabIndex = 10
Top = 0
Width = 4635
End
Begin VB.Line Line11
X1 = 90
X2 = 90
Y1 = 810
Y2 = 2280
End
Begin VB.Line Line4
X1 = 30
X2 = 4920
Y1 = 2340
Y2 = 2340
End
Begin VB.Line Line9
X1 = 4860
X2 = 4860
Y1 = 0
Y2 = 2340
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -