掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
ScaleMode=3(ミリメートル)の場合でもきれいに描画、配置するには? (ID:100446)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
お世話になっております。 ピクチャーボックスへの描画と、オブジェクトの配置に関する質問です。 ピクチャーボックスのScaleModeをミリメートルにすると、描画や配置にずれが出てしまいます。 以下の例を見ていただけますでしょうか。 Rem:::::::::::: Rem まずオブジェクトとして、Picture1を配置し、その中にText1を配置します。 Private Const H = 20 Private Sub Form_Load() Picture1.Move 0, 0, Form1.Width, Form1.Height Picture1.ScaleMode = 6 For i = 1 To 100 Picture1.Line (i * H, 0)-(i * H, Picture1.Height) Next Text1.Appearance = 0 End Sub Private Sub Picture1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) xx = Int(X / H) * H Text1.Move xx, 0, H End Sub Rem ::::::::::::ここまで これを実行すると、ピクチャーボックスに縦線が表示され、そのピクチャーボックスをクリックすると、その列に沿ってテキストボックスが移動するのですが、列によって、縦線にそろわずにはみ出すことがあります。。 ScaleModeをピクセルにすると、そのようなことは起こりません。 テキストボックスを、縦線にきれいにそろえて配置する方法はあるでしょうか? よろしくお願いします。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.