چطور یک برنامه باز کننده فایل بسازم

[muttahary21]

سلام
یک سوال دارم که اگر کمک کنید خوشحال میشم
چطور یک برنامه بسازم که وقتی تو یک فولدر وقتی چند فایل را انتخاب میکنم و با برنامه ساخته شده باز میکنم آدرس اونا توی یک ListBox به ترتیب اضافه بشه ممنون میشم اگر کمک کنید البته منظور تو یک فولدر در مای کامپیوتر هست یعنی از طریق مای کامپیوتر بریم به یک فولدر بعد مثلا چند موزیک را انتخاب کنیم و با برنامه خودمان بازش کنیم و آدرس همون چند فایل توی یک Listbox به ترتیب اضافه بشود خوشحال میشم کمک کنید
این کد برای باز کردن یک فایل کار میکنه مثلا پخش یک صوت

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Dim file As String = Command$()

        file = Replace(file, Chr(34), "")

        AxWindowsMediaPlayer1.URL = file

    End Sub

[ircast]

سلام
یک سوال دارم که اگر کمک کنید خوشحال میشم
چطور یک برنامه بسازم که وقتی تو یک فولدر وقتی چند فایل را انتخاب میکنم و با برنامه ساخته شده باز میکنم آدرس اونا توی یک ListBox به ترتیب اضافه بشه ممنون میشم اگر کمک کنید

سلام
این کد رو در نظر بگیرید

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

        Dim path() As String

        Dim pathcount As Integer = 0

        Dim pathtotal As Integer = 0

        Dim OpenFile As New OpenFileDialog

        ' OpenFile.Filter = "jpg|*.jpg|png|*.png|gif file|*.gif|bitmap|*.bmp"

        OpenFile.Multiselect = True

        If OpenFile.ShowDialog = Windows.Forms.DialogResult.OK Then

            path = OpenFile.FileNames

            pathtotal = path.Length - 1

            For i As Integer = 0 To pathtotal Step 1

                ListView1.Items.Add(path(i))

            Next

        End If

    End Sub