Как закрыть процесс только одной вкладки в Google Chrome?

Private Declare Function SendMessage Lib "user32.dll" Alias "SendMessageA" (ByVal hWnd As IntPtr, ByVal wMsg As Integer, ByVal wParam As Integer, ByVal lParam As String) As Integer
Const WM_CLOSE = &H10
 
SendMessage (hwnd, WM_CLOSE, 0&, 0&)

SendKeys.Send("^(w)")

Public Class Form1
    Declare Auto Function FindWindow Lib "USER32.DLL" (ByVal lpClassName As String, ByVal lpWindowName As String) As IntPtr
    Declare Auto Function SetForegroundWindow Lib "USER32.DLL" (ByVal hWnd As IntPtr) As Boolean
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim chrome_Handle As IntPtr = FindWindow("Chrome_WidgetWin_1", "Яндекс - Google Chrome") 
 
        SetForegroundWindow(chrome_Handle)
        'SendKeys.SendWait("^(w)")
        SendKeys.Send("^(W)")
 
    End Sub
 
End Class

Public Class Form1
    Declare Auto Function FindWindow Lib "USER32.DLL" (ByVal lpClassName As String, ByVal lpWindowName As String) As IntPtr
    Declare Auto Function SetForegroundWindow Lib "USER32.DLL" (ByVal hWnd As IntPtr) As Boolean
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim chrome_Handle As IntPtr = FindWindow("Chrome_WidgetWin_1", "Яндекс - Google Chrome") 
 
        SetForegroundWindow(chrome_Handle)
        SendKeys.SendWait("^(w)")
        'SendKeys.Send("^(W)")
 
    End Sub
 
End Class

SendKeys.SendWait("^(w)")

 SendKeys.SendWait("^{F5}")

SendKeys.Send("^ц")

'Устанавливаем английскую раскладку
System.Windows.Forms.InputLanguage.CurrentInputLanguage = InputLanguage.FromCulture(System.Globalization.CultureInfo.GetCultureInfo(1033))