حبيبنا الكود :
Dim i As Integer
i = DCount("usr_id", "voice", "usr_id=" & usr_id)
voiceno = i + 1
الكود يقوم بجمع عدد السجلات في الجدول المشابهة للمعرف الموجود في الفورم ثم يضيف اليها واحد
المعرف الجديد الذي يكتب في الفورم ليس له سجلات في الجدول اي انه = صفر فيضيف له واحد فتصبح النتيجة =1
انا قلت ان المهم ان الفكرة تصل .. بحيث يمكنك توظيف الكود
لو ارفقت جزء صحيح من البرنامج الذي تعمل عليه يكون افضل