[VB.Net] [WinForm] Arrière plan en dégradé dans une form

infosam76 — Fri, 30 Aug 2013 09:27:34 +0000

Objectif

Obtenir un dégradé comme arrière plan pour une fenêtre.

Méthode

Il suffit de modifier la fonction de l’événement OnPaint de la fenêtre concernée.

Par exemple pour obtenir un dégradé horizontal :

Imports System.Drawing.Drawing2D
...
Private Sub Form1_Paint(ByVal sender As System.Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles MyBase.Paint
Dim formGraphics As Graphics = e.Graphics

Dim gradientBrush As New LinearGradientBrush(New Point(0, 0), New Point(Width, 0), Color.White, Color.DarkMagenta)

formGraphics.FillRectangle(gradientBrush, ClientRectangle)
End Sub

» WinForm

[VB.Net] [WinForm] Arrière plan en dégradé dans une form