Merhabalar datagridin her satırına otomatik sayıyı nasıl ekleyebilirim şimdiden teşekkür ederim...
Datagridin her satırına otomatik sayı ekleme
daha açıklayıcı anlatır mısınız.
access veritabanında otomatik sayı bölümü oluşturabilirsin.
access veritabanında otomatik sayı bölümü oluşturabilirsin.
<<< 10-HAGİ-10 >>>
Son Düzenleme: 28/04/2013, 20:57, Düzenleyen: mcmaho.
(28/04/2013, 11:40)sngl07 yazdı: Merhabalar datagridin her satırına otomatik sayıyı nasıl ekleyebilirim şimdiden teşekkür ederim...
Kod:
Public Class satirno
Shared Sub Datagrid_satır_no(ByVal dg As DataGridView)
Dim rowNumber As Integer = 1
For Each row As DataGridViewRow In dg.Rows
If row.IsNewRow Then
Continue For
End If
row.HeaderCell.Value = rowNumber.ToString()
rowNumber = rowNumber + 1
Next
dg.AutoResizeRowHeadersWidth(DataGridViewRowHeadersWidthSizeMode.AutoSizeToAllHeaders)
dg.RowHeadersDefaultCellStyle.ForeColor = Color.SlateGray
dg.RowHeadersDefaultCellStyle.Font = New System.Drawing.Font("Verdana", 7.5, FontStyle.Bold)
End Sub
Shared Sub Datagrid_satır_rengi(ByVal dg As DataGridView)
For k As Integer = 0 To dg.Rows.Count - 1 Step 2
dg.Rows(k).DefaultCellStyle.BackColor = Color.LightCyan
Next
For c As Integer = 1 To dg.Rows.Count - 2 Step 2
dg.Rows(c).DefaultCellStyle.BackColor = Color.AliceBlue
Next
dg.RowHeadersDefaultCellStyle.BackColor = Color.AliceBlue
dg.ColumnHeadersDefaultCellStyle.BackColor = Color.AliceBlue
End Sub
End Class
Kod:
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
DataGridView1.EditMode = DataGridViewEditMode.EditProgrammatically
DataGridView1.SelectionMode = DataGridViewSelectionMode.FullRowSelect
DataGridView1.EnableHeadersVisualStyles = False
DataGridView1.ColumnHeadersDefaultCellStyle.ForeColor = Color.SlateGray ' başlık rengini değiştir
DataGridView1.ColumnHeadersDefaultCellStyle.Font = New System.Drawing.Font("Tahoma", 7.5, FontStyle.Bold) ' başlık font stili
satirno.Datagrid_satır_no(DataGridView1)
satirno.Datagrid_satır_rengi(DataGridView1)
End Sub
drummers, 11-05-2009 tarihinden beri AccessTr.neT üyesidir.
Konuyu Okuyanlar: 1 Ziyaretçi