[VB6 ] 關閉指定視窗
有個關於關閉指定視窗的問題想請問各位大大
我的程式要去關閉某一個由IE開啟的網頁
我是先用FindWindow去找到該網頁的hwnd
然後由此hwnd去關閉該網頁
我的程式如下:
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" ( _
ByVal lpClassName As String, _
ByVal lpWindowName As String _
) As Long
Private Declare Function DestroyWindow Lib "user32" ( _
ByVal hwnd As Long _
) As Long
Private Declare Function MoveWindow Lib "user32" ( _
ByVal hwnd As Long, _
ByVal x As Long, _
ByVal y As Long, _
ByVal nWidth As Long, _
ByVal nHeight As Long, _
ByVal bRepaint As Long _
) As Long
Private Declare Function ShowWindow Lib "user32" ( _
ByVal hwnd As Long, _
ByVal nCmdShow As Long _
) As Long
Dim myhwnd As Long
Private Sub Command1_Click()
myhwnd = FindWindow(vbNullString, "XXXXXXXXXXXXX")
MsgBox myhwnd
End Sub
Private Sub Command2_Click()
DestroyWindow myhwnd
'MoveWindow myhwnd, 20, 50, 800, 600, 1
'ShowWindow myhwnd, 0
End Sub
1.當我按command1時，該網頁的hwnd數值有出現，但我按了command2時，
該視窗都不會關閉，寫成Call DestroyWindow (myhwnd)也是一樣，
但是如果是執行MoveWindow或ShowWindow時卻都沒問題
2.當我在測試MoveWindow時，如果該視窗最小化到工具列時，除非第一次執行該程式，
不然也都沒有作用，不會按照我設定的數值呈現
請問這是哪裡出了問題呢
找了很多方法(用postmessage與sendmessage...)都沒有用
謝謝
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 61.58.182.248
討論串 (同標題文章)
以下文章回應了本文：
完整討論串 (本文為第 1 之 2 篇)：