English Sentence Loading...
英语句子加载中...
Tag: 下雪预览模式: 普通 | 列表

用VB制作下雪的特技景象

对于下雪的景象大家可能都不陌生,我们还是用VB来制作一个下雪的景象吧。其实制作这样一个下雪的景象并不复杂,它的原理是首先在底色为黑色的屏幕上随机画出许多白点(雪花),然后使这些雪花不断地向下移动(重画),反复循环,就成功地模拟了下雪的景象。下面是这个小程序,你可以修改其中的一些数据调整雪花的密度和雪花落下的快慢。
Dim Snow(1000, 2), Amounty As Integer
Private Sub Form_Load()
     Form1.Show
     DoEvents

查看更多...

Tags: VB 下雪 特技

分类:技术文章 | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 1484