VB6.0中实现字体闪烁效果

 时间:2024-10-12 00:37:59

1、(1)创建一个新目标文件(project1),并建立一个窗体Form1。  (2)在Form1上配置一个计时器控制Timer1、标签控件Label1、命令控件Command1。 硷增浑叶 (3)各控件属性设置:  Timer1的Enabled设置为True;  Label1的Caption设置为需闪烁的字体:“江西省黎川县职业中专电脑室设计”、Font设置字体及大小、Backstyle设置为“0-Transparent”;  Command1中的Caption设置为“退出”。

VB6.0中实现字体闪烁效果

3、′设置字体闪烁间隔时间  Form1.Windowstate=2  End Sub  ′利用计时器控件Timer有规律地改变字体颜色(Forecolor)  Private Sub Timer1_Timer()  Chc Label1,1,4,8  End Sub

VB6.0中实现字体闪烁效果

5、Cont.Tag=Color1  End If  Cont.ForeColor=QBColor(Cont.Tag)  End Sub

VB6.0中实现字体闪烁效果

7、 程序除标签控件外,还适用于许多VB基本控件,实现诸多闪烁效果,例如:闪烁文本框、闪烁文件列表框等,极大丰富了VB应用程序界面,相当实用。

VB6.0中实现字体闪烁效果
  • C#winform实现在datagridview中输入数据并计算
  • C语言如何强制转换字符类型
  • 如何使用python语言中的array进行访问数组
  • 在vfp中,如何输入日期型常量?
  • GCD函数:计算整数的最大公约数
  • 热门搜索
    乘号怎么打 波司登羽绒服怎么样 经痛怎么缓解 股癣怎么引起的 宫保鸡丁的做法家常菜 怎样煮猪肝好吃 千分尺怎么用 最好吃的零食 青春期男孩长高方法 炸带鱼的家常做法