+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [سؤال] مجموعة أسئلة حول حساب عدد الاسطر واستخراج محتوى خانة من القاعدة (/showthread.php?tid=30818)
مجموعة أسئلة حول حساب عدد الاسطر واستخراج محتوى خانة من القاعدة - الرائد - 10-08-19
السلام عليكم اخواني الكرام
أود أن اسئلكم عن
1- كيفية حساب الطول العمودي لجدول قاعدة البيانات في فيجوال بيسك
2- في برنامج أود استخراج أو تاريخ تم تسجيله في قاعدة البيانات ووضعه في لابيل واحدة , واستخراج اخر تاريخ في آخر سطر من القاعدة واضافته في لابيل أخرى .
3- كيفية عمل زر refresh لقاعدة البيانات , اي تحديث للمعلومات في حالة التعديل عليها
أتمنى الاجابة عن الثلاث الاسئلة لمن له معلومات عن ذلك
وشكرا لكم
RE: مجموعة أسئلة حول حساب عدد الاسطر واستخراج محتوى خانة من القاعدة - الرائد - 10-08-19
(10-08-19, 08:52 AM)سعود كتب : وعليكم السلام ورحمة الله وبركاته
اخي الكريم قسم المشاريع ممتليء بكل ما ذكرت
أنت إبدا وان وقفت امامك مسالة اذكرها بتفاصيلها.
شكرا أيها الاخ سعود , بصراحة نحن نسأل حين نحتاج السؤال.
بعد البحث لم اجد ما أبحث عنه بالضبط داخل المنتدى
لكن إجابة على أحد أسئلتي
طريقة عد الصفوف عموديا في قاعدة البيانات //
الحل :
كود :
Dim i As Integer = DataGridView1.RowCount - 1
Label15.Text = iRE: مجموعة أسئلة حول حساب عدد الاسطر واستخراج محتوى خانة من القاعدة - اسامه الهرماوي - 10-08-19
وعليكم السلام...
1- كيفية حساب الطول العمودي لجدول قاعدة البيانات في فيجوال بيسك
كود :
TextBox1.Text = datagridview1.Rows.Count2- في البرنامج أود استخراج تاريخ تم تسجيله في قاعدة البيانات ووضعه في لابيل واحدة , واستخراج اخر تاريخ في آخر سطر من القاعدة واضافته في لابيل أخرى .
كود :
عند الضغط علي حقل يضيفة للأداة:
Private Sub datagridview1_CellClick(ByVal sender As Object, ByVal e As DataGridViewCellEventArgs) Handles datagridview1.CellClick
TextBox1.Text = datagridview1.CurrentRow.Cells("اسم_الحقل").Value.ToString()
End Sub
أخر تاريخ من القاعدة
If con.State = ConnectionState.Closed Then
con.Open()
End If
Try
Dim a As New SqlCommand("Select MAX(الربح) from basket", con)
Dim b As String = a.ExecuteScalar
مبلغ.Text = b
Catch ex As Exception
مبلغ.Text = "0"
End Try3- كيفية عمل زر refresh لقاعدة البيانات , اي تحديث للمعلومات في حالة التعديل عليها
كود :
SQLstr = "SELECT * from table"
DataSet.Clear()
Dim DataAdapterMaterials As New SqlDataAdapter(SQLstr, con)
DataAdapterMaterials.Fill(DataSet, "basket")
con.Close()
datagridview1.DataSource = DataSet
datagridview1.DataMember = "basket"ويمكنك البحث قبل طرح المشكلة فالمنتدي به الكثير من الاكواد والمشاريع.
RE: مجموعة أسئلة حول حساب عدد الاسطر واستخراج محتوى خانة من القاعدة - ابراهيم ايبو - 10-08-19
السلام عليكم ورحمة الله وبركاته
تفضل اخي رائد
هذا المثال فيه اجابة لتساؤلاتك الثلاثة
اضافة الى المتوسط الحسابي وجمع عمود
وجعل الداتاغرايد بدون ارتباط مع اي داتاتابل
RE: مجموعة أسئلة حول حساب عدد الاسطر واستخراج محتوى خانة من القاعدة - الرائد - 11-08-19
(10-08-19, 01:55 PM)ابراهيم ايبو كتب : اليلام عليكم ورحمة الله وبركاتهصراحة اخي ابراهيم الشكر بالنسبة لك هو أمر بسيط .
تفضل اخي رائد
هذا المثال فيه اجابة لتساؤلاتك الثلاثة
اضافة الى المتوسط الحسابي وجمع عمود
وجعل الداتاغرايد بدون ارتباط مع اي داتاتاب
تستحق من عندي شارة تزكية وفخر
ان الله لايضيع اجر من عمل عملا حسنا فأتقنه
وشكرا لك
RE: مجموعة أسئلة حول حساب عدد الاسطر واستخراج محتوى خانة من القاعدة - ابراهيم ايبو - 11-08-19
الحمد لله والشكر لله
ولك اخي (الرائد)
تكفيني محبتكم وهي اغلى الكنوز
اللهم اجعل الحب سمة هذا المنتدى لانه من عبادتنا لك ان نحبك ونخلص لك في كل اعمالنا
اللهم آمين
اضحى مبارك على كل اسرة فيجوال بيسك لكل العرب
اعاده الله علينا وعلى الامة الاسلامية بالخير واليمن والبركة