computer 版 (精华区)

发信人: windoe (为中国电信做贡献), 信区: program
标  题: VB:我想换掉鼠标显示的形状，怎么做？
发信站: 听涛站 (Fri Mar 10 19:08:56 2000), 转信

VB提供的系统控件一般都有MousePointer和MouseIcon属性。
我们可以寻找自己喜欢的*.ICO,*.CUR文件，实现的程序如下：
Screen.MousePointer= 99 ’用户鼠标类型
Screen.MouseIcon=LoadPicture("C:\ABC\1.ICO") ’读取鼠标文件
Screen.MouseIcon=LoadPicture("C:\ABC\1.ICO") ’读取鼠标文件


--By Kammi's SuperPost General Version
--

夜中不能寐，起坐弹鸣琴。
    薄帷鉴明月，清风吹我襟。
孤鸿号外野，翔鸟鸣北林。
    徘徊将何见，忧思独伤心。


※ 来源:．听涛站 cces.net．[FROM: 匿名天使的家]