vb.net - 長方形の幅（おそらく答えやすい）VB

Question

Dim energybar As New Rectangle(9, 154, energy, 21)

それが私の新しい長方形です、今私がそれを描くとき

e.Graphics.FillRectangle(Brushes.Blue, energybar)

幅はありませんが、整数のエネルギーは=から100です。

さて、どうすればこれを修正できますか？でもややシンプルです...

Answer 1

あなたのコードは機能します。以下の画像になる Form_Paint イベントに入れました。あなたのエネルギー変数の値が問題であると強く思います。Paint変数がメソッドで宣言されていない場合は、Classスコープ変数にすることを確認してください。

Private Sub Form1_Paint(sender As Object, e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
    Dim energy As Integer = 100
    Dim energybar As New Rectangle(9, 154, energy, 21)

    e.Graphics.FillRectangle(Brushes.Blue, energybar)

End Sub