UC知道用VB如何捕捉到鼠标形状的改变
来源：百度知道 编辑：UC知道 时间：2024/06/01 08:54:13
用VB编程,捕捉到鼠标形状的改变(比如:当鼠标形状由箭头变为手形的时候触发某事件?),然后运行一段代码?
真正有效可以追加30分
用API的也行,最好附源码.
一楼的回答得有点笼统,我想知道的是:
如何得到目前鼠标的形状?比如:在某一时刻,能否知道鼠标的形状是箭头还是手形?
另外,VB中如何判断一个打开的程序窗口是否最小化了?
=======================
Screen.MousePointer 不行啊.得到的结果总是0
真正有效可以追加30分
用API的也行,最好附源码.
一楼的回答得有点笼统,我想知道的是:
如何得到目前鼠标的形状?比如:在某一时刻,能否知道鼠标的形状是箭头还是手形?
另外,VB中如何判断一个打开的程序窗口是否最小化了?
=======================
Screen.MousePointer 不行啊.得到的结果总是0
如果不用API的话,可以先定义一个变量,比如sting型的sMouse. 当鼠标是箭头的时候,标记sMouse为箭头。 然后在timer事件里，
if sMouse 是 箭头 and 当前鼠标是 手形 then
。。。。
end if
可以用布尔型变量标记是否已经运行过了
好像不怎么实用。。。
如果用API的话，我就不知道了。
补充:我不知道用什么API.
得到鼠标形状:Screen.MousePointer
判断一个打开的程序窗口是否最小化:假设窗体名字是Form1
如果Form1.WindowState=1 那么这个窗体就是最小化了.