Burada shell fonksiyonunu kullanıyoruz. Bu fonksiyon komutayı geçici olarak Windowsa devrediyor. O da eğer kendisinde tanımlıysa ilişkili programı seçip açıyor.
Buton'un click yordamına aşağıdaki kodları yaz ve dene.
Dim shell_app As Object
Set shell_app = CreateObject("Shell.Application")
shell_app.Open "" & textbox.Value
Set shell_app = Nothing