اسلام الكبابى

جزاك الله خيرآ ولك ألف شكر وأتمنى من أى أحد من المائة المتابعين للموضوع ان كان يعرف اللغتين ان يحول كوده هذا بلغة ال فيجوال بيسك6 وياليته يرفق لى الفورم كاملة بلغة ال فيجوال بيسك6 :thumb_up: ولكم ألف شكر

ياريت توضح طلبك

لامانع لعل أحدآ ممن يعرف اللغتين يأخذ تطبيقك هذا ويحوله بلغة ال فيجوال بيسك 6

فى انتظار المثال العملى الموضح به الكود الصحيح

وكيف ذلك ان كان المستخدم ستعرض عليه الtext الأصلية وهى التى سيقوم بالتعديل فيها أتمنى دلك ولك ألف شكر

جزاك الله خيرآ ولكن ليتك توضح بكتابة الكود الصحيح وشكرآ

حاولت محاولة أخرى وهى وضع متغير يدل على تنقل ال Adodc1 بين السجلات فوضعت متغيراسمهmovv وكتبت الكود Dim movv As Boolean Private Sub Adodc1_WillMove(ByVal adReason As ADODB.EventReasonEnum, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset) …

أريد كود لاظهار الزرين cmdUpdate و cmdCancle اذا عدل المستخدم بنفسه فى ال txtFields كتبت هذا الكود فوجدته يظهرهما فعلآ عند تعديل المستخدم فى ال txtFields ولكنه :hmm: يظهرهما أيضآ عند التنقل بين السجلات (أى عند الضغط على ال Adodc1) Private Sub txtFields_Change …

توصلت لحل والحمد لله هذا كود يقوم بهذه العملية ( وقد جربته ونفذ المطلوب والحمد لله) Dim MAXWid(9) Private Sub Form_Activate() For J = 0 To 3 Rem0,1,2,3" الرقم3 باعتبار أن ال ataGrid1 أربعة أعمدة Label1(J).AutoSize = True Label1(J).Font.Size = DataGrid1.Font.Si…

لدى datagrid متصلة ب ADODC وتعرض بيانات جدول معين فى أعمدتها فهل من كود أو خاصية من خواص ال datagrid أو أى طريقة تغير من عروض هذه الأعمدة تلقائيآ حسب البيانات المكتوبة فيها كما نتحكم فى عرض ال Label مثلآ بجعل الخاصية Autosize تساوي True ولكم ألف شكر

جزاك الله خيرآ ولك ألف ألف شكر

نعم أريد طباعة محتوياتها فقط - دون إطار ودون بعض الأزرار Private Sub Command1_Click() cmdAdd.Visible = False: cmdAdd.Enabled = False cmdDelete.Visible = False: cmdDelete.Enabled = False CMDUpdate.Visible = False: CMDUpdate.Enabled = False cmdCancle.Visible = F…

ان كان المطلوب صعبآ فأرجو ممن حملو المرفق أى كود لطباعتها على الورقة ومش ضرورى الشرط (مهما كانت أبعاد الفورم ومهما كانت أبعاد الورقة)

لدى فورم جهزتها بجميع أدواتها وأريد الكود اللازم لطباعتها على الورق أريد طباعتها بأكملها على الورقة الموجودة فى الprinter مهما كانت أبعاد الفورم و مهما كانت أبعاد الورقة ولكم ألف شكر طباعة الفورم.zip

طب أى حد يعرفنى السؤال واضح وطلبى مفهوم ولكن حله صعب؟ أم أن السؤال غير مفهوم أصلا؟

يبدو أن هذا ليس طلبك نهائيآ

أوضح المشكلة عندى للجميع أكثر وأكثر المشكلة عندى أنى لا استطيع ضبط عدد مرات تكرار اللوب (عدد مرات جمل الFOR وعدد مرات جمل الNEXT ) أعرف فقط أن عددهم سيكون على قدر قيمةالمتغير N :cry: ولكن كيف أكتب الكود اللازم لذلك وأنا لاأعرف أصلآ كم ستكون قيمة هذا المتغير N …

أنا فى انتظار ردك بعد ما أخبرتك عمّا أريد أن أفعل بالضبط

أوضح معنى هذه الكلمة جيدآ . ففى المثالين المرفقين أحدهما هوكود يسرد لنا طرق الاختيار اذا كان لينا 8 أشياء نريد اختيار 4منهم مثلآ والآخر هوكود يسرد لنا طرق الاختيار اذا كان لينا 8 أشياء نريد اختيار 3منهم مثلآ ولكنى أريد مثالآ عامآ لأى رقمين غير معلومين لاأريد 8…

جراك الله خيرآ الغرض من ذلك هو عملية توافيق واحتمالات فاذا كان لينا 6 أشياء نريد اختيار 3منهم فكلنايعلم ان عدد طرق اختيارهم 6ق3 =(1*2*3)/(4*5*6)=20 ولكنى أريد سرد كل احتمالات طرق الاختيار الممكنة وليس معرفة عددهم فقط و هذا مرفق به مثال بسيط يوضح للجميع الكود ا…