wegoo

تسلم بارك الله فيك

الف شكر

هذا الدود يجعل الغه تتحول الى العربيه Text1.SetFocus "^+" SendKeys ولكم اي شكر

لقد استرجعت المواضيع للوراء ووجدة بعض ما يتعلق بسؤالي لكن عندما ابحث لا يضهر لي ما وجدة ارجو مساعدتي وتصحيح البحث

لم اتمكن من العثور على اي مشاركه سوى طلب السيريل نمر لاصدار منه كان البحث بدلالة هذه الكلمه Crystal ارجو اذا تعرف انت مواضيع تعطيني اياها والف شكر لك ولسرعة ردودك :) :o (f)

من لديه معرفه بكيفية استخدام هذه الاداه وطرق ربطها مع قاعدة البيانات او مواقع لشرح استخدامها كما هل يمكنها طباعة سجل من قاعده فقط ولكم جزيل الشكر

اعزائي لقد نزلت البرنامج وعملة منه ستب لبرنامج ونقلته الي جهاز موجود فيه فجول بيسك واشتغل البرنامج وسوى الستب لكن عندما جربته مع جهاز لايوجد به فجول بيسك ما رضي ينزل يعطي انهماوجد بعض الملفات الازمه لعمليه الاستعداد او رساله بهاذا المعنى مع العلم ان الملف الي …

لازال البحث غير جيد قمت بتغيير الكود الى flx1.Clear SQL = "select * from tb1 where Number like '" & Text1.Text & "*'" Set tb1 = db1.OpenRecordset(SQL, dbOpenDynaset) showdata ولكن الان تم تحديد سجل واحد فقط وهاذا هو المطلوب كيف يتم طباعة هذا السجل كامل بدون با…

flx1.FillStyle = flexFillRepeat flx1.Col = 0 flx1.Row = 0 flx1.ColSel = flx1.Cols - 1 flx1.RowSel = flx1.Rows - 1 flx1.CellFontBold = False flx1.FillStyle = flexFillSingle For i = 0 To flx1.Cols - 1 For j = 1 To flx1.Rows - 1 If InStr(flx1.TextMatrix(j, i), _ …

Private Sub Command3_Click() Form1.PrintForm Printer.EndDoc End Sub لقد قمة بكتابت هذا الكود ولكنه يطبع الفورم كامل وانا اريد فقط ادات msflexgraid فقط وليس كل الفور ارجو المساعده

هل يوجد كود للطباعه

لمسك الخطاء او ايقافه يمكن استعمال الامر on Error Private Sub Command6_Click() on error goto a1 اكتب كودك هنا تم اكتب exit sub A1: msgbox err.description end sub ارجو ان يكون هذا مرادك لك تحياتي هذا الرد من المشرف طارق موسي

اعزائى فين الاقي شرح لاستخدام البرنامج

هناك رسالة خطاء عند عمل حفظ بدون اي تعديل كيف يمكن تفادي هذا الطا©

ياشباب ممكن اجابه ابغا كود الطباعة في فجول بيسك :( :eek: :confused: :'(

لدي برنامج مع قاعدة بيانات تحتوي اكثر من 1000 سجل اريد جعل البرنامج يقوم بعمل طباعة للسجل المحدد (سجل واحد فقط) عن طريق ادات Microsoft FlexGgid Control 6.0 او بعرضها في text ومن ثم طباعتها وتقبلو تحياتي

عند عمل برنامج مربوط بقاعدة بيانات من ضمن الكماند الموجودبه كماند للحفظ وكتبت الكود الخاص به كالتالي Private Sub Command6_Click() tb1!Number = Text1.Text tb1!DIGITAL = Text2.Text tb1!SPARE = Text3.Text tb1!ACCESSES = Text4.Text tb1!BLOCK1 = Text5.Text tb1!BLOC…

اين يمكن ان اجد البرنامج اذا سمحتو

(f) (g) :o :) الف شكر الكود زبط معي وكتبته بهاذي الصيغه ومشي البرنامج If IsNull(t!trk_ddf) Then ""= text6.text Else Text6.Text = t!trk_ddf End If

لدي برنامج مرتبط بقاعدة بيانات اكسس يقوم بعرضها والادخال والحذف المشكله ان البرنامج اذا صادفه اي حقل فارغ يتوقف عن العمل ويعطي رساله خطا مع العلم ان هذا الحقل يجب ان يضل فارغ سؤالي هل هناك كود شرطي مثلا يقوم بجعل البرنامج يتخطى هذا الحق اذا كان فارغاً لقد كتبت…