تغير حجم العامود في الداتا غريد او الداتا غريد فيوم

السلام عليكم

بالنسبة للعنصرين فهما يحملان الخاصية Width ومنها نستطيع أن نتحكم في عرض العامود .

سواءً عبر الكود أو عبر الواجهة.

بالنسبةِ لــ DataGridView

الفريق العربي للبرمجةرالواجهة شاهدي الصورة في المرفق:

و أما عبر الكود فإليك ذلك:

#Region " Customize DGV "

	Private Sub CustomizeProductsDataGridView()

		Try

			Dim IDColumn As New DataGridViewTextBoxColumn
			Dim ProductNameColumn As New DataGridViewTextBoxColumn
			Dim ProductQuntityColumn As New DataGridViewTextBoxColumn
			Dim OrderItemColumn As New DataGridViewTextBoxColumn
			Dim TotalsColumn As New DataGridViewTextBoxColumn

			With ProductsDataGridView
				.DataBindings.Clear()
				.BackgroundColor = Color.Beige
				.DataSource = Me.ProductsBindingSource
				.Columns.Clear()
				.EnableHeadersVisualStyles = True
				.AllowUserToAddRows = True
				.AllowUserToOrderColumns = True
				.AllowUserToResizeColumns = True
				.AllowUserToResizeRows = True
				.RowHeadersWidth = 40
				.RowTemplate.Height = 24
				.AllowUserToDeleteRows = False
				'Add appropriate columns
				.Columns.AddRange( _
							New System.Windows.Forms.DataGridViewColumn() { _
							IDColumn, _
							ProductNameColumn, _
							ProductQuntityColumn, _
							OrderItemColumn, _
							TotalsColumn})

			End With

			With IDColumn

				'Database column name
				.DataPropertyName = "ID"

				'Showing name 
				.HeaderText = "ID"

				'Datagridview column's name.
				.Name = "IDColumn"
				.Width = 80
				.AutoSizeMode = DataGridViewAutoSizeColumnMode.ColumnHeader
				.ReadOnly = True

			End With

			With ProductNameColumn
				.DataPropertyName = "ProductName"
				.HeaderText = "Product Name"
				.Name = "ProductNameColumn"
				.Width = 130
				.AutoSizeMode = DataGridViewAutoSizeColumnMode.Fill
			End With

			With ProductQuntityColumn
				.DataPropertyName = "ProductQuntity"
				.HeaderText = "Product Quntity"
				.Name = "ProductQuntityColumn"
				.Width = 80
				.AutoSizeMode = DataGridViewAutoSizeColumnMode.ColumnHeader
			End With

			With OrderItemColumn
				.DataPropertyName = "OrderItem"
				.HeaderText = "Order Item"
				.Name = "OrderItemColumn"
				.Width = 80
				.AutoSizeMode = DataGridViewAutoSizeColumnMode.ColumnHeader
			End With

			With TotalsColumn
				.DataPropertyName = "Totals"
				.HeaderText = "Totals"
				.Name = "TotalsColumn"
				.Width = 80
				.AutoSizeMode = DataGridViewAutoSizeColumnMode.ColumnHeader
				.ReadOnly = True
			End With

		Catch ex As Exception
			MsgBox(ex.Message)
		End Try

	End Sub

#End Region

كذلك هنالك خيار يعطينا تحكم أكثر وهو AutoSizeMode على سبيل المثال:

.AutoSizeMode = DataGridViewAutoSizeColumnMode.ColumnHeader

وفيه خيارات عدة كمثلاً Fill التي تجعل هذا العامود يحتوي على ماتبقى من مساحة في الـ DataGridView

و التجربة خيرُ برهان

بالتوفيق إن شاء الله يا أختي الكريمة

السلام عليكم.

الاخ الغملاسي

يعطيك الف عافيه

بصراحه لينا الشرف اننا نكون اعظاء في منتدي انتا المشرف فيه

بس للامانه لسه ماجربت الكود

جارى التجربه ويعطيك الف عافيه