Calculadora 1 (por Daniel)

Private Sub Borrrar_Click() pantalla.Caption = "" aux.Caption = "" aux2.Caption = "" End Sub Private Sub cero_Click() pantalla.Caption = pantalla.Caption + "0" End Sub Private Sub cinco_Click() pantalla.Caption = pantalla.Caption + "5" End Sub Private Sub coma_Click() pantalla.Caption = pantalla.Caption + "," End Sub Private Sub cuatro_Click() pantalla.Caption = pantalla.Caption + "4" End Sub Private Sub dividido_Click() aux.Caption = pantalla.Caption aux2.Caption = "/" pantalla.Caption = "" End Sub Private Sub dos_Click() pantalla.Caption = pantalla.Caption + "2" End Sub Private Sub igual_Click() If aux2.Caption = "+" Then pantalla.Caption = Val(aux.Caption) + Val(pantalla.Caption) End If If aux2.Caption = "-" Then pantalla.Caption = Val(aux.Caption) - Val(pantalla.Caption) End If If aux2.Caption = "*" Then pantalla.Caption = Val(aux.Caption) * Val(pantalla.Caption) End If If aux2.Caption = "/" Then pantalla.Caption = Val(aux.Caption) / Val(pantalla.Caption) End If aux.Caption = "" aux2.Caption = "" End Sub Private Sub mas_Click() aux.Caption = pantalla.Caption pantalla.Caption = "" End Sub Private Sub menos_Click() aux.Caption = pantalla.Caption aux2.Caption = "-" pantalla.Caption = "" End Sub Private Sub nueve_Click() pantalla.Caption = pantalla.Caption + "9" End Sub Private Sub ocho_Click() pantalla.Caption = pantalla.Caption + "8" End Sub Private Sub por_Click() aux.Caption = pantalla.Caption aux2.Caption = "*" pantalla.Caption = "" End Sub Private Sub seis_Click() pantalla.Caption = pantalla.Caption + "6" End Sub Private Sub siete_Click() pantalla.Caption = pantalla.Caption + "7" End Sub Private Sub tres_Click() pantalla.Caption = pantalla.Caption + "3" End Sub Private Sub uno_Click() pantalla.Caption = pantalla.Caption + "1" End Sub

Semana 22 (por Daniel)

Artículo 1:

19/9/08

LaCie 4big Quadra

El LaCie 4big Quadra, presentado esta misma semana, resulta un producto bastante interesante no solo para el entorno profesional y empresarial, sino también para todos aquellos que quieran tener un servidor de almacenamiento en su propio hogar.
Por ahora, el LaCie 4big Quadra está disponible en tres modelos con capacidades diferentes, de 2, 4 y 6 TB en total, pero con características comunes: todos utilizan cuatro discos duros, intercambiables entre si y con la posibilidad de hacerlo en tiempo real sin necesidad de apagar o desconectar el dispositivo. Permite elegir entre varios sistemas RAID de los más comunes, entre los que cabe destacar RAID 0, RAID 5 o RAID 10, y las posibilidades de conexión son bastante amplias: eSATA 3Gbits, FireWire 400/800 y USB 2.0, aunque siendo un dispositivo tan avanzado quizá se echa en falta una conexión ethernet de forma que pudiese usarse como NAS, Network Attached Storage.

Para ver más.

Artículo 2:

19/9/08

Pinnacle PCTV nanoStick Ultimate, de reducido tamaño

Teniendo una sintonizadora externa, ¿quién quiere complicarse la vida con las que tenemos que colocar en ranuras PCI? Pinnacle PCTV nanoStick Ultimate es una nueva sintonizadora de televisión que va un paso más allá y se vuelve más compacta que sus rivales, que por cierto son también de la misma marca. Con unas medidas de 5.2 × 2.3 × 1.3 cm, ya no hay excusa para no llevarla todo el día con nosotros y colocarla a la menor oportunidad en el puerto UBS del portátil o , porqué no, en el sobremesa de la oficina. También viene muy bien para los ordenadores Media Center del salón digital.

Para ver más.

Artículo 3:

18/9/08

LG LG4000, televisor con reproductor de DVD integrado

¿Tiene sentido integrar un reproductor de DVD en el televisor? Teniendo en cuenta que podemos encontrar reproductores prácticamente regalados probablemente no sea algo primordial. Pero LG cree que sí es una buena opción, para lo que presentan el LG LG4000.
Lo que si me gusta de ellos es su diseño y que el reproductor de DVDs no se limite solo a eso, sino que también sirva para reproducir CDs de audio, imágenes y música en MP3. Encima soporta reproducción de vídeo en DivX, lo que me hace considerarlo una buena solución.

