كيف يمكن تغيير خلفية الفورم عن طريق الاكواد

بالنسبة لتغيير الخلفية

استخدم هذا الكود

Private Sub Combo0_AfterUpdate()
Select Case Me.Combo0.ListIndex + 1
Case 1
Me.Form2.Form.Picture = Me.Image4.Picture
Case 2
Me.Form2.Form.Picture = Me.Image5.Picture
Case 3
Me.Form2.Form.Picture = Me.Image6.Picture
End Select
Me.Form2.Form.PictureSizeMode = 1
End Sub

و لكن لابد ان تكون الصور موجودة فى مسارها الاصلى

ثانيا كبر حجم القاعدة بسبب التعديل عليها و لكن السبب الرئيسى هو وضعك للصور داخل النموذج

الافضل هو وضع الصور فى مجلد خارجى و استخدام مسارها

عموما الضغط و الاصلاح سيقلل الحجم

كامل الشكر لك اخ ابو يوسف على ردك الجميل