Volver al Inicio Microsoft Student Tech Club: Universidad Libre

Llenar regiones con algún color en Visual Basic .NET 2008


Este es el resultado



El código es el siguiente

OJO, debe importar una librería primero

Imports System.Drawing.Drawing2D

Y este es el código que va dentro del paint

' Creamos un objeto que nos sirve para dibujar los gráficos
Dim objGrafico As Graphics = e.Graphics

' creamos la brocha para colorear la figura y le asignamos un color.
Dim brocha As New SolidBrush(Color.LightBlue)

' creamos un rectángulo el cual vamos a rellenar.
Dim rectangulo As New Rectangle(100, 100, 90, 50)

' creamos la región la cual vamos a colorear.
Dim regioncolorear As Region

'asignamos a la variable de tipo REGION los valores del rectángulo para colorear
regioncolorear = New Region(rectangulo)

' coloreamos la figura pasando como parámetros: la brocha y la región a colorear.
objGrafico.FillRegion(brocha, regioncolorear)

 

Volver al Inicio Célula Microsoft. Universidad Libre