Semana 23, por Bren

Tabla de dibujo Genius G-Pen F509
De la mano de Genius, nos hemos encontrado con esta nueva tabla de dibujo, la G-Pen F509, éstas son algunas de sus características:
* Tabla de trabajo de 5.25″ x 8. 75″* Lápiz inalámbrico* Compatible con Windows y Mac OS* Sensibilidad de 1.024 niveles* 26 hotkeys programables

Argentina: Celulares surtidos para cualquier paladar

Hay más de 3000 millones de usuarios de celulares en el mundo. Y cada uno tiene sus preferencias, si bien la mayoría comparte ciertos intereses por lo que puede ofrecer un móvil. Esto queda en evidencia, por ejemplo, al leer los comentarios de los lectores en las notas sobre el iPhone, el G1 de Android y otros equipos.

Convierte tu iPhone o iPod en una mini iMac

Para esto simplemente se necesita un dock que cumpla con esa función, como el iClooly, que se encargará de darle las funciones necesarias al iPhone o al iPod.
Sabemos que los docks son ciertamente útiles, y este en particular puede convertir tu iPhone o tu iPod Touch en una mini iMac, aunque sólo sea en apariencia.

Semana 22, por Bren

Artefactos electronicos
Esta fue la primera nota, me senti muy bien realizando estos dibujos y se nota una mejoria, se cumple uno de los principales objetivos que es hacer cosas cada vez mejores, los elementos tambien fueron realizados con figuras geomentricas y unos cuantos efectos de iluminacion los cuales hacen que los objetos parezcan reales, tambien se utilizaron algunos trucos como la fuente de la marca de uno de los objetos; fue un trabajo algo complicado por algunos de los objetos pero que dejaron una buena sensacion al verlos terminados ya que son agradables a la vista.

Sony lanza nueva línea de portátiles VAIO: A y C
Los amantes de las computadoras portátiles Sony estarán deleitados de leer esta noticia! La empresa ha lanzado dos nuevos modelos de notebook especiales para aquellos que no dudan en comprar buenas computadoras, con excelente diseño y de altos precios. La VAIO A (arriba) es un reemplazo de una computadora de escritorio, tiene una pantalla de 18.4 pulgadas y corre un procesador Intel Core 2 DUO T9400 a 2.53 GHz. La computadora ofrece pantalla 18.4 widescreen (resolución de 1920 x1080), 500 GB de disco duro, 2 GB de RAM, tarjeta NVIDIA GeForce 9600 GT de 512 MB, reproductor de Blu-Ray, cámara web de 1.3 megapíxeles, red wi-fi 802.11a/b/g/n, Bluetooth, LAN wireless y Vista premim. La serie VAIO AW comienza a venderse desde $2.798 dólares.
La VAIO CS (abajo) es una computadora que nos muestra otra coherencia en cuanto a relación precio-calidad, corre un procesador Intel Core 2 Duo P8400, esta serie incluye varios colores incluyendo rosado, negro, blanco, marrón y rojo. Posee una pantalla de 14.1 pulgadas widescreen (resolución 1280 x 800), 2 GB de RAM, disco duro de 160 GB, grabadora de DVD, cámara web de 1.3 megapíxeles, red wi-fi 802.11a/b/g/n, Bluetooth, LAN wireless y Vista premim. Disponible desde $1.539 dólares.

Sony VAIO TT: notebook ultra-liviana con reproductor de Blu-Ray
Sony ha anunciado ayer su último lanzamiento en cuanto a computadoras portátiles ultra-livianas, se trata de una laptop de peso ligero que incorpora un reproductor de Blu-Ray. La notebook VAIO TT se comenzará a vender desde $2.700 dólares inicialmente, más de $1000 dólares por encima de la MacBook Air por ejemplo. El precio quizás se debe a que incorpora un reproductor de Blu-Ray, que para cuestiones de comodidad es bastante más práctico tener el reproductor en la misma computadora que como unidad externa.
La notebook pesa 1.3 kgs y está bajo la marca de 1 pulgada en cuanto a lo fina que es. Incorpora una pantalla LCD wide-screen de 11.1 pulgadas, disco duro sólido de 256 GB en canal dual con (128GB x 2 en RAID) y corre un procesador Intel Centrino 2

