好心人帮我弄弄这个,看看这个程序哪里错了,怎么改吧~~~谢谢呀
来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/10/05 03:04:51
好心人帮我弄弄这个,看看这个程序哪里错了,怎么改吧~~~谢谢呀
Private Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long
Private Declare Function WindowFromPoint Lib "user32" (ByVal xPoint As Long, ByVal yPoint As Long) As Long
Private Declare Function GetWindowText Lib "user32" Alias "GetWindowTextA" (ByVal hwnd As Long, ByVal lpString As String, ByVal cch As Long) As Long
Private Declare Function SetWindowText Lib "user32" Alias "SetWindowTextA" (ByVal hwnd As Long, ByVal lpString As String) As Long
Private Type POINTAPI
x As Long
y As Long
Private Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long
Private Declare Function WindowFromPoint Lib "user32" (ByVal xPoint As Long, ByVal yPoint As Long) As Long
Private Declare Function GetWindowText Lib "user32" Alias "GetWindowTextA" (ByVal hwnd As Long, ByVal lpString As String, ByVal cch As Long) As Long
Private Declare Function SetWindowText Lib "user32" Alias "SetWindowTextA" (ByVal hwnd As Long, ByVal lpString As String) As Long
Private Type POINTAPI
x As Long
y As Long
在最后加一个end Type,如下
Private Type POINTAPI
x As Long
y As Long
End Type
调用坐标的方法如下:
Dim P1 As POINTAPI
GetCursorPos P1
Label1.Caption = CStr(P1.x) & "," & CStr(P1.y)
Private Type POINTAPI
x As Long
y As Long
End Type
调用坐标的方法如下:
Dim P1 As POINTAPI
GetCursorPos P1
Label1.Caption = CStr(P1.x) & "," & CStr(P1.y)
帮我看看这个程序哪里出错了
请好心人帮我看看这个程序的错误
帮我看看这个程序哪里出错了 怎么输出的是负数
请高手帮我看看这个程序错在哪里?
matlab初学,很菜~哪个好心人帮我看看这个程序错在哪了……感激不尽
有没有LINGO高手呀,帮我看看这个程序哪里出错了,
请大家看看这个MATLAB程序哪里出了错?如何改?
C语言开关灯问题,麻烦大神们帮我看看这个程序哪里错了啊,结果不对啊!
请高手来帮我看看这个matlab程序哪里错了 提示Error using ==> mtimes Inner matrix
帮我看看这个英语句子有没有错,错了怎么改?
大家看看这个lingo程序哪里错了啊····谢谢各位
matlab程序 大神帮忙看看哪里错了 怎么改 能改出来的还加分! 谢谢!