下载地址：
下载地址1（本站为飞网专业下载站，域名：down.cfei.net）
资源简介：
摘要:VB源码,图形处理,VB恶搞程序,屏幕抖动 再分享一个Vb恶搞程序，屏幕抖动下雪，下雪API声明（摘录）： GetDC()功能是获取指定窗体的设备场景的句柄(hDC),用参数0则可以获取整个屏幕的场景句柄 GetPixel用于取得场景(这里是整个屏幕)中某点的颜色值 释放由GetDC()获取的设备场景句柄，否则可能造成系统锁死 定义“区域”数据结构，但实际上并没有用到，因为仅需在函数InvalidateRect中传递一个空的RECT参数 Dim rect1 As RECT Private Const ScrnWidth = 1024 ‘屏幕宽度(单位:像素) Private Const ScrnHight = 768 ‘屏幕高度(单位:像素) Private Const SnowCol = &HFEFFFE ‘雪花颜色 Private Const SnowColDown = &HFFFFFF ‘积雪颜色 Private Const SnowColDuck = &HFFDDDD ‘深色积雪颜色 Private Const SnowNum
飞网下载站，免费下载共享资料，内容涉及教育资源、专业资料、IT资源、娱乐生活、经济管理、办公文书、游戏资料等。
