使用API函数GetCursorPos,返回鼠标在屏幕的坐标
解决方案 »
- 如何开发用右键弹出菜单,并要求带图标
- 在当前系统中,当用户点击日结时,系统自动把数据库中的A表,B表,C表中的数据分别生成txt文件,并且生成的文件名的命名是:A:字段1+字段
- 如何得到一个二维数祖的各维的大小呢?
- 关于recordset的一个小问题
- 用VB做一个词典都有哪些思路?
- 一个语音转换软件的问题,希望各位帮忙!!!100分相赠!!!
- 只有360分,所以少了些.请教softrain(秋雨)和各位,对win2k下"设备管理器"窗口里子项的操作
- 请教:有关于错误处理的问题
- 关于窗体的高度!为什么最大是12960,我要调再大怎么办
- 如何显示文本???
- vb中如何判断本程序窗口是否是当前程序窗口?
- 怎样安全地对文件进行操作
x As Long
y As Long
End Type
Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long
Dim lResult As Long
Dim lpPoint As POINTAPI
Dim iCounter As Integer
lResult = GetCursorPos(lpPoint)lpPoint.x,lpPoint.y为鼠标的位置