語言

HtmlWindow.Close 方法

定義

關閉視窗。

public:
 void Close();
public void Close();
member this.Close : unit -> unit
Public Sub Close ()

範例

以下範例程式碼會開啟一個視窗,若使用者在過去五分鐘內未使用該視窗,則關閉該視窗。 這個程式碼範例是在假設你的表單有一個 WebBrowser 名為 WebBrowser1、 、 ButtonButton1的控制項,以及 Timer 一個名為 Timer1的類別 所寫的 。 要成功執行此範例,請將第一個參數 OpenNew 更改為有效的 URL。

HtmlWindow balanceWindow;

private void balanceWindowButton_Click(object sender, EventArgs e)
{
    if (!(webBrowser1.Document == null)) 
    {
        balanceWindow = webBrowser1.Document.Window.OpenNew(new Uri("http://www.adatum.com/viewBalances.aspx"), "dialogHeight: 250px; dialogWidth: 300px; " +
        " dialogTop: 300px; dialogLeft: 300px; edge: Sunken; center: Yes; help: Yes; " +
        "resizable: No; status: No;");

        //Listen for activity on the document.
        webBrowser1.Document.Click += new HtmlElementEventHandler(Document_Click);

        windowTimeout.Interval = 300000;
        windowTimeout.Start();
    }
}

private void Document_Click(object sender, HtmlElementEventArgs e)
{
    windowTimeout.Stop();
    windowTimeout.Start();
}

private void windowTimeout_Tick(object sender, EventArgs e) 
{
    if (!balanceWindow.IsClosed) 
    {
        balanceWindow.Close();
        windowTimeout.Stop();
    }
}
Dim BalanceWindow As HtmlWindow

Private Sub BalanceWindowButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BalanceWindowButton.Click
    If (WebBrowser1.Document IsNot Nothing) Then
        With WebBrowser1.Document
            BalanceWindow = .Window.OpenNew(New Uri("http://www.adatum.com/viewBalances.aspx"), "dialogHeight: 250px; dialogWidth: 300px; " & _
            " dialogTop: 300px; dialogLeft: 300px; edge: Sunken; center: Yes; help: Yes; " & _
            "resizable: No; status: No;")

            ' Listen for activity on the document.


            WindowTimeout.Interval = 300000
            WindowTimeout.Start()
        End With
    End If
End Sub

Private Sub Document_Click(ByVal sender As Object, ByVal e As System.EventArgs)
    WindowTimeout.Stop()
    WindowTimeout.Start()
End Sub

Private Sub WindowTimeout_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles WindowTimeout.Tick
    If (Not BalanceWindow.IsClosed) Then
        BalanceWindow.Close()
        WindowTimeout.Stop()
    End If
End Sub

備註

利用物業 IsClosed 判斷該窗口是否已經關閉。 如果視窗已經關閉,這個方法就沒有效果。

當你使用 Open 或 OpenNew建立新視窗時, Close HTML 文件物件模型會開啟新的 Internet Explorer 實例。 如果你沒有呼叫 Close 所有已建立的視窗,這個 Internet Explorer 實例會在應用程式關閉後仍會繼續運行。

適用於

另請參閱