[makky]

هل كود مثل هذا الكود يبطء البرنامج
For x As Integer = 0 To dt.Rows.Count - 1

DGVTest.Rows.Add()
DGVTest(0, x).Value = dt.Rows(x)(0).ToString
DGVTest(2, x).Value = dt.Rows(x)(3).ToString
DGVTest(4, x).Value = dt.Rows(x)(4).ToString
DGVTest(3, x).Value = dt.Rows(x)(0).ToString
DGVTest(5, x).Value = dt.Rows(x)(5).ToString
DGVTest(6, x).Value = dt.Rows(x)(6).ToString


DGVTest.Columns(1).Visible = False
DGVTest.Columns(3).Visible = False

With DGVTest
'عشان نخلي العنوان في نص العمود
.Columns(0).HeaderCell.Style.Alignment = DataGridViewContentAlignment.MiddleCenter
.Columns(1).HeaderCell.Style.Alignment = DataGridViewContentAlignment.MiddleCenter
'عشاننخلي البيانات اللي في الاعمده تبقي في النص
.Columns(0).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter
.Columns(1).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter
.Rows(x).DefaultCellStyle.Font = New Font("Times New Roman", 14, FontStyle.Bold)
.ColumnHeadersDefaultCellStyle.Font = New Font("Times New Roman", 14, FontStyle.Bold)

DGVTest.Rows(x).DefaultCellStyle.BackColor = If(x Mod 2 = 0, Color.Azure, Color.Orange)

End With

Next