Dosya Açma

Merhaba Arkadaşlar,

Merak Ettiğim Bir Konu Var.
Formda Bir TextBox Ve Bir Buton Var. Textboxda Adres Yazacak Örnek:"C:\Users\kubilay\Pictures\ka.png" Aç Butonu Dediğinde İse *.png dosyaları nerde açılıyorsa orada açılacak.Mesala *.txt Dosyası Metin Editörlerinde, *.bmp Dosyaları Resim Editörlerinde... Nasıl Bir Yol İzlemeliyim?

Kubilay Kardeşim;
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

Sn. Hayri16,
İlginiz İçin

Imports System.Diagnostics.Process

Public Class Form1

 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

              Process.Start(TextBox1.Text)

    End Sub

End Class

Sayın