martes, 26 de abril de 2011

TECNO.NOTICIAS 2 PERIODO

Toshiba: ha lanzado una nueva tableta en Japón, que está diseñado para el mercado empresarial, el Toshiba WT310 / C, que viene con Windows 7 Professional y cuenta con un procesador Intel Atom Z670 de 1.5GHz.






















Asus ROG G53S: Esta semana en el Computex 2011 Asus ha presentado su nueva ROG G53S portátil para juegos 3D, que no requiere gafas 3D especiales y ha ha sido diseñado justamente para ver sin lentes. La nueva Asus ROG portátiles G53S 3D está equipado con un potente procesador Intel potente Sandy Bridge Core i7 y está equipado con NVIDIA GTX 560M con 2 GB de memoria de vídeo dedicada.



















Acer Iconia M500 con Meego: Acer ha añadido otra nueva tableta a su gama Iconia con el lanzamiento del Acer M500 Iconia, y viene con un procesador Intel Atom y lo que más se destaca que funcionaría con sistema operativo Meego.De acuerdo con los chicos más en Engadget, que logró tener en sus manos el nuevo Acer M500 Iconia comparte una similar diseño del Acer A500, que es una tableta Android

















Científicos cerca de descubrir la antigravedad: Investigadores del CERN han anunciado que han sido capaces de atrapar 309 átomos de anti-hidrógeno por 15 minutos. Gracias a esto muy pronto se averiguará si la anti-materia obedece la ley de la gravedad o si sufre repulsión por parte de la materia y “cae” hacia arriba.




















Nintendo al ataque: la Wii HD se lanza en 2012;Nintendo ha roto el silencio y ha declarado que la sucesora de la Wii será lanzada el próximo año. Por un lado es fantástico ya que tenemos tiempo de ahorrar dinero, aunque por otro nadie debe tener de ganas de esperar tanto tiempo.
















Lenovo ThinkPad X1, nueva notebook ultra-delgada; Esta es la nueva Lenovo ThinkPad X1, una nueva laptop ultra-delgada de 13,3 pulgadas que se ha filtrado recientemente a la red.













El iTrainer con unos elegantes zapatos deportivos; El iTrainer de Apple pretende hacer de su entrenamiento una actividad de lo más vanguardista. Este aparato lee el ritmo del cuerpo y elige la música según el lugar en el que se encuentre. El zapato deportivo inteligente de Apple lee y procesa toda la información que se puede encontrar al paso y es la herramienta con la que se convertirá en un iAtleta campeón en poco tiempo.




















Tabla de picar con pantalla digital; Al ingresar en una cocina, la tabla de picar no es lo primero en lo que uno se fija. Pero esta no es la típica tabla de picar de toda la vida. El invento creado por Jess Griffin y Jim Termeer está dotado de tecnología de punta. Parte de sus funciones es una balanza digital, y todo lo que usted tiene que hacer es colocar la cebolla junto a la balanza y la tabla de cortar le informará cuánto pesa.











SEGUNDO PERIODO

Tema: OptionButton
Programa: Microsoft Office Excel
Ejercicio1:
Código:

Private Sub CommandButton1_Click()
Dim puntos As integer
If optionButton1= True then
Puntos=Puntos+20
End if
If optionButton5= True then
Puntos=Puntos+20
End if
If optionButton9= True then
Puntos=Puntos+20
End if
If optionButton13= True then
Puntos=Puntos+20
End if
If optionButton17= True then
Puntos=Puntos+20
End if
Msgbox”Total de puntos” +str(puntos)
End sub

Ejercicio 2:
Código:
Private Sub CommandButton1_Click()
Dim puntos As integer
If optionButton1= True then
Puntos=Puntos+20
End if
If optionButton5= True then
Puntos=Puntos+20
End if
If optionButton9= True then
Puntos=Puntos+20
End if
If optionButton13= True then
Puntos=Puntos+20
End if
If optionButton17= True then
Puntos=Puntos+20
End if
Msgbox”Total de puntos” +str(puntos)
Hoja6.cells(2,2)=str(puntos)
End sub

Tema: Combobox
Programa: Microsoft Office Excel
Ejrcicio 1:
Código:
Privae sub commandButton1_click()
Dim puntos As integer
If combobox1=”juan” then
Puntos=puntos+20
End if
If combobox2=”n.a” then
Puntos=puntos+20
End if
If combobox3=”i.t.c.d.” then
Puntos=puntos+20
End if
If combobox4=”café” then
Puntos=puntos+20
End if
If combobox5=”Thmás” then
Puntos=puntos+20
End if
Msgbox”Total de puntos” +str(puntos)
End sub

EJERCICIOS EN EXCEL UTILIZANDO COMMANBUTTON.

1. Crear un programa que sume 5 números e imprima el resultado
Código:
Private sub commanButton1_click()
Hoja1.cells(4,4)=Hoja1.cells(3,2)+Hoja1.cells(4,2)+ Hoja1.cells(5,2)+ Hoja1.cells(6,2)+ Hoja1.cells(7,2)

2.Crear un programa que calcule el área d un triangulo, dada la base y la altura. Del mismo.
Código:
Private sub commanButton1_click()
Hoja2.cells(3,4)=(Hoja2.cells(3,2)*Hoja2.cells(4,2))/2


Tema: Macro
Programa: Excel
Ejercicio 1:
Pasos:
1.Entrar a Excel, luego realizar un cuadro, seleccionando el área donde se ubicará y colocando bordes externos; dentro de dicho cuadro pondrás bordes externos a las celdas donde ingresarás la siguiente información:

Nombre:……celda
Apellido……..celda
Teléfono…….celda

2.Luego, en la hoja 2, escribe en a1: nombre, en b1:apellido, y en c1:teléfono.

3.Luego en la hoja1, debajo del recuadro, inserta un rectángulo de autoformas.
4.Elige la opción programador y luego haz clic en grabar macro, luego copia la celda a la que le has puesto margen, que está frente a nombre, y en la hoja dos pégala debajo de a1, dando clic derecho y elige la opción insertar celdas copiadas, luego te aparecerá una pequeña ventana, a la cual le darás aceptar. Del mismo modo has con los otros datos.

5.Luego borra la información (invisible) que hay en las celdas de la hoja 1 que copiaste, y detén el macro.

6.Por último da clic derecho a la figura de autoformas y elige la opción asignar macro, luego prosigue a llenar los datos, haz clic en el botón de autoformas y la información ingresada se pasará automáticamente para la hoja 2.