Para ver más.

Yo elegí estos artículos porque son ideas muy interesantes.

Semana 23 (por Daniel)

Artículo 1:

26/9/08

Nabee, añade WUSB a las cámaras de Samsung

Mientras el WUSB no venga integrado en más dispositivos será necesario utilizar adaptadores para ofrecer conectividad inalámbrica entre nuestros diferentes gadgets. Y eso es lo que ofrece el NaBee. Este adaptador quiere facilitar el envío de las fotos que tomemos con nuestra cámara al ordenador sin necesidad de conectar el típico cable USB. Está diseñado para ser usado con las cámaras de Samsung y consta de dos partes, una la que se conecta al ordenador, a través del puerto USB, y otra que se conecta a la cámara. El Nabee no parece una mala idea, pero de lo que tenemos ganas es de que todos nuestros dispositivos integren por fin alguna tecnología que permita la comunicación sin cables de forma sencilla, ya sea WUSB, alguna evolución de Bluetooth (con mayor velocidad, por favor) o una nueva. ¡Estamos hartos de cables!
Estos adaptadores se pondrán a la venta a partir de diciembre de este año a un precio que todavía no se ha especificado.

Para ver más.

Artículo 2:

26/9/08

BenQ Aries2 a la venta en Italia

Sabíamos que pronto iba a llegar a Europa, y el primero país donde aterriza el BenQ Aries2 es Italia, de la mano del operador TIM, que lo ofrece junto a diez horas de conexión a Internet.
Este MID se encuentra en un mercado similar al de las tabletas de Nokia, pero con algo que siempre hemos echado de menos en ellas: que incluyan conectividad 3G. El BenQ Aries2 lo hace con compatibilidad con HSDPA, sumada al Wi-Fi que integra, que nos permitirá disponer de conexión en cualquier parte. Viene con un procesador Intel Atom a 800 MHz, 512 MB de RAM y 2 GB de disco SSD. Su pantalla tiene un tamaño de 4.8 pulgadas y ofrece una resolución de 800 × 480 píxeles, similar a la de los ultraportátiles más pequeños. Al contrario que la mayoría de estos, y siendo su punto más diferenciador, esta es táctil y desde ella se controlan la gran mayoría de funciones. Como opciones de expansión nos encontramos en el BenQ Aries2 un puerto miniUSB, un lector de tarjetas MicroSD y conectividad Bluetooth 2.0. Todo ello, controlado por un sistema operativo basado en Linux. Con un precio de 429 euros y un peso de 330 gramos, hay que preguntarse si vale la pena optar por un MID o directamente por un ultraportátil. Ciertamente, son dispositivos distintos, básicamente en tamaño y peso, siendo el MID más reducido y no ofreciendo teclado. Por tanto, está más enfocado aún a la simple navegación que a trabajar con él, pues la falta de un método rápido de introducción de texto dificultaría mucho esta tarea. A cambio, tenemos un dispositivo mucho más sencillo de transportar y con conectividad 3G integrada, mientras que todavía son pocos los ultraportátiles que disponen de ella. Cada uno deberá decidir cual es su elección, dependiendo de las necesidades personales.

Para ver más.

Artículo 3:

26/9/08

SSD de 1.8 pulgadas de Toshiba y 3 milímetros de altura

Toshiba está apostando muy fuerte por los discos duros, ya sean de la actual o de los que serán la nueva generación en unos años. Son dos los productos que han presentado recientemente, un par de nuevos discos duros. Por un lado tenemos un nuevo disco de 1.8 pulgadas que alcanza un nuevo record en capacidad, llegando a los 250 GB. Este dato tampoco es excesivamente sorprendente si tenemos en cuenta que hace no mucho Toshiba presentó un disco de parecidas características pero con 240 GB en vez de 250. Me parece bastante más interesante la otra novedad, un SSD de 1.8 pulgadas y sólo 3 milímetros de altura. En este caso la capacidad es bastante alta para ser un SSD, 256 GB, y gracias a las reducidas dimensiones se hace un dispositivo perfecto para servir como memoria interna en un dispositivo portátil, dirigido más que para portátiles, para UMPCs, teléfonos móviles o reproductores MP3. Este disco SSD tan fino empezará a fabricarse a finales del próximo mes de octubre, con lo que seguramente empiece a implementarse en productos que podrían llegar ya en los primeros meses del 2009. Lo más probable es, desgraciadamente, que no se venda al público en general, sino directamente a los fabricantes.

Para ver más.

Yo elegí estos artículos porque son ideas muy buenas e interesantes.

