📄 ftest.frm
字号:
VERSION 5.00
Begin VB.Form fTest
BorderStyle = 3 'Fixed Dialog
Caption = "精美进度条控件源码 Ver1.2"
ClientHeight = 6855
ClientLeft = 45
ClientTop = 330
ClientWidth = 7305
ClipControls = 0 'False
Icon = "fTest.frx":0000
LinkTopic = "Form1"
LockControls = -1 'True
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 457
ScaleMode = 3 'Pixel
ScaleWidth = 487
ShowInTaskbar = 0 'False
StartUpPosition = 2 '屏幕中心
Begin Test.ucProgressBar ucProgressBar7
Height = 180
Left = 315
Top = 5670
Width = 3330
_extentx = 5874
_extenty = 318
max = 10
mouseicon = "fTest.frx":000C
font = "fTest.frx":016E
barpicturefore = "fTest.frx":0196
barpictureback = "fTest.frx":213A
mousepointer = 99
mouseicon = "fTest.frx":40DE
End
Begin Test.ucProgressBar ucProgressBar6
Height = 1590
Index = 0
Left = 5295
Top = 2580
Width = 180
_extentx = 318
_extenty = 2805
max = 34
orientation = 1
font = "fTest.frx":4240
barpicturefore = "fTest.frx":4268
barpictureback = "fTest.frx":51A4
End
Begin Test.ucProgressBar ucProgressBar5
Height = 225
Left = 345
Top = 4290
Width = 3375
_extentx = 5953
_extenty = 397
captioncustom = "005 of 100"
captionformat = 99
fontcolor = 16777215
font = "fTest.frx":60E0
barpicturefore = "fTest.frx":6108
barpictureback = "fTest.frx":88F8
End
Begin Test.ucProgressBar ucProgressBar4
Height = 225
Left = 345
Top = 3540
Width = 3375
_extentx = 5953
_extenty = 397
captionformat = 4
max = 300
min = -300
value = -300
fontcolor = 16777215
font = "fTest.frx":B0E8
barpicturefore = "fTest.frx":B110
barpictureback = "fTest.frx":D900
End
Begin Test.ucProgressBar ucProgressBar3
Height = 225
Left = 345
Top = 3210
Width = 3375
_extentx = 5953
_extenty = 397
captionformat = 5
max = 300
min = -300
value = -300
fontcolor = 16777215
font = "fTest.frx":100F0
barpicturefore = "fTest.frx":10118
barpictureback = "fTest.frx":12908
End
Begin Test.ucProgressBar ucProgressBar2
Height = 225
Left = 345
Top = 2880
Width = 3375
_extentx = 5953
_extenty = 397
captionformat = 1
max = 300
min = -300
value = -300
fontcolor = 16777215
font = "fTest.frx":150F8
barpicturefore = "fTest.frx":15120
barpictureback = "fTest.frx":17910
End
Begin Test.ucProgressBar ucProgressBar1
Height = 435
Left = 390
Top = 660
Width = 4305
_extentx = 7594
_extenty = 767
font = "fTest.frx":1A100
barpicturefore = "fTest.frx":1A128
barpictureback = "fTest.frx":2035C
End
Begin VB.CommandButton btnPlay2
Caption = "开始"
Height = 345
Left = 5700
TabIndex = 10
Top = 4275
Width = 750
End
Begin VB.CommandButton cmdGo
Caption = "跑!"
Height = 345
Left = 3915
TabIndex = 6
Top = 3135
Width = 750
End
Begin VB.CommandButton cmdGo2
Caption = "跑!"
Height = 345
Left = 3915
TabIndex = 8
Top = 4215
Width = 750
End
Begin VB.HScrollBar sbSample1
CausesValidation= 0 'False
Height = 195
Left = 390
Max = 100
TabIndex = 1
TabStop = 0 'False
Top = 1185
Width = 4305
End
Begin VB.CommandButton btnPlay
Caption = "开始"
Height = 345
Left = 2175
TabIndex = 2
Top = 1455
Width = 750
End
Begin VB.ListBox lstEvents
Appearance = 0 'Flat
BeginProperty Font
Name = "Tahoma"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 1200
Left = 5010
TabIndex = 3
TabStop = 0 'False
Top = 660
Width = 1980
End
Begin Test.ucProgressBar ucProgressBar6
Height = 1590
Index = 1
Left = 5490
Top = 2580
Width = 180
_extentx = 318
_extenty = 2805
max = 34
orientation = 1
font = "fTest.frx":26590
barpicturefore = "fTest.frx":265B8
barpictureback = "fTest.frx":274F4
End
Begin Test.ucProgressBar ucProgressBar6
Height = 1590
Index = 2
Left = 5685
Top = 2580
Width = 180
_extentx = 318
_extenty = 2805
max = 34
orientation = 1
font = "fTest.frx":28430
barpicturefore = "fTest.frx":28458
barpictureback = "fTest.frx":29394
End
Begin Test.ucProgressBar ucProgressBar6
Height = 1590
Index = 3
Left = 5880
Top = 2580
Width = 180
_extentx = 318
_extenty = 2805
max = 34
orientation = 1
font = "fTest.frx":2A2D0
barpicturefore = "fTest.frx":2A2F8
barpictureback = "fTest.frx":2B234
End
Begin Test.ucProgressBar ucProgressBar6
Height = 1590
Index = 4
Left = 6075
Top = 2580
Width = 180
_extentx = 318
_extenty = 2805
max = 34
orientation = 1
font = "fTest.frx":2C170
barpicturefore = "fTest.frx":2C198
barpictureback = "fTest.frx":2D0D4
End
Begin Test.ucProgressBar ucProgressBar6
Height = 1590
Index = 5
Left = 6270
Top = 2580
Width = 180
_extentx = 318
_extenty = 2805
max = 34
orientation = 1
font = "fTest.frx":2E010
barpicturefore = "fTest.frx":2E038
barpictureback = "fTest.frx":2EF74
End
Begin Test.ucProgressBar ucProgressBar6
Height = 1590
Index = 6
Left = 6465
Top = 2580
Width = 180
_extentx = 318
_extenty = 2805
max = 34
orientation = 1
font = "fTest.frx":2FEB0
barpicturefore = "fTest.frx":2FED8
barpictureback = "fTest.frx":30E14
End
Begin Test.ucProgressBar ucProgressBar6
Height = 1590
Index = 7
Left = 6660
Top = 2580
Width = 180
_extentx = 318
_extenty = 2805
max = 34
orientation = 1
font = "fTest.frx":31D50
barpicturefore = "fTest.frx":31D78
barpictureback = "fTest.frx":32CB4
End
Begin Test.ucProgressBar ucProgressBar8
Height = 180
Left = 315
Top = 5985
Width = 3330
_extentx = 5874
_extenty = 318
mouseicon = "fTest.frx":33BF0
font = "fTest.frx":33D52
barpicturefore = "fTest.frx":33D7A
barpictureback = "fTest.frx":35D1E
mousepointer = 99
mouseicon = "fTest.frx":37CC2
End
Begin Test.ucProgressBar ucProgressBar9
Height = 180
Left = 315
Top = 6300
Width = 3330
_extentx = 5874
_extenty = 318
max = 50000
mouseicon = "fTest.frx":37E24
font = "fTest.frx":37F86
barpicturefore = "fTest.frx":37FAE
barpictureback = "fTest.frx":39F52
mousepointer = 99
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -