Microsoft Access 掲示板

高さが可変のテキストボックスの上下中央に文字を配置したい / 12

27 コメント
views
4 フォロー
12
hatena 2024/01/05 (金) 11:49:50 修正

下記はテキストボックス1のテキストを上下中央に表示します。

Private Sub 詳細_Print(Cancel As Integer, PrintCount As Integer)
    
    With Me.テキストボックス1
        .Visible = False
        Me.FontSize = .FontSize
        Me.FontName = .FontName
        Me.CurrentX = .Left
        Me.CurrentY = (Me.Height / 2) - (Me.TextHeight(.Value) / 2)
        Me.Print .Value
    End With
    
End Sub
通報 ...