ozanakkaya hocam eline sağlık. Bana da bu lazımdı ve formda oldu. Ancak aynı olayı raporumda da uygulamam lazım. Onu nasıl yapabilirim? Denedim olmadı çünkü
teşekkür ederim. ancak iki yana yaslamak değil de örneğimde olduğu gibi alt ve üst boşluk ayarı yapmak istiyorum.
8. mesajdaki örneği inceleyiniz.
ozanakkaya hocam tşkler. kendi belgeme uyguladım ama hata verdi. Neyi gözden kaçırıyorum acaba. Rapor sayfa düzeni 2 sütun şeklinde olması sıkıntı mıdır?
Rapordaki ilgili kodu aşağıdaki ile değiştir.
Private Sub VerticallyCenter(ctl As Control)
On Error GoTo hata
Dim lngHeight As Long
lngHeight = fTextHeight(ctl)
ctl.TopMargin = ((ctl.Height - lngHeight) / 2)
hata: ctl.Height = (ctl.Height * 5) / 4
End Sub