Foxtable(狐表)用户栏目专家坐堂 → 请教一下代码如何放入foxtable


  共有1916人关注过本帖平板打印复制链接

主题:请教一下代码如何放入foxtable

帅哥哟,离线,有人找我吗?
ljh29206
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1367 积分:12148 威望:0 精华:0 注册:2012/3/5 11:32:00
请教一下代码如何放入foxtable  发帖心情 Post By:2018/5/15 15:16:00 [只看该作者]

'作用获取当前鼠标位置'

Private Structure POINTAPI
Dim x As Long
Dim y As Long
End Structure

Private Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long
'------------全局代码'


'--------------命令提示框'
 Dim z As POINTAPI
GetCursorPos(z)
Output.Show(z.x & z.y)

提示没定义类型

[此贴子已经被作者于2018/5/15 15:21:18编辑过]

 回到顶部