PDA

View Full Version : رنگ Grideview



Yazdanian7983
یک شنبه 13 مرداد 1387, 16:53 عصر
چطور میشه رکوردها را در یه گریدویو ، یک در میان رنگ متفاوتی اعمال کرد؟

mostafaaa
یک شنبه 13 مرداد 1387, 19:43 عصر
Me.DataGridView1.AlternatingRowsDefaultCellStyle.B ackColor = Color.Aqua
البته تو قسمت Properties هم میتونی اینکار رو بکنی.

shahram197070
سه شنبه 15 مرداد 1387, 09:55 صبح
با سلام
این کدیه که من از اون استفاده می کنم
شاید به دردت بخوره



PublicSub ChangeColorDatagride(ByRef DGridView As DataGridView)
Dim rownum, cellnum, j, i AsInteger
rownum = DGridView.Rows.Count
For i = 0 To rownum - 1
If i Mod 2 = 0 Then
cellnum = DGridView.Rows.Item(i).Cells.Count
For j = 0 To cellnum - 1
DGridView.Rows.Item(i).Cells.Item(j).Style.BackCol or = Color.Linen
DGridView.Rows.Item(i).Cells.Item(j).Style.ForeCol or = Color.MidnightBlue
Next
EndIf
Next
EndSub

seeker
سه شنبه 29 مرداد 1387, 20:04 عصر
از پروپرتی AlternatingRowsDefaultCellStyle استفاده کن

jas1387
چهارشنبه 30 مرداد 1387, 10:24 صبح
با سلام
این کدیه که من از اون استفاده می کنم
شاید به دردت بخوره



PublicSub ChangeColorDatagride(ByRef DGridView As DataGridView)
Dim rownum, cellnum, j, i AsInteger
rownum = DGridView.Rows.Count
For i = 0 To rownum - 1
If i Mod 2 = 0 Then
cellnum = DGridView.Rows.Item(i).Cells.Count
For j = 0 To cellnum - 1
DGridView.Rows.Item(i).Cells.Item(j).Style.BackCol or = Color.Linen
DGridView.Rows.Item(i).Cells.Item(j).Style.ForeCol or = Color.MidnightBlue
Next
EndIf
Next
EndSub




دوست عزیز شما می توانستید به جای دوتا for از این تک for استفاده کنید



for i as integer=0 to Dgridview.rowcount-1 step 2
کد---
next