Userform Tam Ekran ve Label top ve Width Özelliği

[ocamsul]

Arkadaşlar Merhablar.

Form üzerinde bir tane Label var. Bu label in sayfa küçüldüğünde orijinal hali ile sayfa büyüdüğünde ise uzunluğunun ve yerinin formun en altında olmasını nasıl sağlayabilirim?

 

[ocamsul]

Konu ile ilgili fikir veren yok mu dostlar.

 

[Tankut SAZLI]

Çalışmanıza şu kodları ekleyin:

Private Sub UserForm_resize()
    Dim a, b
    a = UserForm1.Height
    b = Label1.Height
       Label1.Top = a - (b + 30)
       Label1.Width = UserForm1.Width - 15
End Sub

 

[ocamsul]

SN: Tankut SAZLI çok teşekkür ederim. Tam istediğim gibi. Sağolun.