※ ChatGPTを利用し、要約された質問です(原文:VB2008にてフォーム内の絵画エリアについて)
VB2008でフォーム内に四角を描く方法
このQ&Aのポイント
VB2008でフォーム内に四角を描きたいが、一部分しか描かれない問題が発生している。フォームのサイズは正しく指定しているが、指定範囲内しか描かれない。
絵画エリアを指定フォーム全体に拡大する方法を教えてほしい。
VB2008初心者が絵画エリアの拡大方法について質問。
VB(2008)にてフォーム内一杯に四角を描こうとしたのですが、以下のプログラムでは四角の左上部分しか描かれません。
フォームサイズは指定した大きさになっているのにフォーム内の(300,300ぐらい?)の範囲しか絵画されません。
どうすれば指定フォーム全体に絵画できるようになるのでしょうか?
Me.Height = 800 'フォームサイズ高さ設定
Me.Width = 800 'フォームサイズ幅設定
Me.Show()
For n = 40 To 800 Step 40 '入れ子状に四角を描く
g.DrawRectangle(Pens.Black,n,n,800-n*2,800-n*2)
Next n
VB2008は学習し始めたばかりの素人です。
よろしくお願いします。
お礼
すばやいご回答、ありがとうございました。 出来ました! なるほど、絵画はPaintイベント内、e.Graphicsを利用なんですね。 ありがとうございました。