MSFlexGrid Kullanımı
MS Flex Grid Kontrolü
Özellikleri:
Kullanımı çok kolay bir kontroldür. Fazla deneyime gerek yok. Teknik olarak Excel'e benzer.
şimdi biraz kontrolümüzü taniyalim:
--------------
Private Sub Form_Load()
Msflexgrid1.cols = 8
Msflexgrid1.rows = 8
End Sub
--------------
Burada görüldügü üzere 9*9'luk bir çalışma tablosu oluşturduk.
obje.cols , sütun sayısını
obje.rows ise sıra sayısını belirtir.
Peki diyeceksiniz ki :"Oraya 8 yazmışsın,ama 9*9'luk bir tablo oluştu. Neden?"
Nedeni açık,eğer listbox ile çalıştıysanız,o halde liste sayı sırasının 1 değil 0 dan başladığını fark etmişsinizdir. İşte MS Flex Grid Kontrolü'nde durum böyledir.
şimdi gelelim fasulyenin dezavantajlarına:
--------------
Private Sub Form_Load()
Msflexgrid1.col = 0
Msflexgrid1.row = 5
Msflexgrid1.Text= "Ahmet"
End Sub
--------------
Ne demek bu? Başlangiç sütunu ile 4.sıramın kesiştigi yerin yazisi Ahmet olacak.
Bir de olayın içine döngü sokalım.
--------------
Dim dön1 'döngü için tanıttık
Private Sub Form_Load()
For dön1 = 0 to 5 'sütün sayısı 0 ila 5 arası
For dön2 = 0 to 2 'sıra sayısı 0 ila 2 arası
Msflexgrid1.col = dön1
Msflexgrid1.row = dön2
Msflexgrid1.Text = "Ahmet" '6*3 lük bir alandaki bütün hücrelerin içeriği Ahmet oldu
Next dön2 'döngüye devam
Next dön1
End Sub
--------------
Karşılaşılmasi muhtemel durumlar:
1. Ugraşmak istediginiz hücre tabelada yer almıyorsa o zaman hata iletisi alırız. Yani 2*2'lik bir tabelada "olmayan 3. sütun"a bir şey yazdirmak mümkün olamaz, hata aliriz.
2. Gördügünüz gibi MS Flex Grid Kontrolü'nün her tarafı beyaz değil gri kısımları da var . Bu kısımların kaç tane olacağını belirleyebiliyoruz. Ama içeriğini program çalışırken nedense tıklayarak değiştiremiyoruz.
Ne yapabiliriz:
Aklınıza gelen herşeyi; ders programı ve telefon rehberi bunlardan en basit olanları. Daha zor olanlaı ise dosyalama, databasing v.s.
Yazar Ali Irmak Özdaðlý
Konu: <%CommentTitle%>
<%CommentBody%>
Bağlantı » Düzenle » Sil