المشاركات : 17
المواضيع 2
الإنتساب : Mar 2013
السمعة :
0
الشكر: 0
تم شكره 0 مرات في 0 مشاركات
جربتها
يقلي تحت في قآئمت الخطأ
يقلي كلمة " if "
مدري وش بها
سبحان الله وبحمده سبحان الله العظيم
لا إله إلا الله وحده لا شريك له
اشهد ان لا إله إلا الله وأن محمد عبده ورسوله
استغفر الله وأتوب إليه
الحمد لله ألذي عافانا
الله اكبر
| | | | | آخوك بالدين .. أديب الغامدي
المشاركات : 17
المواضيع 2
الإنتساب : Mar 2013
السمعة :
0
الشكر: 0
تم شكره 0 مرات في 0 مشاركات
If System.IO.Directory.GetFiles("مسار المجلد").Length > 0 Then
Kill("مسار المجلد\*.*")
MsgBox("تم حذف الملف")
Else
MsgBox("الملف غير موجود أو ربما تم حذفه سابقا")
End If
يقلي كلمة " then "
يأشر على حرف " n "
يقلي آحد غير مسموح بها
سبحان الله وبحمده سبحان الله العظيم
لا إله إلا الله وحده لا شريك له
اشهد ان لا إله إلا الله وأن محمد عبده ورسوله
استغفر الله وأتوب إليه
الحمد لله ألذي عافانا
الله اكبر
| | | | | آخوك بالدين .. أديب الغامدي
المشاركات : 17
المواضيع 2
الإنتساب : Mar 2013
السمعة :
0
الشكر: 0
تم شكره 0 مرات في 0 مشاركات
لحظة بالله
انا عندي الفيجوال بيسك 2012 و 2008
يمكن عندكم غير؟
سبحان الله وبحمده سبحان الله العظيم
لا إله إلا الله وحده لا شريك له
اشهد ان لا إله إلا الله وأن محمد عبده ورسوله
استغفر الله وأتوب إليه
الحمد لله ألذي عافانا
الله اكبر
| | | | | آخوك بالدين .. أديب الغامدي
المشاركات : 17
المواضيع 2
الإنتساب : Mar 2013
السمعة :
0
الشكر: 0
تم شكره 0 مرات في 0 مشاركات
ويقلي كذا
'If' must end with a matching 'End If'
سبحان الله وبحمده سبحان الله العظيم
لا إله إلا الله وحده لا شريك له
اشهد ان لا إله إلا الله وأن محمد عبده ورسوله
استغفر الله وأتوب إليه
الحمد لله ألذي عافانا
الله اكبر
| | | | | آخوك بالدين .. أديب الغامدي
المشاركات : 749
المواضيع 17
الإنتساب : Sep 2013
السمعة :
54
الشكر: 521
تم شكره 619 مرات في 232 مشاركات
السلام عليكم ورحمة الله وبركاته
أخي الكريم
معنى رسالة الخطأ أن عبارة If يجب أن تتبعها End If
والكود الذي تم وضعه لا يختلف باختلاف الإصدارات
ولكن تأكد أنك تقوم بنسخ كامل الكود الذي في المشاركة ووضعه في مكان لا يوجد فيه أخطاء
على سبيل المثال لا يتم وضعه ضمن جملة If أخرى ناقصة
بالتوفيق
المشاركات : 17
المواضيع 2
الإنتساب : Mar 2013
السمعة :
0
الشكر: 0
تم شكره 0 مرات في 0 مشاركات
الله يعطيك الف الف عافيه
ويفوفقك
يعطيك العافيه
سبحان الله وبحمده سبحان الله العظيم
لا إله إلا الله وحده لا شريك له
اشهد ان لا إله إلا الله وأن محمد عبده ورسوله
استغفر الله وأتوب إليه
الحمد لله ألذي عافانا
الله اكبر
| | | | | آخوك بالدين .. أديب الغامدي