Codigo de calculadora

Private Sub borrador_Click()
visor.Caption = " "
End Sub

Private Sub cinco_Click()
visor.Caption = visor.Caption + "5"
End Sub

Private Sub cuatro_Click()
visor.Caption = visor.Caption + "4"
End Sub

Private Sub dividido_Click()
auxiliaruno.Caption = visor.Caption
auxiliardos.Caption = "/"
visor.Caption = " "
End Sub

Private Sub dos_Click()
visor.Caption = visor.Caption + "2"
End Sub

Private Sub igual_Click()
If auxiliardos.Caption = "+" Then
visor.Caption = Val(auxiliaruno.Caption) + Val(visor.Caption)
auxiliaruno.Caption = ""
auxiliardos.Caption = ""
End If
If auxiliardos.Caption = "-" Then
visor.Caption = Val(auxiliaruno.Caption) - Val(visor.Caption)
auxiliaruno.Caption = ""
auxiliardos.Caption = ""
End If
If auxiliardos.Caption = "/" Then
visor.Caption = Val(auxiliaruno.Caption) / Val(visor.Caption)
auxiliaruno.Caption = ""
auxiliardos.Caption = ""
End If
If auxiliardos.Caption = "*" Then
visor.Caption = Val(auxiliaruno.Caption) * Val(visor.Caption)
auxiliaruno.Caption = ""
auxiliardos.Caption = ""
End If
End Sub


Private Sub mas_Click()
auxiliaruno.Caption = visor.Caption
auxiliardos.Caption = "+"
visor.Caption = " "
End Sub

Private Sub menos_Click()
auxiliaruno.Caption = visor.Caption
auxiliardos.Caption = "-"
visor.Caption = " "
End Sub

Private Sub multiplicar_Click()
auxiliaruno.Caption = visor.Caption
auxiliardos.Caption = "*"
visor.Caption = " "
End Sub

Private Sub nueve_Click()
visor.Caption = visor.Caption + "9"
End Sub

Private Sub ocho_Click()
visor.Caption = visor.Caption + "8"
End Sub

Private Sub punto_Click()
visor.Caption = visor.Caption + "."
End Sub

Private Sub seis_Click()
visor.Caption = visor.Caption + "6"
End Sub

Private Sub siete_Click()
visor.Caption = visor.Caption + "7"
End Sub

Private Sub tres_Click()
visor.Caption = visor.Caption + "3"
End Sub

Private Sub uno_Click()
visor.Caption = visor.Caption + "1"
End Sub

Private Sub zero_Click()
visor.Caption = visor.Caption + "0"
End Sub

Captura de pantalla:

Semana 21, por Bren

Salud en Primavera

“La primavera, la sangre altera”. Con la llegada de la primavera, la naturaleza parece estar en completa ebullición. Sin embargo, son muchas las personas que con el comienzo de esta estación se sienten cansadas o alicaídas, tanto física como psíquicamente. Es la llamada astenia primaveral, un trastorno leve y pasajero que se puede superar sin tratamiento. Para ello, es fundamental un diagnóstico preciso del médico de familia. Llevar una dieta equilibrada, dormir las horas necesarias, practicar ejercicio moderado y mantener una vida ordenada constituyen la mejor prevención para las personas más sensibles a los cambios estacionales.

La “máquina de Dios” estará fuera de servicio dos meses

El Gran Colisionador de Hadrones (LHC) que comenzó a funcionar hace diez días en lo que debe ser el mayor experimento científico del siglo, estará fuera de servicio durante al menos dos meses debido a una fuga de helio, según informó el Laboratorio Europeo de Física de Partículas.

