منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : استعلام علي اعمدة محدة
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم ورحمة الله وبركاته
احتاج كود استعلام عن طريق الخيارات متل تشك بوكس واحد يضهر الاول تشك بوكس 2 يضهر العمود الثاني بحث كتيرا ولم اجد الحل ارجو من دوي الخبرة الافادة وشكرا وجزاكم الله كل خير
عفوا عزيزي داتا جرد فيو بدك تخفي ألآعمدة يعني ازا ما بدك تعمود في داتا جرد فيو تخفيه عن طريق تشك بوكس ؟
[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 
PHP كود :
Private Sub B2DatesFind_Btn_Click(ByVal sender As ObjectByVal e As EventArgsHandles 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 " " 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 
رائع جدا ولا يسعني الا اقول لك مبدع وجزاك الله كل خير 

بس هناك تعديل بسيط وهوا اضهار اسماء الاعمدة

 متلا DATE اسمه تاريخ و VALUE1 اسمه كمية المنتج 

وشكرا وربي يزيدك من علمه
جربت ولكن لم تنجح العملية هل ممكن تعديل علي المثال وشكرا
الأفضل أن تنشئ الأعمدة في الداتاجريد مع تسميتها في الخاصية HeaderText
ووضع اسم الحقل المقابل في الجدول لكل عمود في الخاصية DataPropertyName

اسف علي تعبك ولكن بعد البحث يتغير الاسم لي اسم العمود الاصلي
إذا الداتاجريدفيو فقط للعرض عدل
PHP كود :
If CheckBox1.Checked Then clmns.Add("Date AS [التاريخ]"
وهكذا في البقية
تمت العملية بنجاح انت ولا اروع  أخي مبدع البرمجة في الحقيقة وجزاك الله ألف خير 
وعند الانتهاء من مشروعي سأقوم برفعه للمنتدي للاستفادة للجميع وهذا بفضل تعاونك
والله يرحم والديك وزادك الله من علمه