Visual Basic: TV- códigos 3 (Melu, Dani H., Maga)

Private Sub Label2_Click()
End Sub
Private Sub catv_Click()tvcatv.Caption = "CATV"End Sub
Private Sub catvtv_Click()If tvcatv.Caption = "TV" Then tvcatv.Caption = "CATV"Else tvcatv.Caption = "TV"End IfEnd Sub
Private Sub cero_Click()aux.Caption = aux.Caption + "0"End Sub
Private Sub cinco_Click()aux.Caption = aux.Caption + "5"End Sub
Private Sub Command15_Click()
End Sub
Private Sub Command17_Click()
End Sub
Private Sub cuatro_Click()aux.Caption = aux.Caption + "4"End Sub
Private Sub dos_Click()aux.Caption = aux.Caption + "2"End Sub
Private Sub enter_Click()inv.Caption = nrocanal.CaptionIf tvcatv.Caption = "CATV" Then If aux.Caption < caption =" aux.Caption" caption = "" caption = "" caption =" aux.Caption" caption = "" caption = "" top =" pantalla.Top" caption =" nrocanal.CaptionIf" caption = "CATV" caption =" nrocanal.Caption" caption = "0" caption =" nrocanal.Caption" caption = "0" left =" pantalla.Left" top =" pantalla.Top" caption =" nrocanal.CaptionIf"> 0 Thennrocanal.Caption = nrocanal.Caption - 1ElseIf tvcatv.Caption = "CATV" Thennrocanal.Caption = 140Elsenrocanal.Caption = "13"End IfEnd IfEnd Sub
Private Sub menosvolumen_Click()pantalla.Left = pantalla.Left - 100End Sub
Private Sub nueve_Click()aux.Caption = aux.Caption + "9"End Sub
Private Sub ocho_Click()aux.Caption = aux.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 = Falseenter.Enabled = Falsemascanal.Enabled = Falsemenoscanal.Enabled = Falsemasbrillo.Enabled = Falsemenosbrillo.Enabled = Falsemenosvolumen.Enabled = Falsemasvolumen.Enabled = Falsetv.Enabled = Falsecatv.Enabled = Falseaux.Caption = ""End Sub
Private Sub on_Click()nrocanal.Caption = "0"tvcatv.Caption = "CATV"onoff.BackColor = vbReduno.Enabled = Truedos.Enabled = Truetres.Enabled = Truecuatro.Enabled = Truecinco.Enabled = Trueseis.Enabled = Truesiete.Enabled = Trueocho.Enabled = Truenueve.Enabled = Truecero.Enabled = Trueenter.Enabled = Truemascanal.Enabled = Truemenoscanal.Enabled = Truemasbrillo.Enabled = Truemenosbrillo.Enabled = Truemenosvolumen.Enabled = Truemasvolumen.Enabled = Truetv.Enabled = Truecatv.Enabled = TrueEnd Sub
Private Sub power_Click()If onoff.BackColor = vbRed Then onoff.BackColor = vbBlacknrocanal.Caption = ""tvcatv.Caption = ""uno.Enabled = Falsedos.Enabled = Falsetres.Enabled = Falsecuatro.Enabled = Falsecinco.Enabled = Falseseis.Enabled = Falsesiete.Enabled = Falseocho.Enabled = Falsenueve.Enabled = Falsecero.Enabled = Falseenter.Enabled = Falsemascanal.Enabled = Falsemenoscanal.Enabled = Falsemasbrillo.Enabled = Falsemenosbrillo.Enabled = Falsemenosvolumen.Enabled = Falsemasvolumen.Enabled = Falsetv.Enabled = Falsecatv.Enabled = Falseaux.Caption = ""catvtv.Enabled = FalseElsenrocanal.Caption = "0"tvcatv.Caption = "CATV"onoff.BackColor = vbReduno.Enabled = Truedos.Enabled = Truetres.Enabled = Truecuatro.Enabled = Truecinco.Enabled = Trueseis.Enabled = Truesiete.Enabled = Trueocho.Enabled = Truenueve.Enabled = Truecero.Enabled = Trueenter.Enabled = Truemascanal.Enabled = Truemenoscanal.Enabled = Truemasbrillo.Enabled = Truemenosbrillo.Enabled = Truemenosvolumen.Enabled = Truemasvolumen.Enabled = Truetv.Enabled = Truecatvtv.Enabled = Truecatv.Enabled = TrueEnd If
End Sub
Private Sub seis_Click()aux.Caption = aux.Caption + "6"End Sub
Private Sub siete_Click()aux.Caption = aux.Caption + "7"End Sub
Private Sub tres_Click()aux.Caption = aux.Caption + "3"End Sub
Private Sub tv_Click()tvcatv.Caption = "TV"End Sub
Private Sub uno_Click()aux.Caption = aux.Caption + "1"End Sub
Private Sub volver_Click()inv2.Caption = nrocanal.Captionnrocanal.Caption = inv.Captioninv.Caption = inv2.CaptionEnd Sub

