软件下载 | 资讯教程 | 最近更新 | 下载排行 | 一键转帖 | 发布投稿
您的位置:最火下载站 > 源码下载 > VB源码 > 系统相关 > 一个弹跳的小球效果,VB编写的屏幕保护程序下载

一个弹跳的小球效果,VB编写的屏幕保护程序

  • 资源语言:简体中文
  • 资源类型:国产软件
  • 资源大小:9 KB
  • 资源等级:3星级
  • 相关链接:Home Page
  • 资源性质:免费版
运行环境:windows/vb6.0
更新时间:2010-12-30 21:57:04
有无插件:无插件

一个完备的屏保程序的实例,说明:

1)支持屏保参数设置,动态改变小球数目

2)编译成.scr文件后,拷入windows目录下,即可在显示属性中调用

3)支持命令行参数

以下的六个子过程,都用来判断屏保是否应该终止:

Sub Form_Click()用户单击鼠标时

Sub Form_DblClick()用户双击鼠标时

Sub Form_KeyDown用户按下某一个键时

Sub Form_KeyPress用户按某一个键时

Sub Form_MouseDown用户按下鼠标时

Sub Form_MouseMove用户移动鼠标时

如果处于全屏屏保状态,则终止屏保程序

当小球圆心坐标值小于其半径值时(碰左边壁时),反弹,并把运动方向参数 BallVx 置反,这样小球会反向运动

或当小球球心坐标值大于屏幕宽与半径差值(碰右边壁时),反弹并把运动方向参数 BallVx 置反,这样小球会反向运动,参照X项解释去理解,X、Y方向的运动的综合,便是小球的实际运动轨迹,在(BallX、BallY)坐标处,以BallR为半径,以BallClr为填充色,重画小球。

 报告下载错误
点击链接开始下载
本类最新
相关教程
下载说明
栏目导航
推荐软件