ardışık olmayan tüm labeller

[zulfuernek]

If Len (combobox 10) = 10 then
formülünde for i döngüsüyle userform üzerinde bulunan ardışık olmayan tüm labelleri gizlemek mümkünmü

 

[zulfuernek]

ilk label 9 son label 400 fakat ardışık değiller ortala 100 lanel var yani

 

[zulfuernek]

ÇÖZÜLDÜ:

pratik bir yöntem buldum sevgili arkadaşlar. mutlaka birinin işine yarayacaktır ve bu soru çok kez sorulmuştur mutlaka.

şöyleki gizlenmesini istediğim ardışık olmayan labelleri ve tüm nesneleri bir frame açarak içerisinde yerleştirdim ve frame yi gizli yap diyince doğal olarak herşey gizlenmiş oldu )))

 

[BedriA]

Intialize olayına....
Bu da aklında olsun, bir dene.
Bütün labelleri gizler.

Dim Nesne As Control
    For Each Nesne In Me.Controls
        If TypeName(Nesne) = "Label" Then
            Nesne.Visible = False
        End If
    Next

 

[zulfuernek]

bedri hocam bunuda deneyeceğim mutlaka. teşekkür ederim. emeğine yüreğine sağlık