Private Sub a1_DblClick(Cancel As Integer)
"'" & DoCmd.OpenForm "Main", acNormal, , "[M1] ='" & Me.M1 & "'" & "and [M2]='" & Me.M2
End Sub
الكود يشتمل على اسم حقلين M1 ,M2
المطلوب هو إضافة عدد4 حقول جديده M3'M4'M5'M6على الحالي ليصبح اجمالي عدد الحقول 6 حقول ( جميع الحقول المضافة فقط – نصي )
شاكرا ومقدرا للجميع