| 发表于:2008-01-19 10:14:24 楼主 |
现在学vb,下面是看到的一个程序段,其中有个地方不懂,请教一下,mousepointerconstants是什么啊?是类呢?还是。。。。。。。。 谢谢指教! private sub cmdresize_mousemove(button as integer, shift as integer, x as single, y as single) dim newpointer as mousepointerconstants with cmdresize if x > 0 and x < 100 then newpointer = vbsizewe elseif x > .width - 100 and x < .width then newpointer = vbsizewe else newpointer = vbdefault end if if newpointer <> .mousepointer then .mousepointer = newpointer end if end with end sub |
|
|
|
|