Favorilerine Ekle | Giriş Sayfan Yap | Tavsiye Et

 

Kurs Tanıtım Sayfası | Süper Üye Kimdir? | Menü Tasarımı Konulu Örnek Ders
Kod İndir| Hazır Kodlar | Makaleler| İpuçları | VB .NET Kursu | Dersler | Forum | Alt Bölümler | Servisler
    Merhaba Misafir
    anasayfa » visual basic hazır kodlar » FlexGrid Kullanımı
Üye Girişi
Kullanıcı Adı:  
Şifre : 
Kaydet ?
Siteden tam olarak faydalanabilmek için üye olmalısınız.
Unuttuğunuz şifrenizi öğrenebilmek için kayıt sırasında verdiğiniz Hatırlatma Cevabı'nı bilmeniz gereklidir.
Şifre hatırlatma işlevini sadece 3 defa kullanma hakkınız vardır.
Kullanıcı adını ve şifresini unutan üyelere email ile yardım verilmez.

Aktivasyon Gelmedi mi?Aktivasyon mesajınız email adresinize gelmedi mi?
Buraya tıklayarak bir kez daha aktivasyon mesajı gönderilmesini sağlayabilirsiniz.
Lütfen email hesabınızın BULK ve SPAM klasörlerini de kontrol ediniz.
Rastgele Makale

Değişkenlerin Faaliyet Alanı

Yazar: Webmaster
Değişken yada Variable denir durur. Peki değişkenler tam olarak ne yaparlar - değişmekten başka? Hadi değişmeleri gerekirken aynı kaldılar ne yapacağız. Neyse değişkenler nerede geçerlidir nerede değildir... Tüm bilgi burada.


Webmasterlar
Sitenize Ekleyin!
Sitenizde "Son Eklenen 10 Visual Basic Yazısı"'nı göstermek ve içeriğini zenginleştirmek için buraya tıklayınız.

Vbasicmaster.com'a link verin!
Aşağıdaki minik banneri sitenize eklemek için tıklayın!

Üye Sayısı:
Ziyaretçiler nerede?
Yayın № : 8792
Yayın Tar:11.05.2007
Yazar : eagle16
Hit :2890

Bu Yazarın Yazıları Sadece bu yazarın örnek kod göster
Bu Yazıyı Tavsiye Et

MSFlexGrid1 nesnemizin adını Flex1 olarak değiştirdim
ctrl+t kısayol tuşuyla Components den
Microsoft FlexGrid Control 6.0'ı yüklüyoruz
Ör1:
Private Sub form_load()
Flex1.Rows = 10 'satır
Flex1.Cols = 8 'Sutün
Flex1.Row = 0
Flex1.Col = 0
'başlıklandırma
Flex1.Text = "No"
Flex1.Col = 1
Flex1.Text = "Adı Soyadı"
Flex1.Col = 2
Flex1.Text = "Sınıfı"
Flex1.Col = 3
Flex1.Text = "Bölümü"
Flex1.Col = 4
Flex1.Text = "Adres"

Flex1.TextMatrix(1, 0) = "11" 'sabit değer atama (1,0) koordinat değeri
Flex1.ColWidth(1) = 2000 'Sütün genişlik
Flex1.RowHeight(1) = 500 'satır genişlik
Flex1.ColAlignment(0) = 1 ' Sağa sola Yaslama
End Sub

Ör2:

Private Sub Command1_Click()
Flex1.Col = 0
If Option1 Then
Flex1.Sort = 5
Else
Flex1.Sort = 6
End If
End Sub

Private Sub Command2_Click()
Flex1.Col = 1
If Option1 Then
Flex1.Sort = 3
Else
Flex1.Sort = 4
End If

End Sub


Private Sub Flex1_DblClick()
If Flex1.Col = 0 Then
Flex1.Text = InputBox("Adı" & Flex1.Text)
End If
If Flex1.Col = 1 Then
Flex1.Text = InputBox("Notu" & Flex1.Text)
End If

End Sub

Private Sub Form_Load()
Flex1.Rows = 2
Flex1.Rows = InputBox("öğrenci sayısı") + 1
Flex1.FixedCols = 0
Flex1.Row = 0
Flex1.Col = 0
Flex1.Text = "Adı"
Flex1.Col = 1
Flex1.Text = "Notu"
End Sub




Yorumlar, eklemeler ve düşünceler
        abi bunun anlatıı nerde biraz daha açıklayıcı olabilirdi

   çılgındünya, 20.05.2007 09:24
© Hakan Ersöz 2000-2013| Üyelik Sözleşmesi | | Ödeme Bildirimi
Sitemizden yenilikleri hemen öğrenin, pop upları engelleyin, chat yapın... ToolBarımızı indirin:
Vasicmaster Toolbar'ı indirin