انا عملت اداة الشجرة treeview ووضعت بداخلها الدريفرات والفولدرات
اريد كود نقل اسم الفولدر الي اختارة الي التيكست
وكود لاظهار مساحة الفولدر المختار الي التيكست
السلام عليكم ورحمة الله وبركاته
بالنسبة للطلب الأول
هذا هو الكود المطلوب
كود :
Private Sub TreeView1_AfterSelect(ByVal sender As System.Object, ByVal e As System.Windows.Forms.TreeViewEventArgs) Handles TreeView1.AfterSelect
TextBox1.Text = TreeView1.SelectedNode.FullPath
End Sub
بالتوفيق
مشكور اخي الفاضل الكود شغال
مفيش طريقة اجيب بيها مساحة كل فولدر داخل الدرايف
MAZEN كتب :مشكور اخي الفاضل الكود شغال
مفيش طريقة اجيب بيها مساحة كل فولدر داخل الدرايف
السلام عليكم ورحمة الله وبركاته
تفضل أخي الكريم
كود :
Private Function GetSize(ByVal DirectorySize As Double) As String
Dim Result As String = ""
Select Case DirectorySize
Case Is <= 1024
Return DirectorySize & " Byte"
Case Is <= 1024 ^ 2
Result = (DirectorySize / 1024).ToString
Return Result.Substring(0, Result.IndexOf(".") + 3) & " Kb"
Case Is <= 1024 ^ 3
Result = (DirectorySize / (1024 ^ 2)).ToString
Return Result.Substring(0, Result.IndexOf(".") + 3) & " Mb"
Case Is > 1024 ^ 3
Result = DirectorySize / (1024 ^ 3)
Return Result.Substring(0, Result.IndexOf(".") + 3) & " Gb"
End Select
Return ""
End Function
بالتوفيق