Calculadora 2 (por Daniel)

Private Sub borrar_Click()
pantalla.Caption = ""
Auxiliar.Caption = ""
aux2.Caption = ""
End Sub

Private Sub cero_Click()
pantalla.Caption = pantalla.Caption + "0"
End Sub

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

Private Sub coma_Click()
pantalla.Caption = pantalla.Caption + "."
End Sub

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

Private Sub dividido_Click()
aux2.Caption = "/"
Auxiliar.Caption = pantalla.Caption
pantalla.Caption = ""
End Sub

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

Private Sub igual_Click()
If aux2.Caption = "+" Then
pantalla.Caption = Val(Auxiliar.Caption) + Val(pantalla.Caption)
Auxiliar.Caption = ""
aux2.Caption = ""
Else
If aux2.Caption = "-" Then
pantalla.Caption = Val(Auxiliar.Caption) - Val(pantalla.Caption)
Auxiliar.Caption = ""
aux2.Caption = ""
Else
If aux2.Caption = "*" Then
pantalla.Caption = Val(Auxiliar.Caption) * Val(pantalla.Caption)
Auxiliar.Caption = ""
aux2.Caption = ""
Else
If aux2.Caption = "/" Then
pantalla.Caption = Val(Auxiliar.Caption) / Val(pantalla.Caption)
Auxiliar.Caption = ""
aux2.Caption = ""
Else
If aux2.Caption = "%" Then
pantalla.Caption = Val(Auxiliar.Caption) * 100 / Val(pantalla.Caption)
Auxiliar.Caption = ""
aux2.Caption = ""
End If
End If
End If
End If
End If
End Sub

Private Sub mas_Click()
aux2.Caption = "+"
Auxiliar.Caption = pantalla.Caption
pantalla.Caption = ""
End Sub

Private Sub menos_Click()
aux2.Caption = "-"
Auxiliar.Caption = pantalla.Caption
pantalla.Caption = ""
End Sub

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

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

Private Sub por_Click()
aux2.Caption = "*"
Auxiliar.Caption = pantalla.Caption
pantalla.Caption = ""
End Sub

Private Sub porc_Click()
aux2.Caption = "%"
Auxiliar.Caption = pantalla.Caption
pantalla.Caption = ""
End Sub

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

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

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

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

Semana 21 (por Daniel)

Artículo 1:

12/9/08

Asus G50 y G71, portátiles para jugadores

Debe ser por deformación profesional, pero los acabados de los diferentes gadgets me fascinan. Tocar uno y que los materiales sean nobles y el diseño atractivo me pierde. Espero no ser el único. Los Asus G50 y G71, últimos portátiles para jugadores que el fabricante saca en el mercado español, tiene precisamente ese acabado que tanto me gusta. Ambos equipos pertenecen a una serie especial denominada por Asus Republic of Gamers, que ha sido diseñada por jugadores. Los tamaños de pantallas cubren prácticamente todas las necesidades de los entusiastas de los juegos y la multimedia en movilidad. El modelo Asus G71 solo está disponible con pantalla de 17 pulgadas, mientras que el Asus G50 tiene modelos de 15.4 y 15.6 pulgadas. La potencia de estos equipos sobre el papel no admite discusión. Se trata de equipos con procesadores Intel Core 2 Duo e Intel Quad Core, con memoria RAM de hasta 4 GB, tarjeta gráfica nVidia GeForce 9700M GT, discos duros en modo dual, pantallas con resolución FullHD y opción de unidad óptica Blu-Ray Disc. Pero todavía podemos apurar más su rendimiento si optamos por pulsar la tecla que fuerza al máximo (overclocking) tanto el procesador como la gráfica.

Para ver más.

Artículo 2:

12/9/08

Altec Lansing renueva su imagen y presenta nuevos radio-despertadores

