Gizlenmiş Frame'inin içindeki Labeli göstermek

[Ergün Güler]

Selam,
Bir Userformda gizlenmiş bir Frame var.

Me.Frame1.Visible = False

gibi.
Framenin içinde birçok Labeller var. Sadece istediğim labeli aşağıdaki gibi görmek istiyorum, göremiyorum.

Private Sub CommandButton1_Click() 
Me.Label1.Visible = True
End Sub

zaten Label1.Visible normalde True'dir. Nasıl görebilirim. mümkün müdür?

 

[Korhan Ayhan]

Selamlar,

Aşağıdaki kod yapısını kullanabilirsiniz.

Option Explicit
 
Private Sub CommandButton1_Click()
    Dim Nesne As Control
    
    For Each Nesne In Frame1.Controls
        If Nesne.Name = "Label1" Then
            Nesne.Visible = True
        Else
            Nesne.Visible = False
        End If
    Next
End Sub
 
Private Sub UserForm_Initialize()
    Dim Nesne As Control
    
    For Each Nesne In Frame1.Controls
        Nesne.Visible = False
    Next
End Sub

 

[Ergün Güler]

Selamlar,

Aşağıdaki kod yapısını kullanabilirsiniz.

Option Explicit
 
Private Sub CommandButton1_Click()
    Dim Nesne As Control
    
    For Each Nesne In Frame1.Controls
        If Nesne.Name = "Label1" Then
            Nesne.Visible = True
        Else
            Nesne.Visible = False
        End If
    Next
End Sub
 
Private Sub UserForm_Initialize()
    Dim Nesne As Control
    
    For Each Nesne In Frame1.Controls
        Nesne.Visible = False
    Next
End Sub

Selam hocam,
Çok teşekkür ederim. Ancak , olmadı. Frame1 gösterimi True olmadan ne yaptıysam Frame1 içindeki Labelleri gösteremedim.
İyi çalışmalar.

 

[Korhan Ayhan]

Selamlar,

Ergün bey Frame1 zaten True olmalı. Aksi halde içindeki nesneleri görünür yapmazsınız. Benim önerdiğim kod Frame içindeki nesnelerden birisini görünür yaparken diğerlerini gizliyor.

 

[Ergün Güler]

Selamlar,

Ergün bey Frame1 zaten True olmalı. Aksi halde içindeki nesneleri görünür yapmazsınız. Benim önerdiğim kod Frame içindeki nesnelerden birisini görünür yaparken diğerlerini gizliyor.

Teşekkür ederim hocam. Ancak sorum zaten gizlenmiş Frame'nin labelini göstermek idi.
Bu arada gösteremeyeceğimizi öğrenmiş olduk.
İyi çalışmalar.

 

[Ferhat Pazarçevirdi]

Ancak sorum zaten gizlenmiş Frame'nin labelini göstermek idi.

Frame'i gizlemeden de bu işi halledebilirsiniz.

Mantık şudur :

Frame'in visible özelliği yerine, Left (veya Top) değerini, Userformun görünmeyen bir kısmına ayarlayın. Mesela; gizlemek istediğinizde, Top değerini 5000 yapın.

Bu Frame'in içinde birçok nesne taşıdığınızı düşünelim.

Eğer siz, sadece TextBox1 nesnesini göstermek istiyorsanız,

TextBox1'in Left ve Top değerlerini 0 yapın.

Frame'nin genişliğine, TextBox1'in Width değerini atayın ve hatta Frame'i Flat ve Border Style'ını None olarak belirtin.

Böylece, sadece TextBox'ı göstermiş olursunuz.

Diğer nesneleri de bu şekilde göstermek istiyorsanız, parametrik bir prosedür hazırlayabilirsiniz.


.

 

[Ergün Güler]

Frame'i gizlemeden de bu işi halledebilirsiniz.

Mantık şudur :

Frame'in visible özelliği yerine, Left (veya Top) değerini, Userformun görünmeyen bir kısmına ayarlayın. Mesela; gizlemek istediğinizde, Top değerini 5000 yapın.

Bu Frame'in içinde birçok nesne taşıdığınızı düşünelim.

Eğer siz, sadece TextBox1 nesnesini göstermek istiyorsanız,

TextBox1'in Left ve Top değerlerini 0 yapın.

Frame'nin genişliğine, TextBox1'in Width değerini atayın ve hatta Frame'i Flat ve Border Style'ını None olarak belirtin.

Böylece, sadece TextBox'ı göstermiş olursunuz.

Diğer nesneleri de bu şekilde göstermek istiyorsanız, parametrik bir prosedür hazırlayabilirsiniz.


.

Selam,
Sayın Hocam Açıklamalarınız için çok teşekkür ederim. En kısa zamanda söylediklerinizi yapıp, size geri döneceğim.
İyi çalışmalar.