[DanyGhost2010]

السلام لكم اخوتي
بالنسبة لهذا الكود


        TreeView1.CheckBoxes = True
        Dim drivers = (From x As IO.DriveInfo In IO.DriveInfo.GetDrives Where x.DriveType = IO.DriveType.Fixed).ToArray
        For Each d As IO.DriveInfo In drivers
            TreeView1.Nodes.Add(d.VolumeLabel & " (" & d.ToString & ")")
        Next

عايز اقول له لو تم التعليم علي برتشن الـ C مثلاً ثم الضغط علي زر بوتن تظهر رسالة تقول كذا

  Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ScanButton.Click
كمل الكود هنا