Volver al Inicio Microsoft Student Tech Club: Universidad Libre

Dibujar texto 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

'Necesario para los gráficos GDI
Dim objGrafico As Graphics
objGrafico = e.Graphics

'Tipo de letra con los siguientes parámetros
'Fuente de la letra
'Tamaño de la letra
Dim objFuente As Font
objFuente = New Font(("Arial Black"), 100)

'Rellena con los siguientes parámetros
'Estilo del relleno
'Color del primer plano
'Color del fondo
Dim objCepillo As HatchBrush
objCepillo = New HatchBrush(HatchStyle.LargeGrid, Color.Ivory, Color.DarkSlateBlue)

'Dibuja el texto con los siguientes parámetros
'Texto que quiere dibujar
'Fuente de la letra
'Relleno de la letra
'X,Y punto superior izquierdo donde iniciará el texto
'Tamaño del rectángulo que incluye a el texto ancho,alto
objGrafico.DrawString("Texto gráfico", objFuente, objCepillo, New RectangleF(10, 20, 600, 400))

 

Volver al Inicio Célula Microsoft. Universidad Libre