Paso 1.
El primer paso que vamos a hacer es el diseño de la calculadora por lo cual vamos a necesitar varios commandbutton 18 en total los primeros 12 son los numero del 0 al 9 el punto y el igual los otros cuatro son los simbolos de las ecuaciones +,-,* y / y dos mas con la opcion de borrar y nuevo.
Tambien pones un textbox que sera el q nos permita visulizar los numeros ingresados.
Paso 2.
El segundo paso es ingresar los codigos en cada boton como son bastantes commandbutton seran bastantes codigos ya q se aplica a cada uno
Dim num1 As Integer
Dim num2 As Integer
Dim op As String
Private Sub Command1_Click(Index As Integer)
Text1.Text = Text1.Text & 7
End Sub
Private Sub Command10_Click()
Text1.Text = Text1.Text & "."
End Sub
Private Sub Command11_Click()
Text1.Text = Text1.Text & 0
End Sub
Operaciones
Private Sub Command12_Click()
If (num1 = 0) Then
MsgBox ("no realizo una operacion")
Else
num2 = Text1.Text
If op = "+" Then
Text1.Text = num1 + num2
End If
If op = "-" Then
Text1.Text = num1 - num2
End If
If op = "*" Then
Text1.Text = num1 * num2
End If
If op = "/" Then
Text1.Text = num1 / num2
End If
End If
End Sub
Suma
Private Sub Command13_Click()
num1 = Text1.Text
Text1.Text = ""
op = "+"
Text1.SetFocus
End Sub
Resta
Private Sub Command14_Click()
num1 = Text1.Text
Text1.Text = ""
op = "-"
Text1.SetFocus
End Sub
Multiplicacion
Private Sub Command15_Click()
num1 = Text1.Text
Text1.Text = ""
op = "*"
Text1.SetFocus
End Sub
Divicion
Private Sub Command16_Click()
num1 = Text1.Text
Text1.Text = ""
op = "/"
Text1.SetFocus
End Sub
Borrar
Private Sub Command17_Click()
Text1.Text = ""
Text1.SetFocus
End Sub
Nuevo
Private Sub Command18_Click()
Text1.Text = ""
Text1.SetFocus
End Sub
Numero 8
Private Sub Command2_Click()
Text1.Text = Text1.Text & 8
End Sub
Numero 9
Private Sub Command3_Click()
Text1.Text = Text1.Text & 9
End Sub
Numero 4
Private Sub Command4_Click()
Text1.Text = Text1.Text & 4
End Sub
Numero 5
Private Sub Command5_Click()
Text1.Text = Text1.Text & 5
End Sub
Numero 6
Private Sub Command6_Click()
Text1.Text = Text1.Text & 6
End Sub
Numero 1
Private Sub Command7_Click()
Text1.Text = Text1.Text & 1
End Sub
Numero 2
Private Sub Command8_Click()
Text1.Text = Text1.Text & 2
End Sub
Numero 3
Private Sub Command9_Click()
Text1.Text = Text1.Text & 3
End Sub
Paso 3.
Despues de ingresar los codigos ponemos ejecutar y con eso podremos ver si todos los botones funcionan con sus respectivos comandos.
Mogrovejo Carlos (tercero de informática)
jueves, 2 de junio de 2016
Las 4 ecuaciones
Paso 1.
El primer paso son ingresar los cuadros q vamos a utilizar 3 textbox, 3 label con los escritos ingrese el primer numero ingrese el segundo resultado y 4 commandbutton cada uno con su nombre suma, resta, multiplicacion y divicion.
Paso 2.
Como segundo paso lo q aremos es poner los codigos de cada ecuacion para asi poder hacer q funcione nuestros botones
Suma
Private Sub Command1_Click()
a = Val(Text1)
b = Val(Text2)
Text3 = a + b
End Sub
Resta
Private Sub Command2_Click()
a = Val(Text1)
b = Val(Text2)
Text3 = a - b
End Sub
Multiplicacion
Private Sub Command3_Click()
a = Val(Text1)
b = Val(Text2)
Text3 = a * b
End Sub
Divicion
Private Sub Command4_Click()
a = Val(Text1)
b = Val(Text2)
Text3 = a / b
End Sub
Paso 3.
Lo que hacemos es ejecutar el programa y probar las ejecuciones con el fin de que nos salgan los resultados exactos.
El primer paso son ingresar los cuadros q vamos a utilizar 3 textbox, 3 label con los escritos ingrese el primer numero ingrese el segundo resultado y 4 commandbutton cada uno con su nombre suma, resta, multiplicacion y divicion.
Paso 2.
Como segundo paso lo q aremos es poner los codigos de cada ecuacion para asi poder hacer q funcione nuestros botones
Suma
Private Sub Command1_Click()
a = Val(Text1)
b = Val(Text2)
Text3 = a + b
End Sub
Resta
Private Sub Command2_Click()
a = Val(Text1)
b = Val(Text2)
Text3 = a - b
End Sub
Multiplicacion
Private Sub Command3_Click()
a = Val(Text1)
b = Val(Text2)
Text3 = a * b
End Sub
Divicion
Private Sub Command4_Click()
a = Val(Text1)
b = Val(Text2)
Text3 = a / b
End Sub
Paso 3.
Lo que hacemos es ejecutar el programa y probar las ejecuciones con el fin de que nos salgan los resultados exactos.
martes, 31 de mayo de 2016
Grados
Paso 1,
Para hacer este poblema vamos a necesitar de un VscrollBar, dos textbox, dos label y un commandbutton en los dos label escribimos lo siguiente el primero sera grados centigrados y en el otro grados fahrenheit y en el commandbutton escribimos salir.
Paso 2,
Lo que hacemos es poner el codigo para la poder ejecutar el programa y poder ver los grados.
comando para salir
Private Sub Command1_Click()
Beep
End
End Sub
comando para calcular los grados;
Private Sub VScroll1_Change()
Text1.Text = VScroll1.Value
Text2.Text = 32 + 1.8 * VScroll1.Value
End Sub
Paso 3,
Podemos ejecutar el programa y veremos el resultado nos saldra los grados con forme movamos la barra.
Para hacer este poblema vamos a necesitar de un VscrollBar, dos textbox, dos label y un commandbutton en los dos label escribimos lo siguiente el primero sera grados centigrados y en el otro grados fahrenheit y en el commandbutton escribimos salir.
Paso 2,
Lo que hacemos es poner el codigo para la poder ejecutar el programa y poder ver los grados.
comando para salir
Private Sub Command1_Click()
Beep
End
End Sub
comando para calcular los grados;
Private Sub VScroll1_Change()
Text1.Text = VScroll1.Value
Text2.Text = 32 + 1.8 * VScroll1.Value
End Sub
Paso 3,
Podemos ejecutar el programa y veremos el resultado nos saldra los grados con forme movamos la barra.
Colores
Paso 1.
Paso 2.
Lo segundo que aremos es ingresar los comandos de cada boton lo primero q escribiremos
Text1 = ""
Text1.BackColor = vbWrite
Text1.ForeColor = vbBlack
Text1.SetFocus
End Sub
El comando de salir
End
End Sub
Ahora los comandos de colores de fondo.
Private Sub Option1_Click()
Text1.BackColor = vbRed
End Sub
Private Sub Option2_Click()
Text1.BackColor = vbGreen
End Sub
Private Sub Option3_Click()
Text1.BackColor = vbBlue
End Sub
Comandos de la fuente:
Private Sub Option4_Click()
Text1.ForeColor = vbCyan
Text1.SetFocus
End Sub
Private Sub Option5_Click()
Text1.ForeColor = vbMagenta
Text1.SetFocus
End Sub
Private Sub Option6_Click()
Text1.ForeColor = vbWhite
Text1.SetFocus
End Sub
Paso 3.
Como ultimo paso mandamos a ejecutar el programa y podemos comprobar si los colores funcionan en el fondo y el color de texto.
El primer paso es ingresar los botones q vamos a necesitar como primero vamos a ingresara un Textbox, tambien ingresamos dos Frame y los nombramos a uno le ponemos color de fondo y al otro lo ponemos color de fuente, dentro de cada frame ponemos 3 obtionbutton con diferentes colores y por ultimo dos commandbutton nuevo y salir.
Paso 2.
Lo segundo que aremos es ingresar los comandos de cada boton lo primero q escribiremos
Text1 = ""
Text1.BackColor = vbWrite
Text1.ForeColor = vbBlack
Text1.SetFocus
End Sub
El comando de salir
End
End Sub
Ahora los comandos de colores de fondo.
Private Sub Option1_Click()
Text1.BackColor = vbRed
End Sub
Private Sub Option2_Click()
Text1.BackColor = vbGreen
End Sub
Private Sub Option3_Click()
Text1.BackColor = vbBlue
End Sub
Comandos de la fuente:
Private Sub Option4_Click()
Text1.ForeColor = vbCyan
Text1.SetFocus
End Sub
Private Sub Option5_Click()
Text1.ForeColor = vbMagenta
Text1.SetFocus
End Sub
Private Sub Option6_Click()
Text1.ForeColor = vbWhite
Text1.SetFocus
End Sub
Paso 3.
Como ultimo paso mandamos a ejecutar el programa y podemos comprobar si los colores funcionan en el fondo y el color de texto.
Suma De Dos Numeros
Paso 1.
Poner 3 label 3 textbox y y 3 commandButton acomodarlos cada uno en su lugar y poner la informacion de cada uno segun corresponda
Los 3 label diran ingrese un numero, ingrese otro numero y resultado.
Los 3 textbox iran en blanco
Los 3 commandButton tendra cada una su funcion calcular, limpiar y salir.
Paso 2.
Ingresamos a cada commmandbutton y ponemos los siguientes codigos para que cumplan con las funciones.
Private Sub Command_calcular_Click()
Dim a, b, RESU As Integer
a = 0
b = 0
RESU = 0
End Sub
Calcular:
RESU = Val(a) + Val(b)
End Sub
Limpiar:
a = ""
b = ""
RESU = ""
a.SetFocus
End Sub
Salir:
End
End Sub
Paso 3.
Lo que aremos al final es ejecutar el programa y asi podremos ver como funciona el programa.
Poner 3 label 3 textbox y y 3 commandButton acomodarlos cada uno en su lugar y poner la informacion de cada uno segun corresponda
Los 3 label diran ingrese un numero, ingrese otro numero y resultado.
Los 3 textbox iran en blanco
Los 3 commandButton tendra cada una su funcion calcular, limpiar y salir.
Paso 2.
Ingresamos a cada commmandbutton y ponemos los siguientes codigos para que cumplan con las funciones.
Private Sub Command_calcular_Click()
Dim a, b, RESU As Integer
a = 0
b = 0
RESU = 0
End Sub
Calcular:
RESU = Val(a) + Val(b)
End Sub
Limpiar:
a = ""
b = ""
RESU = ""
a.SetFocus
End Sub
Salir:
End
End Sub
Paso 3.
Lo que aremos al final es ejecutar el programa y asi podremos ver como funciona el programa.
lunes, 30 de mayo de 2016
Resumen 3
La MAN es una red que abarca un área metropolitana, como, por ejemplo,
una ciudad o una zona suburbana. Una MAN generalmente consta de una o más LAN
dentro de un área geográfica común. Por ejemplo, un banco con varias sucursales
puede utilizar una MAN.
·
Rendimiento: Las SAN permiten el acceso concurrente de matrices de disco o
cinta por dos o más servidores a alta velocidad, proporcionando un mejor
rendimiento del sistema.
·
Disponibilidad: Las SAN tienen una tolerancia incorporada a los desastres, ya que
se puede hacer una copia exacta de los datos mediante una SAN hasta una
distancia de 10 kilómetros (km) o 6,2 millas.
·
Escalabilidad: Al igual que una LAN/WAN, puede usar una amplia gama de tecnologías.
Esto permite la fácil reubicación de datos de copia de seguridad, operaciones,
migración de archivos, y duplicación de datos entre sistemas.
1.10 REDES INTERNAS Y EXTERNAS
la LAN interna de la organización. Dentro de una red interna, los servidores de Web se instalan en la red. por ejemplo datos financieros o datos basados en texto y gráficos que se guardan en esos servidores.
Las redes externas hacen referencia a aplicaciones y servicios basados en la red interna, y utilizan un acceso extendido y seguro a usuarios o empresas externas Este acceso generalmente se logra mediante contraseñas, identificaciones de usuarios, y seguridad a nivel de las aplicaciones.
2.
ANCHO DE BANDA
1.1. IMPORTANCIA DEL ANCHO DE BANDA
El ancho de banda se define como la cantidad de información que puede fluir a través de una conexión de red en un período dado.
El ancho de banda es finito. En otras palabras, independientemente del medio que se utilice para construir la red, existen límites para la capacidad de la red para transportar información. El ancho de banda está limitado por las leyes de la física y por las tecnologías empleadas para colocar la información en los medios. Por ejemplo, el ancho de banda de un módem convencional está limitado a alrededor de 56 kpbs por las propiedades físicas. Aun así, el ancho de banda de la fibra óptica no se puede aprovechar en su totalidad, en tanto no se desarrollen tecnologías que aprovechen todo su potencial.
El ancho de banda no es gratuito. Es posible adquirir equipos para una red de área local (LAN) capaz de brindar un ancho de banda casi ilimitado durante un período extendido de tiempo. Para conexiones de red de área amplia (WAN), casi siempre hace falta comprar el ancho de banda de
un proveedor de servicios.. Un administrador de red necesita tomar las decisiones correctas con respecto al tipo de equipo y servicios que debe adquirir.
El ancho de banda es un factor clave a la hora de analizar el rendimiento de una red, diseñar nuevas redes y comprender la Internet. Un profesional de networking debe comprender el fuerte impacto del ancho de banda y la tasa de transferencia en el rendimiento y el diseño de la red. La información fluye en una cadena de bits de un computador a otro en todo el mundo.
La demanda de ancho de banda no para de crecer. No bien se construyen nuevas tecnologías e infraestructuras de red para brindar mayor ancho de banda, se crean nuevas aplicaciones que aprovechan esa mayor capacidad. La entrega de contenidos de medios enriquecidos a través de la red, incluyendo video y audio fluido, requiere muchísima cantidad de ancho de banda.
2.2. ANALOGIAS:
El ancho de banda se define como la cantidad de información que puede fluir a través de una red en un período dado. La idea de que la información fluye, sugiere dos analogías que podrían facilitar la visualización del ancho de banda en una red.
El ancho de banda es similar al diámetro de un caño. Una red de tuberías trae agua potable a los hogares y las empresas y se lleva las aguas servidas. Esta red de agua está compuesta de tuberías de diferentes diámetros. Las principales tuberías de agua de una ciudad pueden medir dos metros de diámetro, en tanto que la tubería de un grifo de cocina puede medir apenas dos centímetros.
El ancho de banda también puede compararse con la cantidad de carriles de una autopista. Una red de caminos sirve a cada ciudad o pueblo. Las grandes autopistas con muchos carriles se conectan a caminos más pequeños con menor cantidad de carriles.
Resumen 2
1.3 TOPOLOGÍA DE RED
La topología de red define la estructura de una red. Una parte de la
definición topológica es la topología física, que es la disposición real de los
cables o medios.
Una topología de bus usa un solo cable backbone que debe
terminarse en ambos extremos. Todos los hosts se conectan directamente a este
backbone.
La topología de anillo conecta un host con el siguiente y al
último host con el primero. Esto crea un anillo físico de cable.
La topología en estrella conecta todos los cables con un punto
central de concentración.
Una topología en estrella extendida conecta estrellas individuales
entre sí mediante la conexión de hubs o switchs. Esta topología puede extender
el alcance y la cobertura de la red.
La topología lógica de
una red es la forma en que los hosts se comunican a través del medio. Los dos
tipos más comunes de topologías lógicas son broadcast (transmisión
de un paquete que será recibido por todos los dispositivos en una red) y transmisión de tokens.
La segunda topología lógica es la transmisión de tokens. La transmisión
de tokens controla el acceso a la red mediante la transmisión de un token
electrónico a cada host de forma secuencial.
1.4 PROTOCOLOS DE RED
Los conjuntos de protocolos son colecciones de protocolos que
posibilitan la comunicación de red desde un host, a través de la red, hacia
otro host. Un protocolo es una descripción formal de un conjunto de reglas y
convenciones que rigen un aspecto particular de cómo los dispositivos de una
red se comunican entre sí.
Estas normas de red son creadas y administradas por una serie de
diferentes comités. Entre ellos se incluyen el Instituto de Ingeniería
Eléctrica y Electrónica
1.5 REDES DE AREA LOCAL
Las LAN permiten a las
empresas aplicar tecnología informática para compartir localmente archivos e
impresoras de manera eficiente, y posibilitar las comunicaciones internas. Un
buen ejemplo de esta tecnología es el correo electrónico. Los que hacen es conectar
los datos, las comunicaciones locales y los equipos informáticos.
1.6 REDES DE ÁREA AMPLIA (WAN)
Las WAN interconectan las LAN, que a su vez proporcionan acceso a los
computadores o a los servidores de archivos ubicados en otros lugares. Como las
WAN conectan redes de usuarios dentro de un área geográfica extensa, permiten
que las empresas se comuniquen entre sí a través de grandes distancias. Las WAN
permiten que los computadores, impresoras y otros dispositivos de una LAN
compartan y sean compartidas por redes en sitios distantes.
Suscribirse a:
Comentarios (Atom)
















