首页 相关文章 用VB实现“ICQ”式的启动欢迎画面

用VB实现“ICQ”式的启动欢迎画面

第一次运行,或通过运行程序的方式来启动ICQ时,随着一声火车的长鸣,我们都能看到一朵背景为透空的大花,这就是ICQ独特的欢迎画面!通常,我们都是用一整个带图形及文字的窗体来做为欢迎画面的。我们要如何去做才能实现类ICQ的欢迎画面呢?这看起来像是件十分复杂的工作,其实,利用了强大的API函数,事情就会变得非常的简单。出于简单化的考虑,我使用VB6.0简体中文企业版来完成这一例程。
  首先要准备好做为欢迎画面所需要的图片,然后对图片进行简单的处理,把需要透空的地方填上纯白色(255,255,255),然后保存为*.bmp文件,这用PhotoShop可以很容易地实现。需要注意的是,图片必须为“索引色”模式,如果不是就需用PhotoShop来修改,否则不能实现透空效果。  先建立一个标准EXE工程,在窗体上文稿放置一个Picture控件,控件名为Picture1,和一个Timer控件,控件名为Timer1,Interval属性设置为2000。
  原程序如下:
  OptionExplicit
  `定义获取桌面HDC的api函数
  PrivateDeclareFunctionGetDCLib“user32”(ByValhwndAsLong)AsLong[ 查看全文 ]

2016-02-19 标签:

用VB实现“ICQ”式的启动欢迎画面的相关文章

手机页面
收藏网站 回到头部