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

السلام عليكم ورحمة الله
لدي جدول متكون من 9 اعمدة ... اريد فقط ان يعرض 5 اعمدة في DataGred veiw
وانا استخدم الكود الاتي من اجل وضع العناوين للداتا كرد فيو

Public Sub SetDGVheader()

With DGridUser

.Columns("UserID").HeaderText = "رقم المستخدم"

.Columns("UserfullName").HeaderText = "الاسم الكامل للمستخدم"

.Columns("UserUserName").HeaderText = "اسم المستخدم"

.Columns("Addresss").HeaderText = "العنوان"

.Columns("UserMobile").HeaderText = "رقم الموبايل"

End With

End Sub

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

()Public Sub loadusers

adapter = New SqlDataAdapter("select * from Users", sqlcon)

Dim dt = New DataTable

adapter.Fill(dt)

DGridUser.DataSource = dt

End Sub

النتيجة تظهر كالاتي

كيف ممكن اجعل الاعمدة التي محاطة بالخط الاحمر لا تعرض في الداتاكرد فيو

مرحبا بك أخي العزيز

جرب هذا الكود

كود :

for i=5 to 10

DGridUser.Columns(i).Visible = False

next

السلام عليكم

مثلما ذكر الأخ الكريم قبلي

أو يمكن تسمية الحقول التي تريد إظهارها و حذف النجمة كاختيار لكل الحقول

Select Id , Code , Name , Password , Status From Users

تحياتي

السلام عليكم الاخ أبو خالد الشكري و الاخ عبد العزيز البسكري

تم حل الموضوع باتباع ما طرحتموه

جزاكم الله خير
adapter = New SqlDataAdapter("select UserID, UserfullName, UserUserName, Addresss,UserMobile from Users", sqlcon)

الحمد لله .
الله يوفقك أخي mohamedassim