Microsoft Access 掲示板

Microsoft Access 掲示板

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

27 コメント
views
4 フォロー
20
hatena 2024/01/06 (土) 10:16:47

1.数字を桁区切り＋￥がついた通貨型で表示したい
2.指定した場所から左揃えではなく右揃えで表示したい

テキストボックスは非表示にして、Printメソッドで表示してますので、そちらの方を修正する必要があります。

    Dim s As String
    With Me.請受金額月額
        .Visible = False
        Me.FontSize = .FontSize
        Me.FontName = .FontName
        s = Format(.Value, .Format) 'テキストボックスの書式プロパティで書式化
        Me.CurrentX = .Left + .Width - Me.TextWidth(s) '左寄せ
        Me.CurrentY = (Me.Height / 2) - (Me.TextHeight(.Value) / 2)
        Me.Print S
    End With
通報 ...