Membuat BackColor Gradient pada Form

Asset : Form & Module

'Buat modul baru, Dan isikan kode di bawah ini
Dim a As New System.Drawing.Drawing2D.LinearGradientBrush(New RectangleF(0, 0, Frm.Width, Frm.Height), StartColor, EndColor, Mode)
        Dim g As Graphics = Frm.CreateGraphics
        g.FillRectangle(a, New RectangleF(0, 0, Frm.Width, Frm.Height))
        g.Dispose()


'Ketik di form resize atau tombol juga bisa

GradientForm(Me, Color.Red, Color.Blue, 0)

'Ketik di area kosong pada Form
Protected Overrides Sub OnPaint(ByVal e As System.Windows.Forms.PaintEventArgs)
        GradientForm(Me, Color.Red, Color.Blue, 0)
    End Sub

Ket : Modul berfungsi untuk membuat warna Bacground dan mengatur bentuk Gradient
        Form ReSize, Menentukan warna yang akan di buat dan mengatur ukuran Gradient sesuai skala pada    Form
        Fungsi kode terakhir, yaitu untuk menentukan warna yang akan dijadikan BackColor pada form (bisa di ganti)