mujaini

السلام عليكم أعزائي.. أرجو مساعدتي في هذه المشكلة.. وضعت هذا الكود لجمع قيم الحقل (point)وهو شغال تمام لكن المشكلة أن الداتا جريد بعد تنفيذ الأمر تختفي جميع محتوياتها ويصبح الجدول غير متاح للإضافة إلا بعد إغلاق البرنامج وإعادة فتحه وترجع نفس المشكلة عند تنفيذ …

أرجو مساعدتكم ياأخوان؟؟؟

شكراً عزيزي لكن الخطأ مازال موجود. هذا الكود كامل مع أن الإضافة والحفظ 100% Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button) Dim m As VbMsgBoxResult Select Case Button.Key Case "add" On Error Resume Next m = MsgBox("", vbYesNo + vbMsgBoxRtl…

السلام عليكم أخواني.. ممكن تفسير سبب هذه الرسالة .. select case button.key Case "delete" Dim m As VbMsgBoxResult m = MsgBox("", vbYesNo + vbMsgBoxRtlReading + vbQuestion, "") If m = vbYes Then rs.Delete rs![q] = Text1.Text rs![n] = Text2.Text Else Exit Sub End…

وبالنسبة لعرض البيانات التي تحمل تاريخ اليوم"تاريخ الجهاز"؟؟؟؟

مشكور أخي العزيز .وجزاك الله خيراً.

السلام عليكم أخواني.. طلبي لو سمحتوا هو التالي: 1-عند الضغط على option1 يعرض في الداتا جريد بيانات المدرسة الظاهرة في data combo الخاصة باسماء المدارس. 2- عند الضغط على option2 يعرض في الداتاجريد البيانات التي تحمل التاريخ الظاهر في datacombo الخاصة بالتواريخ.…

ألف شكر للجميع ..

السلام عليكم أخواني.... المشكلة عند الضغط على yes ينفذ unload ونفس الشي عند الضغط على no ..ممكن توضيح ولكم الشكر MsgBox "", vbYesNo + vbMsgBoxRtlReading + vbQuestion, "" If vbYes Then Unload Me Else Exit Sub End If

هو المطلوب .. وألف شكر

السلام عليكم أخواني... أرجو مساعدتي في التالي: عند الإضافة... المجموع2=المجموع1+الدرجة2 وفي الحقل"de1"..إذا كان المجموع2يحمل القيمة من صفر إلى 10 يحفظ "ضعيف" وإذا كان المجموع2 يحمل القيمة من 10 إلى 20 يحفظ"متوسط" هذا كله عند الضغط على الزر إضافة ولكم الشكر.. t…

بارك الله فيك

عبد العزيز اليوس............. المطلوب عرض السجلات التي يكون الحقل A فيها يحتوي على القيمة من الصفر إلى العشر فقط وهكذا pc.2058........ للأسف الخطأ مازال قائماً..

السلام عليكم أخواني.. طلبي هو عرض البيانات (في DATAGRID) التي تحمل الأرقام من 10 أو أقل من خلال OPTION1 والأرقام من 20 أو أقل من خلال OPTION2 والأرقام من 30 أو أقل من خلال OPTION3 (الموجودة في الحقل A) وشكراً مقدماً OPTION.rar

كفيت ووفيت وألف شكر

السلام عليكم أخواني : أرجو مساعدتي في التالي: تعديل الكود المتعلق بربط الداتا كومبو بحقل معين بحيث إذا ضغطت على العنصر الموجود في الكومبو يظهر مايقابله في السجل في التكست مع شويه شرح للخطأ الموجود في المثال. ومشكورين مقدماً. datacombo.rar

test.rar السلام عليكم أخواني.. مشكلتي أني قمت بإنزال برنامج من أحد الأعضاء في المنتدى وهو يوضح ربط datacombo بحقل معين في قاعدة البيانات وعرض النتائج في textbox لكني أتصلت بقاعدة البيانات عن طريق خصائص الأداة وهو استخدم الكود لذلك فأرجو منكم حذف الأكواد التي ل…

مشكورين .. أعزائي وضحتوا لي كثير من الأمور

27- 27- 3 27- عموماً الفكرة وصلت خلاص بس أنتظر الكود لأني جربت if then في التايمر بس يعطيني خطأ..

طلب ثاني لوسمحتوا . إذا كان الناتج المكتوب في التكست 3 صحيح تظهر صورة وإذا كان خطأ يظهر الناتج في msgboxوذلك بعد مرور الوقت المحدد .. ودمتم..