Volver al Inicio Microsoft Student Tech Club: Universidad Libre

Arcos en Visual Basic .NET 2008

Este es el resultado


El código es el siguiente

 

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

'Lápiz para el color de la línea y con un ancho de 5
Dim objLapiz As Pen
objLapiz = New Pen(Color.Blue, 5)

'Dibuja un arco con los siguientes par metros
'X, Y punto superior izquierdo donde se ubicar el pastel
'Ancho, Largo del rectángulo donde contendrá el pastel
'Angulo inicial en grados
'Angulo final (dibuja siguiendo las manecillas del reloj)
objGrafico.DrawArc(objLapiz, 10, 10, 200, 200, 0, 70)

 

Volver al Inicio Célula Microsoft. Universidad Libre