Programación en Visual Basic 2008

Recommendations

Info

Mantenga el proyecto abierto: le agregará elementos en el procedimiento siguiente. Dibujar formas con relleno Hasta ahora, las formas que ha dibujado son sólo contornos. Para dibujar formas con colores sólidos, debe utilizar uno de los métodos de relleno, como FillRectangle o FillEllipse. Los métodos de relleno utilizan un objeto Brush, otro tipo de objeto gráfico que puede pintar. Al rellenar una forma con un color diferente, deberá definir coordenadas que sean más pequeñas que la forma; de lo contrario se cubrirá el borde. Por ejemplo, para rellenar un cuadrado con las coordenadas 0, 0, 150, 150, se especificará un relleno con las coordenadas 1, 1, 148, 148, que tiene en cuenta el grosor de un píxel de la línea. Para dibujar formas con relleno En el controlador del evento Form1_Paint, agregue el siguiente código debajo del código que escribió antes. Visual Basic Express Copiar código ' Fill the circle with the same color as its border. e.Graphics.FillEllipse(Brushes.Red, 0, 0, 150, 150) ' Fill the square with a different color. e.Graphics.FillRectangle(Brushes.Aquamarine, 31, 31, 148, 148) Presione F5 para ejecutar el programa. Observe que el cuadrado con relleno aparece por encima del círculo con relleno, pero esa parte de su borde ha desaparecido. El orden en el que se llama a los métodos gráficos determina el orden en el que se dibujan; en este caso, el círculo con relleno se dibujó después del rectángulo con borde azul. Trate de cambiar el orden de los métodos y vea lo que pasa. Dibujar texto en un formulario En esta lección, aprenderá a dibujar un texto en un formulario mediante la utilización de métodos gráficos. En una lección anterior, aprendió a mostrar texto mediante un control Label. Sin embargo, hay casos en los que podrá o deberá dibujar el texto personalmente utilizando métodos gráficos. Por ejemplo, si desea que el texto Everts Garay | Granada, Nicaragua| Paseo por Visual Basic 2008 156
esté inclinado, no puede utilizar un control Label, pero sí puede utilizar métodos gráficos para dibujar texto en cualquier ángulo. Dibujar texto Para dibujar texto en un formulario o control, se utiliza el método gráfico DrawString. Al igual que los otros métodos de dibujo, DrawString toma un objeto Brush que determina el color y las coordenadas que especifican dónde dibujar el texto, en este caso, las coordenadas X e Y de la esquina superior izquierda del rectángulo delimitador para el texto. El método DrawString también tiene dos argumentos adicionales: la cadena que desea dibujar y la fuente que determina el aspecto del texto. Para especificar la fuente, primero debe crear un objeto Font y utilizar dicho objeto como un argumento al método DrawString. Inténtelo Para dibujar texto En el menú Archivo, elija Nuevo proyecto. En el cuadro de diálogo Nuevo proyecto, en el panel Plantillas, haga clic en Aplicación para Windows. En el cuadro Nombre, escriba DrawText y haga clic en Aceptar. Se abre un nuevo proyecto de formularios Windows Forms. Haga doble clic en el formulario para abrir el Editor de código y seleccione Pintar de la lista desplegable Eventos. En el controlador de eventos Form1_Paint, agregue el siguiente código. Visual Basic Express Copiar código ' Create a font object. Dim aFont As New System.Drawing.Font("Arial", 22, FontStyle.Bold) ' Display the text with the DrawString method. e.Graphics.DrawString("Graphics are fun!", aFont, Brushes.Black, _ 20, 10) Presione F5 para ejecutar el programa. Debe poder ver el texto que se muestra en el formulario. Mantenga abierto el proyecto: continuará utilizándolo en el siguiente procedimiento. Everts Garay | Granada, Nicaragua| Paseo por Visual Basic 2008 157
Page 1 and 2:
[2008] Visual Basic 2008 By Everts
Page 3 and 4:
Cree un proyecto. Un proyecto conti
Page 5 and 6:
según la tarea del momento, tómes
Page 7 and 8:
Figura 3: Formulario de Visual Basi
Page 9 and 10:
Se muestra un nuevo formulario en e
Page 11 and 12:
ealizar alguna tarea cuando se haga
Page 13 and 14:
aprenderá más acerca de cómo esc
Page 15 and 16:
Paso 4: agregar código de Visual B
Page 17 and 18:
Puede parecer increíble que el pro
Page 19 and 20:
For...Next realizado. Hacer que un
Page 21 and 22:
Los elementos de programación de V
Page 23 and 24:
Esta línea de código toma el valo
Page 25 and 26:
MsgBox(aString) MsgBox(aBoolean) Vi
Page 27 and 28:
Si necesita almacenar más de un ti
Page 29 and 30:
En el cuadro Nombre, escriba Concat
Page 31 and 32:
Dim players() As Integer = {1, 2, 3
Page 33 and 34:
Operadores aritméticos Las expresi
Page 35 and 36:
¿Qué pasa cuándo desea mostrar u
Page 37 and 38:
Otras funciones de conversión num
Page 39 and 40:
Presione F5 para ejecutar la aplica
Page 41 and 42:
Visual Basic Express Copiar código
Page 43 and 44:
String que representa el tiempo par
Page 45 and 46:
Escriba un valor numérico en cada
Page 47 and 48:
utilizar la instrucción Do...While
Page 49 and 50:
Dim counter2 As Integer = 0 Do Unti
Page 51 and 52:
If My.Computer.Clock.LocalTime.DayO
Page 53 and 54:
En este ejemplo, cualquier número
Page 55 and 56:
Aparecerá un cuadro de mensaje que
Page 57 and 58:
Presione F5 para ejecutar el progra
Page 59 and 60:
En la ventana Propiedades, cambie l
Page 61 and 62:
En el cuadro Nombre, escriba Button
Page 63 and 64:
Seleccione el control Label y arrá
Page 65 and 66:
Quizá haya notado en el ejemplo an
Page 67 and 68:
Button1.Text = "The mouse has enter
Page 69 and 70:
If CheckBox2.Checked = True Then to
Page 71 and 72:
Los controles contenedores más com
Page 73 and 74:
Se abrirá el cuadro de diálogo Ag
Page 75 and 76:
Asegúrese de que Eventos de Form1
Page 77 and 78:
Información detallada: más inform
Page 79 and 80:
En el Cuadro de herramientas, arras
Page 81 and 82:
Seleccione el componente Timer y, a
Page 83 and 84:
Observe que el programa todavía es
Page 85 and 86:
del compilador, aparecerá un cuadr
Page 87 and 88:
error, el programa se detendrá y e
Page 89 and 90:
sin cambiar el código. Una ventana
Page 91 and 92:
¿Qué? Esto no debiera haber ocurr
Page 93 and 94:
En el siguiente procedimiento se es
Page 95 and 96:
ejemplo de esa lección, aún exist
Page 97 and 98:
Agregar notas a programas: utilizar
Page 99 and 100:
Presione F5 para ejecutar el progra
Page 101 and 102:
En la lección anterior, aprendió
Page 103 and 104:
En el Diseñador de tablas, desacti
Page 105 and 106: En la ventana Orígenes de datos, s
Page 107 and 108: Agregar o modificar registros: actu
Page 109 and 110: se pueden utilizar para representar
Page 111 and 112: Aunque los programas pueden ser con
Page 113 and 114: Agregar propiedades a una clase En
Page 115 and 116: Agregue el siguiente código de dec
Page 117 and 118: Visual Basic Express Copiar código
Page 119 and 120: Si bien la mayoría de los métodos
Page 121 and 122: Se pueden crear varias versiones de
Page 123 and 124: Para crear un proyecto de prueba pa
Page 125 and 126: If person1.Alive = True Then Else M
Page 127 and 128: Generar una clase en una clase exis
Page 129 and 130: Position = positionValue End Get Se
Page 131 and 132: MsgBox(player1.Position & " " & pla
Page 133 and 134: En el Explorador de soluciones, sel
Page 135 and 136: En el Editor de código, agregue lo
Page 137 and 138: Aunque este sistema funciona para e
Page 139 and 140: Cuando diseña programas, organiza
Page 141 and 142: En el Cuadro de herramientas, arras
Page 143 and 144: modifique fuera de su propio códig
Page 145 and 146: Expressalmacena los números, de fo
Page 147 and 148: En el menú Archivo, elija Guardar
Page 149 and 150: Get Return text1 End Get Set(ByVal
Page 151 and 152: En el Editor de código, agregue c
Page 153 and 154: En una lección anterior, aprendió
Page 155: Dibujar una forma es similar a dibu
Page 159 and 160: como argumento, junto con las coord
Page 161 and 162: En esta lección, aprenderá a publ
Page 163 and 164: Ahora puede utilizar la aplicación
Page 165 and 166: Information Server), las Extensione
Page 167 and 168: Una vez que se inserta el miniprogr
Page 169 and 170: Otra característica RAD incluida e
Page 171 and 172: aplicación o incluso reproducir ar
show all

Programación en Visual Basic 2008

Create successful ePaper yourself

Delete template?

Save as template?