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

[b]السلام عليكم ورحمة الله وبركاته

واجهت مشكلة في هذا الكود لماذا ؟ مع العلم ايضا اريد في الكود ان يتم التحقق من اكثر من صوره انها فارغه

كود :

If PictureBox2.Image = Nothing Then

        Else

            MessageBox.Show("يرجى التأكد من ملأ الصور ", "رسالة خطأ", MessageBoxButtons.OK, MessageBoxIcon.Error)

            Exit Sub

        End If

[/b]

و عليكم السلام،
يمكنك أستخدام Is بدلاً من = ليكن الكود:

كود :

If PictureBox2.Image Is Nothing Then

كما يفضل بدل من أن تستخدم If ثم Else مباشرتاً عكس الشرط في جملة If يعني بدل أن تستخدم If أستخدم If Not مثل:

كود :

If Not PictureBox2.Image Is Nothing Then

و يمكن أيضاً عكس الشرط بدون Not مع Is بأستخدام IsNot أو مع = بأستخدام <>

نحمده ونصلي على رسوله الكريم

احذف else واتبع الشرط بـ and للتحقق من باقي الصور:

كود :

[align=left]If PictureBox1.Image = Nothing And PictureBox2.Image = Nothing Then

    MessageBox.Show("يرجى التأكد من ملأ الصور ", "رسالة خطأ", MessageBoxButtons.OK, MessageBoxIcon.Error)

    Exit Sub

End If

[/align]

DreamsDotNet كتب :نحمده ونصلي على رسوله الكريم

احذف else واتبع الشرط بـ and للتحقق من باقي الصور:

كود :

[align=left]If PictureBox1.Image = Nothing And PictureBox2.Image = Nothing Then MessageBox.Show("يرجى التأكد من ملأ الصور ", "رسالة خطأ", MessageBoxButtons.OK, MessageBoxIcon.Error) Exit Sub End If [/align]

بارك الله فيكم وجعلة في ميزان حسناتكم

[b]Aly El-Haddad[/b]

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

shado1796

Aly El-Haddad

ربيع

VBMaged