iibat قام بنشر سبتمبر 1, 2019 مشاركة قام بنشر سبتمبر 1, 2019 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 حقول ( جميع الحقول المضافة فقط – نصي ) شاكرا ومقدرا للجميع رابط هذا التعليق شارك More sharing options...
Barna قام بنشر سبتمبر 1, 2019 مشاركة قام بنشر سبتمبر 1, 2019 تفضل ..... DoCmd.OpenForm "Main", acNormal, , "[M1] ='" & Me.M1 & "'" & "and [M2]='" & Me.M2 & "'" & "and [M3]='" & Me.M3 & "'" & "and [M4]='" & Me.M4 & "'" & "and [M5]='" & Me.M5 & "'" & "and [M6]='" & Me.M6 & "'" 1 رابط هذا التعليق شارك More sharing options...
iibat قام بنشر سبتمبر 1, 2019 الكاتب مشاركة قام بنشر سبتمبر 1, 2019 تسلم يديك اخي الكريم محمد البرناوي شاكر لك ومقدر رابط هذا التعليق شارك More sharing options...
Barna قام بنشر سبتمبر 1, 2019 مشاركة قام بنشر سبتمبر 1, 2019 حياك اخي @iibat ... بالتوفيق رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.