LECCION 27

Visual Basic 2015 Lección 27: Creación de los rectángulos

En la lección anterior en el, hemos aprendido cómo crear gráficos y objetos de la Pluma para dibujar líneas rectas en Visual Basic 2015. Ahora vamos a aprender a dibujar rectángulos.

27.1 Creación del rectángulo

Para dibujar un rectángulo en el formulario predeterminado en Visual Basic 2015, hay dos maneras:

(I) La primera consiste en dibujar un rectángulo directamente utilizando el método DrawRectangle mediante la especificación de su esquina superior izquierda de coordenadas y anchura y altura. También es necesario crear una gráfica y un objeto de la pluma para manejar el dibujo real. El método del objeto Graphics para dibujar el rectángulo es la sintaxis .El DrawRectangle es:

myGrapphics.DrawRectangle (myPen, X, Y, anchura, altura)

Donde myGraphics es el nombre de la variable del objeto Graphics y myPen es el nombre de la variable del objeto Pen creado por ti. Se puede utilizar cualquier nombre de variable válidos y significativos. X, Y es la coordenada de la esquina superior izquierda del rectángulo, mientras que la anchura y la altura se explican por sí, es decir, la anchura y la altura del rectángulo.

El código es el siguiente:

Dim myPen Como Pen

myPen = nueva pluma (Drawing.Color.Blue, 5)

myGraphics tenues como gráficos = Me.CreateGraphics

myGraphics.DrawRectangle (myPen, 0, 0, 100, 50)

(Ii) La segunda forma es crear un objeto rectangular primero y luego dibujar este triángulo usando el método DrawRectangle. La sintaxis es como se muestra a continuación:

myGraphics.DrawRectangle (myPen, myRectangle) donde myRectangle es el objeto rectángulo creado por usted, el usuario.

El código para crear un objeto rectangtle es como se muestra a continuación:

Dim myRectangle Como nuevo rectángulo

myRect.X = 10

myRect.Y = 10

myRect.Width = 100

myRect.Height = 50

También puede crear un objeto rectángulo con un código de una línea de la siguiente manera:

Dim myRectangle Como nuevo rectángulo (X, Y, anchura, altura)

y el código para dibujar el anterior es rectange

myGraphics.DrawRectangle (myPen, myRectangle)

27.2 Personalización de estilo de línea del objeto de la pluma

La forma nos acercamos hasta el momento han sido dibujados con línea continua, en realidad podemos personalizar el estilo de línea del objeto de la pluma de manera que hemos Línea de puntos, líneas se compone de guiones y más. Por ejemplo, se muestra a continuación la sintaxis para dibujar con línea de puntos:

myPen.DashStyle = Drawing.Drawing2D.DashStyle.Dot

Cuando el último argumento del punto especifica un valor de línea DashStyle en particular, una línea que compone de puntos aquí. Otros valores son DashStyles Dash, DashDot, DashDotDot y Solid.The siguiente código dibuja un rectángulo con línea punteada azul.

Private Sub Button1_Click (remitente de ByVal como System.Object, ByVal e As System.EventArgs) Maneja Button1.ClickDim myPen Como Pen

myPen = nueva pluma (Drawing.Color.Blue, 5)

myGraphics tenues como gráficos = Me.CreateGraphics

myPen.DashStyle = Drawing.Drawing2D.DashStyle.Dot

myGraphics.DrawRectangle (myPen, 10, 10, 100, 50)

End Sub

La imagen de salida es como se muestra en la Figura 27.1

vb2013_figure26.1

 Figura 27.1

Si cambia el valor de DashStyle DashDotDot, obtendrá el rectángulo siguiente:

27.2 vb2013_figure26.2Figure