1. Visual Basic - Curso completo teoria y practica
1. Visual Basic - Curso completo teoria y practica 1. Visual Basic - Curso completo teoria y practica
Case 9 : F = 3 * Cos(2 * THETA) - Cos(6 * THETA) Case 10: F = 1 / Cos(2 * THETA) + 1 Case 11: If Int(THETA / 45) THETA / 45 Or THETA 0 _ End Select End Function Private Sub LstEcuacion_Click() OP = LstEcuacion.ListIndex End Sub Private Sub CmdVisualizar_Click() Dim X As Single, Y As Single Dim I As Single, R As Single DosPi = 8 * Atn(1) PicPlano.Cls PicPlano.ScaleMode = 3 Then F = 1 / (Cos(2 * THETA) + Tan(2 * THETA)) PicPlano.Scale (-3.25, 3.25)-(3.25, -3.25) PicPlano.Line (-3.25, 0)-(3.25, 0) PicPlano.Line (0, -3.25)-(0, 3.25) For I = 0 To DosPi Step 0.01 Next End Sub R = F(I) Fractales X = R * Cos(I) Y = R * Sin(I) PicPlano.PSet (X, Y), QBColor(1) Pág. 216
La matemática fractal es producto de la interacción de un matemático genial (Benoit B. Mandelbrot) y la computadora. El ahora ubicuo término fractal se debe al hecho de que la matemática fractal trabaja con fracciones, las figuras generadas no tienen una relación de enteros entre sus componentes, de modo que ninguna dimensión es producto de otra multiplicada por un entero. Es decir, al dividir una dimensión entre otra nunca se obtiene un resultado exacto. Los fractales generan figuras y estas figuras resultan tener una extraña similitud con algunas formas que genera la naturaleza. Entre las ecuaciones para generar fractales Mandelbrot ha producido una en particular que ha recibido el nombre de “Conjunto de Mandelbrot”. Esta ecuación se resuelve en el campo de los números comprendidos entre las longitudes -2.0 a +0.5 y las latitudes -1.25 a +1.25, está dominado por un gran mar fractal con bahías y entrantes. La expresión matemática del Conjunto de Mandelbrot es: Z Z C n+ 1 = + 2 n Donde C es un número complejo constante y Z es un número complejo variable que permite obtener las respectivas iteraciones (los valores de cada punto del paisaje fractal, latitud y longitud). Pág. 217
- Page 165 and 166: Función Input Retorna los siguient
- Page 167 and 168: sus prestaciones son bastante limit
- Page 169 and 170: Private Sub MnuArchivoAbrir_Click()
- Page 171 and 172: longitud), lo cuales son identifica
- Page 173 and 174: Get # NÚMERO_ARCHIVO, NÚMERO_REG,
- Page 175 and 176: La función Loc() aplicada a un arc
- Page 177 and 178: Frame1 Frame2 Frame3 Label1 Label2
- Page 179 and 180: Command3 Command4 Command5 Command6
- Page 181 and 182: End Sub TxtVacantes.Locked = Not Ok
- Page 183 and 184: End Sub POSICION = Loc(N1) + 1 If P
- Page 185 and 186: End Sub Open “C:\DATA\TEMPO.DAT
- Page 187 and 188: Permite grabar en un archivo binari
- Page 189 and 190: Por ejemplo si ingresa el mensaje
- Page 191 and 192: Como ejemplo considere los siguient
- Page 193 and 194: El ejemplo inicial (código hexadec
- Page 195 and 196: Por ejemplo, las instrucciones sigu
- Page 197 and 198: A manera de ejemplo considere la es
- Page 199 and 200: Para el dibujo de puntos se usará
- Page 201 and 202: En el ejemplo anterior se utiliza l
- Page 203 and 204: Para este ejemplo crear una nueva a
- Page 205 and 206: Para el desarrollo de la presente a
- Page 207 and 208: Control Line Line es un control gr
- Page 209 and 210: Como ejemplo de este tipo de gráfi
- Page 211 and 212: Para realizar nuestra aplicación d
- Page 213 and 214: Para el caso de las gráficas de ec
- Page 215: Luego proceda a ingresar el código
- Page 219 and 220: Para el desarrollo de la presente a
- Page 221 and 222: En este capítulo, debido a las lim
- Page 223 and 224: La presente Guía de Laboratorio de
- Page 225 and 226: Para el desarrollo de esta aplicaci
- Page 227 and 228: Text1 Text2 Text3 Text4 Text5 Text6
- Page 229 and 230: Luego, haga doble click sobre el bo
- Page 231 and 232: A continuación active la casilla d
- Page 233 and 234: Label10 Nombre LblImpuesto Caption
- Page 235 and 236: En primer lugar debemos cargar los
- Page 237 and 238: A continuación haga doble click so
- Page 239 and 240: Private Sub CmdAceptar_Click() Dim
- Page 241 and 242: Los descuentos a aplicar son sobre
- Page 243 and 244: Label4 Label5 Text1 Text2 Text3 Tex
- Page 245 and 246: Check3 Command1 Command2 Command3 N
- Page 247 and 248: Cuatro notas entre 0 y 20 represent
- Page 249 and 250: Label6 Label7 Text1 Text2 Text3 Tex
- Page 251 and 252: N3 = Val(TxtN3) : N4 = Val(TxtN4) P
- Page 253 and 254: Form1 Label1 Label2 Label3 Label4 T
- Page 255 and 256: Case 10: CadMes = “Octubre” Cas
- Page 257 and 258: Para el desarrollo de esta aplicaci
- Page 259 and 260: El diseño de la interfaz debe ser
- Page 261 and 262: Para el desarrollo de esta aplicaci
- Page 263 and 264: Label5 Label6 Label7 Text1 Text2 Te
- Page 265 and 266: Una vez establecidas las propiedade
La matemática fractal es producto de la interacción de un<br />
matemático genial (Benoit B. Mandelbrot) y la computadora.<br />
El ahora ubicuo término fractal se debe al hecho de que la<br />
matemática fractal trabaja con fracciones, las figuras<br />
generadas no tienen una relación de enteros entre sus<br />
componentes, de modo que ninguna dimensión es producto de otra<br />
multiplicada por un entero. Es decir, al dividir una dimensión<br />
entre otra nunca se obtiene un resultado exacto. Los fractales<br />
generan figuras y estas figuras resultan tener una extraña<br />
similitud con algunas formas que genera la naturaleza.<br />
Entre las ecuaciones para generar fractales Mandelbrot ha<br />
producido una en particular que ha recibido el nombre de<br />
“Conjunto de Mandelbrot”. Esta ecuación se resuelve en el campo<br />
de los números comprendidos entre las longitudes -2.0 a +0.5 y<br />
las latitudes -<strong>1.</strong>25 a +<strong>1.</strong>25, está dominado por un gran mar<br />
fractal con bahías y entrantes. La expresión matemática del<br />
Conjunto de Mandelbrot es:<br />
Z Z C<br />
n+<br />
1 = +<br />
2<br />
n<br />
Donde C es un número complejo constante y Z es un número<br />
complejo variable que permite obtener las respectivas<br />
iteraciones (los valores de cada punto del paisaje fractal,<br />
latitud y longitud).<br />
Pág. 217