📄 marqueetext.ctl
字号:
VERSION 5.00
Begin VB.UserControl MarqueeText
Alignable = -1 'True
CanGetFocus = 0 'False
ClientHeight = 255
ClientLeft = 0
ClientTop = 0
ClientWidth = 3390
LockControls = -1 'True
ScaleHeight = 255
ScaleWidth = 3390
Begin VB.Timer tmrMarquee1
Index = 0
Interval = 20
Left = 720
Top = 960
End
Begin VB.Timer tmrMarquee1
Enabled = 0 'False
Index = 1
Interval = 20
Left = 1440
Top = 1440
End
Begin VB.Label lblMarquee
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "Marquee"
Height = 195
Left = 0
TabIndex = 0
Top = 0
Width = 630
End
End
Attribute VB_Name = "MarqueeText"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = True
Attribute VB_PredeclaredId = False
Attribute VB_Exposed = False
Attribute VB_Ext_KEY = "PropPageWizardRun" ,"Yes"
'*********************************************************
'* Devloped By: Rohit Kumat Chaudhary *
'* Email:rohit_209@yahoo.com *
'*
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -