Recent content by idefaz

  1. I

    Set TextBox and Label text to Vertically Align Center

    Private Sub horcenter() If ErrCatchOn Then On Error GoTo Grr Dim ctl As Control For Each ctl In Me.Controls If ctl.ControlType = acLabel Then ctl.TopMargin = ((ctl.Height - (ctl.FontSize * 20)) / 2) End If Next ctl horset = True...
Back
Top Bottom