Structure FieldSize_
        Dim Height As Integer
        Dim Width As Integer
    End Structure
    Private Sub Form1_Paint(ByVal sender As Object, ByVal e As _
      System.Windows.Forms.PaintEventArgs) Handles MyBase.Paint
        Dim g As Graphics = e.Graphics
        Dim x As Integer = 10
        Dim y As Integer = 10
        Dim FieldSize As New FieldSize_
        FieldSize.Height = 200
        FieldSize.Width = 400
        g.FillRectangle(System.Drawing.Brushes.Green, x, y, FieldSize.Width, _
          FieldSize.Height)
        g.DrawRectangle(New Pen(Color.Black, 2), x, y, FieldSize.Width, _
        FieldSize.Height)
        g.DrawString("HELLO WORLD", New Font("ARIAL", 30, FontStyle.Bold), _
        System.Drawing.Brushes.Red, x + 10, y + 10)
    End Sub