[المنذر]

(29-09-19, 01:53 AM)AbdoDabak كتب : اخي عندك برنامج visual basic
لاني البرنامج المرفق هو visual studio
وانا ما عندي ياه

---

اخي اول شي حط

PHP كود :

Imports System.IO 


قبل

PHP كود :

Public Class Form1

End Class 


ليصير بهاد الشكل

PHP كود :

Imports System.IO
Public Class Form1

End Class 


وضيف في الفورم
TextBox عدد 2
Button عدد 1
واضغط دبل كليك على Button1
وحط الكود 

PHP كود :

Dim f As New FolderBrowserDialog
        f.SelectedPath = Application.StartupPath & "\all"
        If f.ShowDialog = Windows.Forms.DialogResult.OK Then
            TextBox1.Text = f.SelectedPath
            Dim filePath As String = TextBox1.Text
            Dim directory As String = Path.GetDirectoryName(filePath)
            directory = filePath.Replace(directory, "")
            TextBox2.Text = directory.Replace("\", "")
        End If 


ان شاء الله رح يشتغل معك

شكرا اخي مشي الحال كلك ذوق