commandbuttona 2 satır yazı yazmak

[olymposss]

sn üstadlarım herkese hayırlı günler

bir forma yerleştirdiğimiz commandbuttona1 işlevi ile ilgili bir ad giriyoruz.(örn buton üstüne KAYDET yazıyoruz.)bu buton isimleri biraz uzun olduğu zaman 2. satıra geçmiyor.buton üstüne 2 veya 3 satırlık bir ad girebiliyormuyuz.

yardımlarınıza çok teşekkür ederim.
saygılar:yardim:

 

[Haluk]

Private Sub UserForm_Initialize()
    MyCap = "1nci satir...." & vbCrLf & "2nci satir....." & vbCrLf & "3ncu satir...."
    CommandButton1.Caption = MyCap
End Sub

 

[ocamsul]

SN: Haluk üstadın verdiği kodların en sonuna Butondaki yazı büyüklüğünü ayarlamak içinde aşağıdaki kodu kullanabilirsin. Buradaki mantık butonun boyutu ile pek fazla oynamayıp form üzerinde alan kaplamama olayı

CommandButton1.Font.Size = 6

 

[Seyit Tiken]

Kodu deneyiniz.

Private Sub CommandButton1_Click()
CommandButton1.Caption = [A1]
CommandButton1.WordWrap = 1
End Sub

 

[olymposss]

herkese hayırlı günler
ilgilenen herkese teşekkür ederim
saygılar