الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

عمل شريط افقي في DataGridView

بدأه m_b في 19 أبريل 2011 · 11 رد · 1,975 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم شباب

اخواني حاولت ان اقوم بعمل شريط افقي للـ DataGridView لكي اتمكن من مشاهدة البيانات كاملة ولكني لم استطع

ارفق صورة لتسهيل معرفة ما اريد وشكراً

post-207163-023975700 1303245771_thumb.g

المرفقات
datagrid.gif
#2

السلام عليكم ورحمه الله وبركاته

تأكد اخي من ان قيمه الخاصيه AutoSizeColumnsMode تساوي AllCells

.:: Wish to become better and better ::.

#3

السلام عليكم

الاخ العزيز VB Helper غيرت الخاصية ولكن تم تصغير الاعمدة ولم يتم تكوين شريط افقي علماً انني اريد الاعمدة تكون متباعدة وخاصة في عمود اسم الحساب والبيان

مرفق صورة لما حدث بعد تغيير الخاصية

post-207163-017622900 1303336768_thumb.g

المرفقات
datagrid1.gif
#4

السلام عليكم ورحمه الله وبركاته

اخي ممكن ترسل الفورم وانا بعدله لك

.:: Wish to become better and better ::.

#5

السلام عليكم اخي العزيز

ارفق لك البرنامج في المرفقات

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

1- عند البحث برقم الحساب اريدة ان يبحث بالتسلسل حسب الرقم المدخل فلو كان الرقم الدخل 1 فانة يظهر ارقام الحسابات التي تبدء بواحد مثل 10000000 و 11000000 وكذا

2- عند البحث باسم الحساب ( نفس الفكرة) يظهر ما يحتوي على الحروف الدخلة ( وليس تطابق كامل)

3- اضافة البيانات من الداتا جريد فيو الى قاعدة البيانات ( اي حفظ جميع اسطر القيد )

4- لا يتم حفظ القيد في قاعدة البيانات إلا بعد التأكد ان القيد موزون اي ان مبلغ المدين يساوي مبلغ الدائن

5- اذا اردت ان اعدل قيد لوجود اي خطاء اريد بعد الضغط على زر تعديل وادخال رقم القيد ان يظهر القيد في الداتا جريد فيو

6- اظهار التاريخ في التكست الخاص بة

شاكر لك ومقدر اخي العزيز

WindowsApplication1.rar

#6

السلام عليكم ورحمه الله وبركاته

هذا مرفق فيه بعض التعديلات ... اذا كانت حسب ما تريد ارجو التوضيح في الاسئله الاخرى

WindowsApplication1.zip

.:: Wish to become better and better ::.

#7

السلام عليكم ورحمه الله وبركاته

بالنسبه للبحث بالاسم .. قم بالتغيير في الاجراء ListBoxSearch


Dim sql As String = "SELECT *, " & _
"AccountNo & ' ' & AccountName As MixValue " & _
"FROM DALEELACCOUNT WHERE AccountName Like '%" & TextBox11.Text & "%'"
بالنسبه للبحث برقم الحساب يمكنك استخدام نفس الطريقه بس حاول تسوي اجراء اخر مش نفسه ListBoxSearch

      
تم تعديل هذه المشاركة بواسطة VB Helper في 22 أبريل 2011 في 03:37

      

      
.:: Wish to become better and better ::.

    

  

    
    

      
#8
        
        

      
السلام عليكم
الملف المرفق اخي العزيز لم يعمل معي (انا اعمل على نسخة 2008)
بالنسبة للبحث نجح معاي مع وجود بعض المشاكل البسيطة التي سوف احلها ان شاء الله
بالنسبة للتاريخ ارجو الاجابة
وشكراً

      
تم تعديل هذه المشاركة بواسطة m_b في 22 أبريل 2011 في 16:47

      

      
    

  

    
    

      
#9
        
        

      
السلام عليكم ورحمه الله وبركاته
نعم اخي انا مستخدم فيجوال ستديو 2010 .. مو مشكله قم بحذف الفورم السابق من مشروعك ومن قائمه Add Existing Item قم بتحديد الفورم الذي ارسلته لك .. اما بالنسبه للبحث شغال تمام!!

      
      

      
.:: Wish to become better and better ::.

    

  

    
    

      
#10
        
        

      
السلام عليكم اخي العزيز
باقي هناك 3 اسئلة لم يتم الجواب عليهم وهي
 
3- اضافة البيانات من الداتا جريد فيو الى قاعدة البيانات ( اي حفظ جميع اسطر القيد ) 
4- لا يتم حفظ القيد في قاعدة البيانات إلا بعد التأكد ان القيد موزون اي ان مبلغ المدين يساوي مبلغ الدائن
5- اذا اردت ان اعدل قيد لوجود اي خطاء اريد بعد الضغط على زر تعديل وادخال رقم القيد ان يظهر القيد في الداتا جريد فيو 
اما بالنسبة لرقم القيد فبعد الضغط على زر اضافة تاتي هذه الصورة علماً اني استخدم نفس الاجراء في برنامج اخر  ويعمل لكن في هذا الفورم تاتي الرسالة التالية
‏‏لم يتم إعطاء قيمة لمعلمة أو أكثر من المعلمات المطلوبة
post-207163-054806600 1303595354_thumb.g

      
 المرفقات

    
p3.gif

    
تم تعديل هذه المشاركة بواسطة m_b في 24 أبريل 2011 في 00:49

      

      
    

  

    
    

      
#11
        
        

      
السلام عليكم شباب 
ارجو المساعدة في الاسئلة أعلاه

      
      

      
    

  

    
    

      
#12
        
        

      
السلام عليكم ورحمه الله وبركاته
اخي .. بالنسبه لسؤالك الرابع جرب ده
    	

        	'Save Data
    	End If
If Convert.ToInt32(TextBox12.Text) = Convert.ToInt32(TextBox13.Text) Then
والان سوف نقوم بحل السؤال الثالث

    	conn = New OleDbConnection(ConStr)
    	Dim cmd As New OleDbCommand("Insert Into Account Values(@ID,....)", conn) 'Complete all the fields
    	'Complete the other parameters by that way
    	conn.Open()
    	For i As Integer = 0 To DataGridView1.Rows.Count - 1
        	cmd.Parameters.AddWithValue("ID", DataGridView1.Rows(i).Cells(0).Value)
        	cmd.ExecuteNonQuery()
        	cmd.Parameters.Clear()
    	Next
    	conn.Close()
بس لاتنسى اخي تحويل البيانات الموجوده في الخليه اذا كانت تاريخ او رقم ... حاول تستخدم Convert.To
اما بالنسبه لسؤالك الاخير فجرب
    	

    	DataGridView1.Rows.Add(New Object() {TextBox6.Text,...}) 'Complete all fileds according the datagridview
DataGridView1.Rows.Clear()

      
      

      
.:: Wish to become better and better ::.

    

  

    
    
    
 مواضيع مشابهة