عاشق للبرمجة

استخدم ملف Manifest باسم ملف الـ EXE .... وهل يخفى القمر :)

تأكد أخي من تفعيل خيار Enable Xp Visual Style في MyProject =======> Application أو ضع لكود التالي في حدث تحميل الفورم : Application.EnableVisualStyles()

أخي أقصد بالفيجوال ستايل هو ثيم النظام نفسه ، أحيانا يؤثر على سرعة البرنامج ، ولا أجزم أن هذا سبب المشكلة ، فقط جرب أن تضع ثيم النظام Windows Classic ، حيث أني ألاحظ أن استحابة بعض البرامج الرسومية بطيئة إلا إذا غيرت ثيم النظام ... فقط تخمين :blink: شئ آخر ، ه…

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

sourceTable هم اسم الجدول الذي سيتم نسخ البيانات منه ، أما destinationTable فهو اسم الجدول الذي سيتم النسخ إليه (Source = مصدر ) (Destination = وجهه )

استخدم التالي : Dim Row as Datarow For Each Row in Dataset.Tables(0).Select("Column = 'Bla'") listbox1.items.add(Row("Column").ToString) Next

وعليكم السلام ورحمة الله وبركاته .. جرب الفلترة أخي الكريم : Me.BindingSource.Filter = "Trim(ID) ="" الكود السابق يعود بكافة السجلات الفارغة في العمود الذي اسمه ID .

المعذرة لم أنتبه لإصدارة الـ VS.NET على كل حال ، أتذكر أن هناك ميثود اسمه VisibleRowCount أو شئ قريب منه يقوم بإرجاع عدد الصفوف للـ gridview ، وبإمكانك الحصول على عدد الصفوف إذا كان bounded مع DataSet أو DataView من خلال الاستعلام عن عدد الصفوف فيهم : مثال : D…

نستطيع القول إذن أن VB.NET انتبهت لهذه النقطة ، وبالتالي فالكود الطويل هنا لمصلحة المبرمج ولتسهيل عمل المبرمج .. أليس كذلك ؟

تعقيب على كلام الأخ houssam11350_11350 ، بإمكانك استخدام نفس كود الأخ مع تغيير الحدث إلى NodeMouseHover إذا كنت تقصد بالوقوف أي مرور الماوس على النود أو أجزاءه ..

أخي ممكن تستخدك Datatable واحد لـ Excel Sheet والآخر للـ DB Table وتعمل لوب على كل صف في DataTable والمقارنة بينهم ... هذا بالنسبة لأكثر من صف ، أما إذا كان لصف واحد فقط فأعتقد أن الأمر بسيط من خلال عدد Rows بعد الشرط .

أيش محتويات الحقل ذو القيمة الرقمية ؟؟

أخي العزيز لا أعتقد أن هناك عيب في طول الكود أو قصره .. لا أعلم إن كان هناك إمكانية في VB6 للحصول على أسماء الـ Controls الموجودة داخل الـ Containers بكود قصير كما هو الحال مع الكود الذي وضعته ..

استخدم الكود التالي لحساب عدد الصفوف حتى وإن كانت غير نشطة : DGV.Rows.Count ولحساب العدد الفعلي المستخدم ، استخدم الكود التالي : DGV.Rows.Count - 1

المعذرة أخي جرب الكود التالي : Form2.Show() Form2.WindowState = FormWindowState.Normal Form2.Focus()

ربما نسيت أن ترفق الصورة أخي الكريم ..

الله يعافيك ، والكونكشن ضروري بالتأكيد ( نسيته :lol: )

هل جربت الكود الذ وضعته لك ؟؟

وعليكم السلام ورحمة الله وبركاته .. استخدم الكود التالي : Form2.Show() Form2.WindowState = FormWindowState.Normal بالتوفيق

أوكي .. استخدم الكود التالي لتعبئة الكومبوبوكس : Dim DataAdapter2 As New OleDbDataAdapter("Select * from الجدول where الشروط الخ") dim DS as new Dataset ds.Clear DataAdapter2.fill(DS,"الجدول الذي استخدمته في الاستعلام") combobox1.datasource = DS.Tables(0).Defa…