+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=24101)
استعلام علي اعمدة محدة - بيسك لكل العرب - 07-03-18
السلام عليكم ورحمة الله وبركاته
احتاج كود استعلام عن طريق الخيارات متل تشك بوكس واحد يضهر الاول تشك بوكس 2 يضهر العمود الثاني بحث كتيرا ولم اجد الحل ارجو من دوي الخبرة الافادة وشكرا وجزاكم الله كل خير
RE: استعلام علي اعمدة محدة - spoony - 08-03-18
عفوا عزيزي داتا جرد فيو بدك تخفي ألآعمدة يعني ازا ما بدك تعمود في داتا جرد فيو تخفيه عن طريق تشك بوكس ؟
RE: استعلام علي اعمدة محدة - بيسك لكل العرب - 08-03-18
[b]أخي spoony وأخي [b][b]طالب برمجة حايكم الله [/b][/b][/b]
[b][b][b]أرفق لكم مثال والمطلوب هوا عرض الاعمدة عن طريق كود الاستعلام [/b][/b][/b]
[b][b][b]وليس عن طريق الإضهار و الاخفاء في الدتا الجريد فيو بهذا الكود[/b][/b][/b]
PHP كود :
If CheckBox2.Checked Then
DataGridView1.Columns(2).Visible = True
End If
RE: استعلام علي اعمدة محدة - طالب برمجة - 08-03-18
PHP كود :
Private Sub B2DatesFind_Btn_Click(ByVal sender As Object, ByVal e As EventArgs) Handles B2DatesFind_Btn.Click
Dim clmns As New List(Of String)
If CheckBox1.Checked Then clmns.Add("Date")
If CheckBox2.Checked Then clmns.Add("Value1")
If CheckBox3.Checked Then clmns.Add("Value2")
If CheckBox4.Checked Then clmns.Add("Value3")
Dim c As String = " * "
If clmns.Count > 0 Then c = String.Join(",", clmns)
Dim dtp1 As Date = DateTimePicker_from.Value
Dim dtp2 As Date = DateTimePicker_to.Value
da = New OleDbDataAdapter("Select " & c & " from AAA where Date >= #" & dtp1.Year & "/" & dtp1.Month & "/" & dtp1.Day & "# and Date <= #" & dtp2.Year & "/" & dtp2.Month & "/" & dtp2.Day & "# order by Date ", Conn)
dt = New DataTable
da.Fill(dt)
DataGridView1.DataSource = dt
End Sub
RE: استعلام علي اعمدة محدة - بيسك لكل العرب - 08-03-18
رائع جدا ولا يسعني الا اقول لك مبدع وجزاك الله كل خير
بس هناك تعديل بسيط وهوا اضهار اسماء الاعمدة
متلا DATE اسمه تاريخ و VALUE1 اسمه كمية المنتج
وشكرا وربي يزيدك من علمه
RE: استعلام علي اعمدة محدة - بيسك لكل العرب - 08-03-18
جربت ولكن لم تنجح العملية هل ممكن تعديل علي المثال وشكرا
RE: استعلام علي اعمدة محدة - طالب برمجة - 08-03-18
الأفضل أن تنشئ الأعمدة في الداتاجريد مع تسميتها في الخاصية HeaderText
ووضع اسم الحقل المقابل في الجدول لكل عمود في الخاصية DataPropertyName
RE: استعلام علي اعمدة محدة - بيسك لكل العرب - 08-03-18
اسف علي تعبك ولكن بعد البحث يتغير الاسم لي اسم العمود الاصلي
RE: استعلام علي اعمدة محدة - طالب برمجة - 08-03-18
إذا الداتاجريدفيو فقط للعرض عدل
PHP كود :
If CheckBox1.Checked Then clmns.Add("Date AS [التاريخ]")
RE: استعلام علي اعمدة محدة - بيسك لكل العرب - 08-03-18
تمت العملية بنجاح انت ولا اروع أخي مبدع البرمجة في الحقيقة وجزاك الله ألف خير
وعند الانتهاء من مشروعي سأقوم برفعه للمنتدي للاستفادة للجميع وهذا بفضل تعاونك
والله يرحم والديك وزادك الله من علمه