Api定义错了.Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long 第一个参数Hwnd是窗口名柄.是长整型的.%代表Integer. 用Api浏览器吧.不要太相信自已.
看看你的代码如何??
Public Declare Function SetWindowPos Lib "user32" (ByVal H%, ByVal hb%, ByVal X%, ByVal Y%, ByVal cx%, ByVal cy%, ByVal F%) As Integer
调用:
SetWindowPos Me.hwnd, HWND_TOPMOST, 0, 0, 0, 0, FLAGS
第一个参数Hwnd是窗口名柄.是长整型的.%代表Integer.
用Api浏览器吧.不要太相信自已.
%:integer
&:long