Quantcast
Channel: GDI
Viewing all articles
Browse latest Browse all 3

GDI

$
0
0

Hola estoy  intentando poner los ejes de un plano (x,y) pero no me los muestra en el PictureBox

Esto es lo que he hecho:

Dim Ejes As GraphicsDim Presionado AsBoolean = FalseDim Graficar AsBooleanPrivateSub btnEjes_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnEjes.Click

    Ejes = PictureBox1.CreateGraphics

    Dim lapiz AsNew Pen(Color.Black)Dim Eje_x AsInteger = PictureBox1.Width / 2Dim Eje_y AsInteger = PictureBox1.Height / 2


    Ejes.DrawLine(lapiz, Eje_x, 0, Eje_x, 0)

    Ejes.DrawLine(lapiz, 0, Eje_y, 0, Eje_y )

  EndSub

 


Estudiante de Sistemas Informáticos.

Viewing all articles
Browse latest Browse all 3

Latest Images

Vimeo 10.7.0 by Vimeo.com, Inc.

Vimeo 10.7.0 by Vimeo.com, Inc.

HANGAD

HANGAD

MAKAKAALAM

MAKAKAALAM

Doodle Jump 3.11.30 by Lima Sky LLC

Doodle Jump 3.11.30 by Lima Sky LLC

Doodle Jump 3.11.30 by Lima Sky LLC

Doodle Jump 3.11.30 by Lima Sky LLC

Vimeo 10.6.2 by Vimeo.com, Inc.

Vimeo 10.6.2 by Vimeo.com, Inc.

Vimeo 10.6.1 by Vimeo.com, Inc.

Vimeo 10.6.1 by Vimeo.com, Inc.



Latest Images

Vimeo 10.7.0 by Vimeo.com, Inc.

Vimeo 10.7.0 by Vimeo.com, Inc.

HANGAD

HANGAD

MAKAKAALAM

MAKAKAALAM

Doodle Jump 3.11.30 by Lima Sky LLC

Doodle Jump 3.11.30 by Lima Sky LLC

Doodle Jump 3.11.30 by Lima Sky LLC

Doodle Jump 3.11.30 by Lima Sky LLC

Vimeo 10.6.1 by Vimeo.com, Inc.

Vimeo 10.6.1 by Vimeo.com, Inc.