07/03/2010, 16:21
Tabstrip Control Hakkında
1 2
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]
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
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ı
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