程序不知道错在哪里?(DLL的调用问题)
zsabc 2003-08-19 10:36:51 以下是vs2003环境下的vb.net windows应用程序,目的是获取标题为“未定标题-记事本”的窗口的句柄,调整窗口大小,将其移动到屏幕左上角。运行程序后,打开的记事本窗口却没有反应,不知错在哪里,希望大家帮帮忙,谢谢!
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim hWnd As Integer = FindWindow(Nothing, "未定标题-记事本")
If hWnd <> 0 Then MoveWindow(hWnd, 0, 0, 600, 300, 1)
End Sub
Private Declare Function FindWindow Lib "USER32" _
Alias "FindWindowW" (ByVal lpClassName As String, _
ByVal lpWindowName As String) As Integer
Private Declare Function MoveWindow Lib "USER32" Alias "MoveWindowW" _
(ByVal hWnd As Integer, ByVal x As Integer, ByVal y As Integer, _
ByVal nWidth As Integer, ByVal nHeight As Integer, _
ByVal bRepaint As Integer) As Integer