+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Örnekleri ve Uygulamaları (https://accesstr.net/forum-access-ornekleri-ve-uygulamalari.html)
+--- Konu Başlığı: Liste Kutularında Sıra Numarası (/konu-liste-kutularinda-sira-numarasi.html)
Liste Kutularında Sıra Numarası - Hayri16 - 30/01/2010
Sayın Yöneticiler;
Sorgu veya tablodan alınan verileri liste kutularına aktardığımızda bazen sıra numarası verme ihtiyacımız doğar. Bunun için forumda bir çok çözüm var. Bir çözüm de ben ekleyeyim dedim. (Gerçi kayıtlar çoğalınca nasıl etki eder bilemiyorum)
Çözüm Mantığı:
Sorgumuzu veya tablomuzu aktaracağımız bir liste kutusu oluşturuyoruz. Buna "gercekliste" adını veriyoruz.
Sonra bir liste daha oluşturuyoruz. Buna da "gorliste" adını veriyoruz. gorliste'nin Satır Kaynak Türü'nü Değer Listesi olarak belirliyoruz. Kaç sütun istiyorsak ona göre sayısını ve genişliklerini ayarlıyoruz.
Sonra aşağıdaki kodu form_load veya sizin kullanacağınız bir yordama ekliyoruz.
Kod:
Private Sub Form_Load()
Dim sno As Integer
gorliste.RowSource = ""
For sno = 0 To gercekliste.ListCount - 1
gorliste.AddItem sno + 1 & ";" & gercekliste.Column(1, sno)
Next
End SubNOT: Sayın yöneticiler konuyu burada açtım. Eğer forum kurallarına aykırı bir durum söz konusu ise özür diliyorum.
Cvp: Liste Kutularında Sıra Numarası - accessman - 30/01/2010
teşekkürler
Cvp: Liste Kutularında Sıra Numarası - benremix - 30/01/2010
Sn Hayri katkı ve paylaşım için teşekkürler. Bu tür paylaşımlarınızı ve örneklerinizi Access örnek ve uygulamaları bölümünde açınız. Saygılar...
Cvp: Liste Kutularında Sıra Numarası - assenucler - 30/01/2010
Sayın Hayri16;
Paylaşımınız için teşekkür...
Cvp: Liste Kutularında Sıra Numarası - ercansahin - 30/01/2010
Sn hayri16, güzel örnek için teşekkürler..
Cvp: Liste Kutularında Sıra Numarası - ozanakkaya - 31/01/2010
Paylaşım için teşekkürler sn Hayri16