Cartelera del Teatro Municipal

“Che, Bandoneón”, Homenaje al fuelle y sus intérpretes. Se contará con la presencia de los mayores exponentes del bandoneón en la ciudad y la región, como es el caso de Antonio Volpe, Aníbal Vitali y Víctor Alarcón; participará también el quinteto de bandoneones “De Yapa”, integrado por Nicolás Malbos, Pablo Amado, Julián Mansilla, Sebastián Moriones y Pinky Fernández en Contrabajo. Además contaremos con la presencia especial del Maestro Néstor Marconi.

Semana 20, por Bren

Gobierno argentino pide “creer en fortaleza” del país ante alarma por crisisBuenos Aires, (EFE).- El Gobierno argentino llamó a sus ciudadanos a “creer en las fortalezas” de la economía local frente a la preocupación expresada por la crisis financiera desatada en los Estados Unidos. “Creamos en nuestras fortalezas. Mucho de la economía es expectativa y en la medida que uno crea sobre la base de datos concretos como tiene Argentina, el país puede llegar a salir muy bien” de esta coyuntura internacional, dijo en declaraciones radiales el secretario de Finanzas, Hernán Lorenzino.

Por internet la llegada de pingüinos a la Patagonia argentina

Miles de pingüinos magallánicos llegan por estos días a las remotas costas de la provincia de Chubut, en el sureste de Argentina, donde se encuentra la mayor reserva continental de esta especie del mundo, y hoy el espectáculo natural se puede seguir en directo a través de internet.

Personalidad política

Si usted suele reaccionar más sensiblemente a los ruidos nocturnos, las arañas sobre su cuerpo o la imagen de una persona accidentada, lo más probable es que prefiera la política de derecha. Si de lo contrario, usted suele ser más calmado ante ruidos o imágenes inquietantes, quizás apoya a la izquierda. Esa es la conclusión de un nuevo estudio llevado a cabo en Estados Unidos que afirma que nuestras opiniones políticas son parte integral de nuestra formación física.

Codigo de control 2

Codigo de control por Yaz, Joy y Bren