Altec Lansing ha renovado recientemente su imagen corporativa y lo ha celebrado con nuevos equipos despertadores con radio para el iPhone. Teniendo que recargar todas las noches el iPhone antes de acostarnos y con la costumbre de usar el mismo (u otros teléfonos móviles) como despertador, estas bases con altavoces se han hecho muy populares.
El los dos nuevos modelos de Altec Lansing son el inMotion Moondance Glow (iM402) y el inMotion Max (iMT702). Lo que más llama la atención del modelo iM402 es el sistema de iluminación de la pequeña pantalla para crear ambiente al tiempo que ofrece dos alarmas y otro tipo de información en la misma. Curioso que se incluya una especie de mando a distancia desde el que podemos apagar el despertador. Como si levantarse no fuera parte del proceso de despertarse con un equipo de este tipo.
El precio de este modelo de dock con despertador es de 200 dólares.

Para ver más.

Artículo 3:

12/9/08

Panasonic Lumix G1

De nuevo revolución en el mundo de la fotografía. Finalmente ha sido hoy cuando Panasonic ha presentado al mundo su nueva cámara de fotos digital con el nuevo sistema micro cuatro tercios.
La Panasonic Lumix G1 es el primer modelo de esta nueva gama que entra con fuerza en el mundo de la fotografía digital con un detalle principal: podemos colocar lentes intercambiables pero con un tamaño de cámara más cercano a las cámaras compactas gracias a que se elimina el sistema de espejo para la visión, y se opta directamente por un visor.
Lo que se mantiene es el tamaño del sensor de las DSLR así como el sistema de lentes intercambiables, con un peso y tamaño más reducido del cuerpo, pero como vemos en las fotos, la apariencia sigue siendo la de una falsa réflex digital, lo que significa que no han querido arriesgar mucho en la diferenciación estética con las tradicionales.

Para ver más.

Yo elegí estos artículos porque son ideas muy buenas e interesantes

Semana 20 (por Daniel)

Artículo 1:

11/9/08

Greenpeace da su bendición la nuevo iPod Nano

O al menos eso podríamos interpretar ante las declaraciones del grupo ecologista, que asegura que Apple va por el buen camino y que su nuevo reproductor "es menos tóxico". Todo un logro teniendo en cuenta lo alto que tienen siempre el listón los de Greenpeace y lo que les gusta buscar defectos en todo aparatito electrónico que salga al mercado. Steve Jobs ya prometió que conseguiría producir productos menos dañinos para el medio ambiente para finales del 2008 y, dicho y hecho, los nuevos iPod Nano contienen menos BFR, PVC y mercurio. Parece que tito Jobs es un hombre de palabra, sí señor.Parece que Apple no es la única compañía que poco a poco se va enfundando en el traje verde y otras marcas, como Nokia, Sony Ericsson y Samsung, ya están produciendo dispositivos que resultan menos tóxicos, tal y como se publicó en la "Guía de productos electrónicos verdes" que cada tres meses actualiza la organización Greenpeace. Empezamos a concienciarnos... ya era hora.

Para ver más.

Yo elegí este artículo porque es muy necesario que se cuide el ambiente.

Artículo 2:

11/9/08

Proyector Sony Bravia FullHD VPL-VW80 SXRD

El Sony Bravia VPL-VW80 SXRD es el último proyector doméstico enfocado en la alta definición que saca al mercado el fabricante japonés. Con televisores más y más grandes y de mejor calidad, los proyectores para cine en casa se renuevan a pasos agigantados. La clave o punto básico de este nuevo proyector de video de Sony hay que buscarlo en las siglas SXDR, que significan Silicon X-tal Reflective Display, y que identifican a la tecnología que hay detrás del panel usado en el proyector. Esta tecnología ha sido enfocada en mejorar la imagen, principalmente el detalle, de las imágenes en alta definición. Otras mejoras incorporadas para no tener nada que envidiar a un buen televisor es la tecnología de 100 Hz para que las secuencias rápidas de vídeo sucedan en pantalla de la forma más suave posible y no queden estelas. Evidentemente, al igual que pasa en los equipos electrónicos que manejan mucha información, el procesador es parte vital de los mismos. En este caso se cuenta con el Bravia Engine 2, una garantía que ya funciona en televisores Bravia.

Para ver más.

Artículo 3:

11/9/08

El LP 2 FLASH de ION grabará todos tus vinilos en tu memoria USB/Flash

Menudo problemón tienes en casa con esa montaña de vinilos, que son ya una reliquia que hasta podrías sacar un dinero en Ebay, pero te resistes por motivos sentimentales. Bien, ahora tienes una solución inmediata, el LP 2 FLASHque te permitirá transferirtodo el contenido de esos discos a una unidad USB, tarjeta SD o cualquier otro dispositivo. El sistema incluso detecta los gaps entre canciones y lista las canciones en consecuencia. Está disponible desde ya por 130 libras esterlinas (228 dólares/162,37 euros).

Para ver más.

Yo elegí estos 2 artículos porque son ideas bastante interesantes.