Sub chrome_app() Dim service As ChromeDriverService = ChromeDriverService.CreateDefaultService() service.HideCommandPromptWindow = True Dim options = New ChromeOptions() options.AddArguments("Headless") ' options.AddArgument("--window-position=-32000,-32000") Dim driver = New ChromeDriver(service, options) driver.Navigate().GoToUrl("**********") driver.FindElement(By.XPath("//*[@id='ttElement']/a[4]")).Click() ''in here i want show chrome driver.FindElement(By.XPath("//*[@id='btnAlertModalOk']")).Click() driver.Close() End Sub End Class
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)