06-05-25, 04:28 PM
(06-05-25, 04:20 PM)1albasha كتب : اخي الكريم شكرا لك تمام الكود الله يبارك فيك
لكن في مجال اذا تغير القرص الى C او E
ان يختصر ايضا فهنا لايختصر الا اذا كان D:\all\7.docx
اما اذا كان C:\all\7.docx او E:\all\7.docx
لايختصر
تفضل
هنا أزلت الشرط الذي يتحكم في اسم القرص
كود :
Dim path As String = TextBox1.Text
TextBox2.Text = path.Substring(3)لا إله إلا الله وحده لا شريك له له الملك وله الحمد وهو على كل شئ قدير
سبحان الله وبحمده سبحان الله العظيم
سبحان الله والحمد لله ولا إله إلا الله والله أكبر ولا حول ولا قوة إلا بالله العلى العظيم
رب أغفر لي