我们可以借助下面给出的代码检查用户计算机上安装的浏览器。
If File.Exists("C:\Program Files (x86)\Google\Chrome\Application\chrome.exe") OrElse File.Exists("C:\Program Files\Google\Chrome\Application\chrome.exe") Then
ListBox1.Items.Add("Chrome.exe")
End If
If File.Exists("C:\Program Files (x86)\Mozilla Firefox\firefox.exe") OrElse File.Exists("C:\Program Files\Mozilla Firefox\firefox.exe") Then
ListBox1.Items.Add("Firefox.exe")
End If
检查完已经安装的浏览器后,如何在任意浏览器的桌面上创建快捷方式呢?