admin 管理员组

文章数量: 1086019


2024年3月10日发(作者:pdf软件)

维普资讯

No.3.2002 JOURNAL 0F J ILIN COMMERCIAL COLLEGE Sum No.68 

把Flash动画作成VB应用程序的封面 

金龙海王洪肖 

(吉林大学计算机教学中心 吉林长春130031) 

[摘要]本文叙述了如何将Flash动画作成应用程序封面的方法及技巧,并给出了代码实例。 

[关键词]Hash动画;GotFocus事件;Timer控件;Timer事件 

[中图分类号] G434 [文献标识码]B[文章编号] 1009--2773(2002)03-.0009-.02 

封面技术在软件开发中越来越成为一种标准, 

无论你在DOS或WINDOWS的环境下进行软件开 

发,一个漂亮而醒目的封面总会使你的软件更加充 

满魅力。 

程序的封面会是一个很好的选择。这里介绍一下如 

何将FLASH动画加到一个窗体中形成一个好的封 

面。 

1.向窗体中添加需要的控件并设置必要的属 

性 

对于WINDOWS环境下的应用软件,封面技术 

更是必不可少。一个好的应用程序要有美观实用的 

封面设计,用户封面设计是应用程序的一个重要组 

成部分。 

首先在工程中增加一个窗体,在窗体上加上以 

下控件: 

控件 描述 

应用软件的封面设计应遵循以下原则: 

在主界面载入的同时载入,封面应该清楚的显 

Flashl 

Timerl 

Te!xtl 

Sockwaveflash控件 

Timer控件 

Text控件 

示软件名称及版本信息,在主界面载人完毕后自动 

卸出内存,让出所占用的WINDOWS系统资源。 

使用微软公司的VisualBasic进行软件开发是 

WINDOWS环境下应用程序开发的捷径,同样,使 

其中flashl是ActiveX控件,用来加载Flash动画并 

播放,需从工程菜单的部件对话框中选择加到工具 

箱中。 

用VisualBasic制作应用程序封面也是相当方便的。 

在VB中,封面也是一个窗体,开发者可以在窗 

体上使用VB的绘图工具Line和Shape绘制出图 

形,甚至可以绘制出类似wORD的三维效果,也可 

以在窗体内载人一个图片框(PictureBox)或图象控 

制(1mageContro1),利用图片框或图象控制载人自 

己所喜欢的图片来制作封面,在图形之上,可以使用 

文本框(TextBox)或标签框(Labe1)来显示版本信 

息,但是大家也知道如果用一个动画作为封面的话, 

在格式菜单中设置Textl为置后,这样Flashl 

总是在textl前面,这是为了在显示封面时可以盖 

住后面的textl控件。 

将timerl的Enabled属性值设置为True, 

Interval属性值设置为100,让它每隔100秒就产生 

次Timer事件o 

2.封面设计的思路 

作为封面的flash动画必须是充满整个显示器, 

也就是说在设计时需将Flsh控件设置成屏幕大 a

小,但是这样一来运行程序之后会发现不管怎样也 

不能转移到另一个窗体,于是我们在这里可以利用 

下面这样一个技巧:在Timerl控件的Timer事件里 

应该来说更加醒目、更加有动感。而今制作动画的 

软件非常多,其中网页三剑客之一的FLASH5.0做 

出来的动画既不缺乏三维动画的感觉,也不象3D 

做出来的那样庞大,如果用FLASH动画做为应用 

+收稿日期:2002—07—15 

9 

维普资讯

加入text1.setfocus和flag:l这样两条语句,每隔一 

定时间就让它发生一次Timer事件,在事件里使 

Text1控件得到焦点,并且使flag标志变为l,又在 

lfashl的Gotfocus事件里判断当flag=l时卸载当 

End With 

End Function 

Private Sub Form—Unload(Cancel As Integer) 

loginforlT1.Show 

End Sub 

前窗体,并转移到我们所需要的主窗体中,这样当我 

们用鼠标单击flashl控件时,此控件得到焦点,发生 

Gotfocus事件,就能退出此窗体。 

3.封面设计的实例编程 

将已经制作好的Flash影片放在与应用程序同 

Private Sub Timetl—met() 

lag:l f

Text1.SetFocus 

End Sub 

个目录内,并且在窗体的代码窗口中加入以下代 

Dim flag As Integer 

4.结束语 

码: 

总之,一个好的应用程序不仅要有强大的功能, 

还要有美观实用的用户封面,一个应用程序的封面 

Private Sub fashl—GotFocus() 

If flag=l Then 

Unload Me 

End If 

End Sub 

美观与否往往决定了该程序给用户的第一印象,用 

上面介绍的方法将Fash动画作成封面是每一个程 

序设计人员的最佳选择。 

出版社.2000 

考文献 

1.王福成.VB6.0数据库开发指南.清华大学 

2.朱锦坤.VB6.0多媒体与因特网应用.清华 

i 

Private Sub Form.Load() 

flag=0 

Play Flash Movie App.Path& 

fjrst.s ” 

大学出版社,1999 

3.刘强.VB软件封面技术探秘.网上开发大 

本营,2000 

End Sub 

Public Function PlayFlashMovie(Filename As 

String) 

With flash1 

4.Flyfox,VB中用户界面的设计原则.网上编 

程文摘,2000 

5.林建仁.VB6.x程序设计.铁道出版社, 

1999 

Movie:Filename 

Play 

责任编辑:李绍宁 

Serving FlaSh Animation as the Cover of VB 

Application 

Jin Longhai Wang Hongxiao 

(Computer Teaching Center of JiLin University) 

Abstract:A beautiful and practical cover design is necessary for a nice applicatiOn,and user cover design is 

an important part of application program.After programming,a cover Which is made by Flash animation will 

produce more attractive for the software.The paper tells US the ways and skills about how to make Flash 

animation into the cover of VB appliaticon,and it alo soffers code examples. 

Key Words:Flash animation;GotFocus event;Timer control;Timer event 

10 


本文标签: 封面 窗体 动画 控件