首 页 | 精品电影 | 音乐天堂 | 在线游戏 | Flash MTV | 三湘书屋 | 幽默笑话 | 三湘图库 | 美女写真 | IT知识库 | QQ贴图 | 加入书签

｜网页制作｜网络编程｜图形图象｜操作系统｜冲浪宝典｜软件教学｜网络安全｜认证考试｜通信技术｜电子商务｜业内动态｜书籍教程｜原码｜

最近更新 文章分类 多媒体类 精品软件

 本站搜索：
您的位置：三湘时空 -> IT知识库 -> 文章分类 -> VB -> 处理过程时的鼠标显示
处理过程时的鼠标显示


文章类别：VB 来源： 作者： 发表日期：2006-2-28 字体：[大 中 小]

小游戏 | 在线影院 | 幽默笑话 | 源码下载 | Flash MTV | 音乐试听 | 书屋 | 美女写真
为让你的程序更加专业一点，我们往往需要在程序处理过程时的鼠标形状显示为“沙漏”状态。我们一般的方法是在子程序的开始及结尾编程来改变鼠标形状，这样十分烦琐且容易忘记。我们还可以以下面的方法来实现这一目标：
1、创建一个新类，命名为：CHourGlass；
2、在此类中加入以下代码：
PrivateSubClass_Initialize()
Screen.MousePointer=vbHourglass
EndSub
PrivateSubClass_Terminate()
Screen.MousePointer=vbDefault
EndSub
3、在子程序的开始加入下面代码：
DimMyHourGlassAsCHourGlass
SetMyHourGlass=NewCHourGlass->

上一篇:获得MouseLeave的方法 下一篇:获得系统中鼠标的键数
本栏目热门文章
·用VB实现象Windows记事本的一些功能 2006-2-28
·DataGrid控件的使用 2006-2-28
·DataCombo和DataList控件的使用二 2006-2-28
·DataGrid控件的使用二 2006-2-28
·利用timeGetTime函数更精准地计算差 2006-2-28
·自己的IE——用VB制作浏览器 2006-2-28
·利用VBScript实现倒计时 2006-2-28
·用Winsock制作一套聊天室和对话系统 2006-2-28
·使用ADO來压缩或修复MicrosoftAccess文件 2006-2-28
·用VB尝试新的界面风格 2006-2-28
新近更新文章
·用VB实现象Windows记事本的一些功能 2006-2-28
·FLIC动画文件的播放程序设计 2006-2-28
·用VB实现浮动按钮 2006-2-28
·利用VB三维面板控件设计流动条 2006-2-28
·用VB制作即时动态按钮 2006-2-28
·用VB尝试新的界面风格 2006-2-28
·VB5.0中实现字体闪烁效果 2006-2-28
·VB5.0应用程序的启动与退出设计 2006-2-28
·用VB5.0创建Windows快捷方式 2006-2-28
·在VB中如何创建闪烁(标语)屏 2006-2-28
首 页 | 软件发布 | 广告联系 | 下载帮助 | 意见反馈 | 网站地图
　 CopyRight? 2002-2004 WWW.SXSKY.NET? All Rights Reserved
三湘时空 站长QQ：82675303 Email: