Seluruh form yang ada Visual Basic .Net mempunyai koordinat yang berguna untuk menentukan posisi gambar atau graphic pada form. Koordinat sebuah form terdiri atas dua bagian yaitu koordinat horizontal (x) dan koordinat vertikal (y). Posisi koordinat suatu objek dapat dengan mudah diatur secara manual pada properties location.

CLR menggunakan implementasi tingkat lanjutdari antarmuka grafik windows (GDI) yang disebut dengan GDI+. GDI+ mengijinkan kita untuk membuat grafik, menggambar teks, atau memanipulasi image grafik sebagai objek. Sebelum menggambar garis dan bentuk, merender teks, dan menampilkan gambar dengan GDI+ objek graphics harus dibuat terlebih dahulu. Objek graphics me representasikan permukaan gambar GDI+ yaitu objek yang digunakan untuk membuat gambar grafis.

Ada dua langkah dalam pemrograman grafik :

1. Membuat gambar graphics

2. Menggunakan objek graphics untuk menggambar garis dan bentuk,  

    render teks, atau menampilkan gambar.

Mengambar Garis pada Form

Penggambaran Graphics diatas form dapat dilakukan melalui Objek Graphics yang dapat dideklarasikan sebagai berikut :

Dim MyGraphics As System.Drawing.Graphics = Me.CreateGraphics

Objek Graphics menyediakan berbagai metode untuk menggambar seperti DrawLine, DrawRectangle,

Mengambar grafik vector 2 dimensi

Grafik vector merupakan kemampuan menggambar bentuk-bentuk tradisional seperti garis, kurva dan bentuk berdasarkan sekumpulan titik tertentu.

Untuk pengambaran grafik vector kita dapat menggunakan objek Pen dan Brush, dimana objek Pen untuk pengambaran bentuk garis, dan Brush untuk objek isian.

Mengambar garis  dengan Pen

Perintah DrawLine(pen, x1,y1, x2,y2) digunakan untuk menggambar garis dari koordinat awal (x1,y1) ke koordinat akhir (x2,y2)

Mengambar persegi  dengan Pen

Kita dapat menggunakan metoda DrawRectangle(Pen, x,y,lebar,tinggi) pada objek grafik untuk mengambar persegi pada koordinat x,y dengan lebar dan tinggi tertentu.

Mengambar Ellipse pada Form dengan Pen

Kita dapat menggunakan metoda DrawEllipse(Pen,x,y,lebar,tinggi) pada objek grafik untuk mengambar ellipse pada koordinat x,y dengan ukuran lebar dan tinggi tertentu

Mengambar Arc pada Form dengan Pen

Kita dapat menggunakan metoda DrawArc(Pen,x,y,lebar,tinggi,sudutawal,sudutakhir) untuk mengambar arcus, adapun perbedaan antara Ellipse dengan Arc adalah, kalau ellipse adalah gambar kurva tertutup, sedangkan Arc ditentukan oleh sudut awal dan akhir pengambaran kurva.

Mengambar Pie pada Form dengan Pen

Kalau Arc adalah kurva dengan sudut awal dan akhir, demikian juga pie, bedanya adalah pie merupakan kurva tertutup. Untuk menggambar pie dapat digunakan metoda DrawEllipse(Pen,x,y,lebar,tinggi).

Mengambar objek isian pada Form dengan Brush

Kalau kita mengambar bentuk dengan Pen, maka hasilnya tidak disertai dengan isian, sedangkan untuk menghasilkan gambar dengan isian kita membutuhkan Brush. 

Menggunakan SolidBrush

SolidBrush(warna) dapat digunakan untuk menggambarkan objek isian seperti FillRectangle(brush, rectangle), FillEllipse(brush, rectangle), FillPie(brush, rectangle, sudutawal, sudutakhir),  dengan warna yang ditentukan pada brush.

Menggunakan HatchBrush

HatchBrush(pola, warnagaris, warnalatarbelakang), dapat digunakan untuk menggambar objek isian dengan pola isian tertentu seperti :

§  HatchStyle.Horizontal

§  HatchStyle.Vertical

§  HatchStyle.ForwardDiagonal

§  HatchStyle.HatchStyleBackwardDiagonal

§  HatchStyle.HatchStyleCross

§  HatchStyle.HatchStyleDiagonalCross

HatchBrush terdefinisi pada namespace System.Drawing.Drawing2D

Berikut contoh kode program untuk membuat kotak dan elips

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim gambar As System.Drawing.Graphics

        Dim pena1 As New Pen(Color.Cyan, 2)

        Dim pena3 As New Pen(Color.Red, 2)

        gambar = Me.CreateGraphics

        gambar.DrawRectangle(pena1, 5, 5, 150, 275)

        gambar.DrawRectangle(pena3, 200, 80, 250, 150)

        Dim gambar1 As System.Drawing.Graphics

        Dim pena2 As New Pen(Color.Yellow, 2)

        Dim pena4 As New Pen(Color.Cyan, 2)

        gambar1 = Me.CreateGraphics

        gambar1.DrawEllipse(pena2, 5, 5, 150, 275)

        gambar1.DrawEllipse(pena4, 200, 80, 250, 150)

    End Sub