Private Sub Command7_Click()
End Sub
Private Sub anterior_Click()
End Sub
Private Sub brillomas_Click()tv.Left = tv.Left + 100auxiliar.Left = auxiliar.Left + 100base.Left = base.Left + 100nrocanal.Left = nrocanal.Left + 100onoff.Left = onoff.Left + 100tvcatv.Left = tvcatv.Left + 100End Sub
Private Sub cero_Click()auxiliar.Caption = auxiliar.Caption + "0"End Sub
Private Sub cinco_Click()auxiliar.Caption = auxiliar.Caption + "5"End Sub
Private Sub Command1_Click()
End Sub
Private Sub cuatro_Click()auxiliar.Caption = auxiliar.Caption + "4"End Sub
Private Sub dos_Click()auxiliar.Caption = auxiliar.Caption + "2"End Sub
Private Sub Label2_Click()
End Sub
Private Sub enter_Click()nrocanal.Caption = auxiliarauxiliar.Caption = ""End Sub
Private Sub form2_Click()tvcatv.Caption = tvcatvtvcatv = "tv"End Sub
Private Sub mascanal_Click()If nrocanal.Caption > 12 Then If tvcatv.Caption = "tv" Then nrocanal.Caption = 1Else nrocanal.Caption = 1End IfElse nrocanal.Caption = nrocanal.Caption + 1End IfEnd Sub
Private Sub massonido_Click()
End Sub
Private Sub masvolumen_Click()tv.Top = tv.Top + 100auxiliar.Top = auxiliar.Top + 100base.Top = base.Top + 100nrocanal.Top = nrocanal.Top + 100tvcatv.Top = tvcatv.Top + 100onoff.Top = onoff.Top + 100
End Sub
Private Sub menosbrillo_Click()tv.Left = tv.Left - 100auxiliar.Left = auxiliar.Left - 100base.Left = base.Left - 100nrocanal.Left = nrocanal.Left - 100onoff.Left = onoff.Left - 100tvcatv.Left = tvcatv.Left - 100
End Sub
Private Sub menoscanal_Click()If nrocanal.Caption < 1 Then If tvcatv.Caption = "tv" Then nrocanal.Caption = 13Else nrocanal.Caption = 130End IfElse nrocanal.Caption = nrocanal.Caption - 1End IfEnd Sub
Private Sub menosvolumen_Click()tv.Top = tv.Top - 100auxiliar.Top = auxiliar.Top - 100base.Top = base.Top - 100nrocanal.Top = nrocanal.Top - 100tvcatv.Top = tvcatv.Top - 100onoff.Top = onoff.Top - 100
End Sub
Private Sub nueve_Click()auxiliar.Caption = auxiliar.Caption + "9"End Sub
Private Sub ocho_Click()auxiliar.Caption = auxiliar.Caption + "8"End Sub
Private Sub off_Click()nrocanal.Caption = ""tvcatv.Caption = ""onoff.BackColor = vbBlackuno.Enabled = Falsedos.Enabled = Falsetres.Enabled = Falsecuatro.Enabled = Falsecinco.Enabled = Falseseis.Enabled = Falsesiete.Enabled = Falseocho.Enabled = Falsenueve.Enabled = Falsecero.Enabled = False
End Sub
Private Sub offon_Click()If uno.Enabled = True Then nrocanal.Caption = "" tvcatv.Caption = "" onoff.BackColor = vbBlack uno.Enabled = False dos.Enabled = False tres.Enabled = False cuatro.Enabled = False cinco.Enabled = False seis.Enabled = False siete.Enabled = False ocho.Enabled = False nueve.Enabled = False cero.Enabled = False enter.Enabled = False masvolumen.Enabled = False menosvolumen.Enabled = False brillomas.Enabled = False menosbrillo.Enabled = False mascanal.Enabled = False menoscanal.Enabled = False form2.Enabled = False tvctv1.Enabled = False Else nrocanal.Caption = "0" tvcatv.Caption = "tv" onoff.BackColor = vbRed uno.Enabled = True dos.Enabled = True tres.Enabled = True cuatro.Enabled = True cinco.Enabled = True seis.Enabled = True siete.Enabled = True ocho.Enabled = True nueve.Enabled = True cero.Enabled = True enter.Enabled = True masvolumen.Enabled = True menosvolumen.Enabled = True brillomas.Enabled = True menosbrillo.Enabled = True mascanal.Enabled = True menoscanal.Enabled = True form2.Enabled = True tvctv1.Enabled = True End If

End Sub
Private Sub on_Click()nrocanal.Caption = "0"tvcatv.Caption = "tv"onoff.BackColor = vbReduno.Enabled = Truedos.Enabled = Truetres.Enabled = Truecuatro.Enabled = Truecinco.Enabled = Trueseis.Enabled = Truesiete.Enabled = Trueocho.Enabled = Truenueve.Enabled = Truecero.Enabled = TrueEnd Sub
Private Sub seis_Click()auxiliar.Caption = auxiliar.Caption + "6"End Sub
Private Sub siete_Click()auxiliar.Caption = auxiliar.Caption + "7"End Sub
Private Sub tres_Click()auxiliar.Caption = auxiliar.Caption + "3"End Sub
Private Sub tv1_Click(Index As Integer)tvcatv.Caption = tvcatvtvcatv = "tv"End Sub
Private Sub tvcatv2_Click()If tvcatv.Caption = form2.Caption Then tvcatv.Caption = tvctv1.CaptionElse tvcatv.Caption = form2.Caption
End IfEnd Sub
Private Sub tvctv1_Click()tvcatv.Caption = tvcatvtvcatv = "tvcatv"End Sub
Private Sub uno_Click()auxiliar.Caption = auxiliar.Caption + "1"End Sub