均等割り付け (ID:124605)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 Private Sub Form_Load() Printer.ScaleMode = vbMillimeters Text1.Text = "aaaa" MsgBox Printer.TextWidth(Trim$(Text1.Text)) End Sub 上記を動かしてもらえばテキスト文字の長さがわかります。 後は平気ですよね？？ 私なら上記のようにやるけど他のみなさんはどうしますか？？