منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

استخدم الدالة Exists للمكتبة File للتحقق من وجود الملف
ويكتب اسم الملف مع نوعه مثل txt بالاضافة للمسار كامل
فإذا أعادة الدالة القيمة True فهذا يعني أن الملف موجود
وهذا كود مثال

Dim fn = "F:/File Text.txt"

If IO.File.Exists(fn) = True Then
    MsgBox("موجود")
Else
    MsgBox("غير موجود")
End If

(14-03-19, 04:42 PM)5000 كتب : [ -> ]استخدم الدالة Exists للمكتبة File للتحقق من وجود الملف
ويكتب اسم الملف مع نوعه مثل txt بالاضافة للمسار كامل
فإذا أعادة الدالة القيمة True فهذا يعني أن الملف موجود
وهذا كود مثال

Dim fn = "F:/File Text.txt"

If IO.File.Exists(fn) = True Then
    MsgBox("موجود")
Else
    MsgBox("غير موجود")
End If

شكرا جزيلا استخدمت الكود وشغال تمام