Tabstrip Control Hakkında

1 2
07/03/2010, 16:21

FaDime

Access de TabStrip kullanımı hakında bilgisi olan var mı ? ayrıca eklediğimiz tabstrip kontrolü üzerine metin kutusu , açılır kutu nasıl ekleyebiliri?? cevap verirseniz sevinirim
07/03/2010, 16:28

benremix

Sn Fadime öncelikle sitemize hoşgeldiniz. Lütfen Site Kurallarını okuyalım. Konu başlığınız sorunuzu özetlemeli. Mutlaka yardım eden olacaktır. Saygılar...

5-) Açacağınız konunun başlığı "Şunu Yapamıyorum", "Şurasını Yapamadım", "acil yardım", lütfen yardım", "bir bakar mısınız" vb. şeklinde yazılmamalı, sorununuzu kısaca özetleyecek şekilde olmalıdır. (Örnek: Access'te Form Özellikleri Nelerdir?)
[Uyarı Puanı: +2]
07/03/2010, 16:32

FaDime

peki. Bilginiz var mı .
07/03/2010, 16:40

benremix

Sn Fadime şimdi çıkmam lazım. Aşağıdaki linki inceleyebilirsiniz. Saygılar...

https://accesstr.net/konu-microsoft-acti...t=tabstrip
07/03/2010, 18:11

benremix

Sn Fadime konu hakkında tam bir bilgim yok. Sizin için biraz araştırdım. Saygılar...

VB'de kullanıcı ile iletişimde. TAB-STRIP oldukça kullanışlı bir arabirimdir. VB6 da 2 farklı tabstrib vardır.
Birincisi Microsoft Forms 2.0 object lib. ile eklenen bir componenttir diğeri. Microsoft Tabbed Dialog Contol 6.0'dır..
Tabbed dialog kullanımı cok zor değildir. Sağ tuşa tıkladığınızda özellikler menüsünden istediğiniz ayarlamaları yapabilirsiniz. Tab adedi, regi, resim eklemek gibi komutlar oldukça kolaydır. Forms 2.0 object ile gelen tabstrip ise code yazmayi gerektiren bir componenttir. Tabstripi oluşturdurktan sonra code ile istediğiniz gibi kullanabilirsiniz. Bu strip i kullanırken dikkkat etmeniz gereken olay frameler ile çalışmak ve frame visible olayı ile tabstripler arasında sanal bir geçiş yaratma gerekliliğidir. Kısa bir örnek:


Private Sub ExitCMD_Click()
End



End Sub

Private Sub Form_Load()
'Tab İsimlerini değiştirelim
TabStrip.Tabs(0).Caption = "1. Numaralı Tab"
TabStrip.Tabs(1).Caption = "2. Numaralı Tab"
'======================
Image2.Visible = False

End Sub

Private Sub TabStrip_Click(Index As Long)
'2. tab ile ilgili hide/visible işlemi
msg (TabStrip.SelectedItem.Name)
If TabStrip.SelectedItem.Caption = "2. Numaralı Tab" Then
Label1.Caption = "Bu 2 Numarali tab buraya istediğinizi koyabilirsiniz!"
Image1.Visible = False
Image2.Visible = True
End If
'=============================
'1. tab ile ilgili hide/visible işlemi

If TabStrip.SelectedItem.Caption = "1. Numaralı Tab" Then
Label1.Caption = "Bu 1 Numaralı tab. İstediğinizi Buraya Koyabilirsiniz!"
Image1.Visible = True
Image2.Visible = False
End If

End Sub

Alıntı
07/03/2010, 18:31

ercansahin

Sn benremix hocam, bilgiler için teşekkürler..
1 2