20-04-19, 12:48 PM
الشكر لله والحمد لله
والحمد لله على كل حال
الامر بسيط اخى الفاضل
بعد اتمام الاستعلام بالاعلى ولنقول ان تم ترحيل الاستعلام الى DT
واللى هو كمثال
كود :
da.Fill(dt)كل ما عليك فعله وضع الكود التالى اسفل هذا السطر مباشراً
كود :
Dim GetMinDate As DataTable = dt.Select(Nothing, "PROFIT_DATE ASC").CopyToDataTable()الان لاستخدام قيمة اصغر تاريخ كل ما عليك استخدام هذا الكود
كود :
GetMinDate(0)(0)لعرضها برسالة
كود :
MsgBox(GetMinDate(0)(0))تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]
ساهم دائماً فى
لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله
▼ شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]
ساهم دائماً فى
لكل من يقوم بالمساهمةفى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله
▼ شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية

