<<Rorro>>

si en chile fuera un gobierno de izquierda y que odie en extremo a la derecha y les ofrecieran una solucion parche, ya hubiera terminado las tomas, conociendo como son los chilenos que odian a la derecha

bueno, estaba revisando los apuntes y me puse a hacer algunos ejercicios, en una de esas me pedian hacer una tabla que pudiera registrar las notas del curso, mas o menos tiene que ser asi, atraves de un boton (command button), al hacer, tiene que aparecer un TextBox para ingresar los datos, que son el nombre, el rut, las notas de las asignaturas, y tiene que haber un boton que al apretar me calcule todos los promedios, y tiene que decir si aprobo (con color azul) y reprobo (con color rojo), para pasar el promedio tiene que ser mayor a 4 tengo una duda con el promedio solamente, me tira errores, todo lo demas me funciono Private Sub CommandButton1_Click() Dim fila As Integer fila = 3 While fila <> 11 Cells(fila, 1).Value = InputBox("Ingresar nombre de los alumnos", "Ingreso de nombres") fila = fila + 1 Wend End Sub Private Sub CommandButton2_Click() Dim fila As Integer fila = 3 While fila <> 11 Cells(fila, 2).Value = Val(InputBox("Ingrese el RUT de los alumnos", "Ingreso del RUT")) fila = fila + 1 Wend End Sub Private Sub CommandButton3_Click() Dim fila As Integer fila = 3 While fila <> 11 Cells(fila, 3).Value = Val(InputBox("Ingrese notas de lenguaje y comunicación", "Notas de Lenguaje y Comunicación")) fila = fila + 1 Wend End Sub Private Sub CommandButton4_Click() Dim fila As Integer fila = 3 While fila <> 11 Cells(fila, 4).Value = Val(InputBox("Ingrese notas de matemáticas", "Notas de Matemáticas")) fila = fila + 1 Wend End Sub Private Sub CommandButton5_Click() Dim fila As Integer fila = 3 While fila <> 11 Cells(fila, 5).Value = Val(InputBox("Ingrese notas de ciencias naturales", "Notas de Ciencias Naturales")) fila = fila + 1 Wend End Sub Private Sub CommandButton6_Click() Dim fila As Integer fila = 3 While fila <> 11 Cells(fila, 6).Value = Val(InputBox("Ingrese notas de historia", "Notas de Historia")) fila = fila + 1 Wend End Sub Private Sub CommandButton7_Click() Dim promedio As Double Dim suma As Double suma = 0 While fila <> 11 suma = Cells(fila, 3).Value + Cells(fila, 4).Value + Cells(fila, 5).Value + Cells(fila, 6).Value promedio = suma / 4 fila = fila + 1 Wend End Sub Private Sub CommandButton8_Click() Dim fila As Integer fila = 3 For fila = 3 To 10 Cells(fila, 1).Value = "" Cells(fila, 2).Value = "" Cells(fila, 3).Value = "" Cells(fila, 4).Value = "" Cells(fila, 5).Value = "" Cells(fila, 6).Value = "" Next End Sub y aca les dejo como se ve en excel http://www.(Palabra Censurada, BOT dañino)/imagen-ejemo-6761007.html donde dice estado, es donde debe decir si aprobo o reprobo ojala me puedan ayudar, y si hay una sugerencia para hacerla mas corta, bienvenido sea

Re-spect, WALK! oigan, yo entre recien a esa pagina y no esta hackeada, cuando es esa captura y donde ? lo hicieron atraves de un libro de visitas ?

... pero tienes Wii y PS3 con varios juegos originales, ¿cierto? Já, qué saen de no darse lujos :tonto: la verdad mi wii esta pirateada y la ps3 solo tengo 5 juegos, me prestan juego, pero creo que nos estamos desviando del tema ;) volviendo al tema, hasta cuando es el plazo de que se pierda el año, yo tengo una confusion en eso

Que estúpido el argumento En ese caso no puedo darme ningún lujo, solo esclavizarme para poder pagar la U no me he dado un lujo, te cuento que las unicas teles que hay en mi casa son del año 1995 y 2001, mi computador del año 2007, pero hay familias que lo gastan en LCD, Plasma, televisores 3D de ultima generacion, y dicen que no tienen plata para educacion, cuando fue la fiebre del mundial y de la copa america se vio eso, ademas muchos se compran computadores, ipad, iphone, cosas que deberian ser despues de los servicios basicos, en vez de pagar las deudas y comenzar denuevo para no tenerlas, agregan mas deudas pd: si hay algun muerte, ya veo que va a quedar mas la cagaa, si fue tanta polemica por el cabro que le tiro una molotov al carabinero, ahora se viene peor :o

se me olvido agregar que a muchos les gusta la musica, y gastan dinerales en guitarras electricas, en bajos, en amplificadores, conciertos, etc, un compañero reclama por que la educacion es cara, pero todos los años pasa gastando en equipos musicales, plata que facilmente podria alcanzarle para cubrir una buena parte del año

yo conosco a varios careraja que estudian gratis en la universidad por las becas o por que son hijos de profesores y aun asi van a protestar ????, yo estaria agradecido si me cubrieran toda la carrera o cuando le dan vales para la alimentacion, algunos hacen arreglos para comprar copete no hay plata para la educacion, pero si hay plata para el carrete, para las drogas, para los viajes y vacaciones, para los celulares touch, videojuegos

exacto, y si me kiere cobrar el wn, voy a tomarme su consulta y todos los ke kerian atencion kgaron nomas.. que lindo compadre con gente como tu me dan ganas de estudiar mas y cambiar esa mentalidad ;) con gente que sale a romper la propiedad publica y privada, como tirar abajo los semaforos, señaleticas, saquear locales comerciales, se gastan millones y millones de pesos, dinero que facilmente se puede destinar a educacion, se gasta en reparaciones, gente así no se merece la universidad, merece la carcel

en el futuro, cuando esten todos titulados (si es que lo logran), el dia en que acuda a un medico que haya participado en esto, no le voy a pagar, les voy a decir al medico, la salud es un derecho, por lo que debe ser gratuito

lo que no me gusta es que todo esto se esta politizando, se han desviado del tema con lo de la dictadura, con que piñera, que la derecha facista, etc, si al final sea de derecha o izquierda, todos mienten yo ya quiero que termine este circo, destrozos cuando hay marchas, dejando la caga, comerciantes que pierden todo y gente aterrada cuando ve estas cosas

modo ironico: on muy bien, maten a todos los pacos y dejemos que los flaites tomen su puesto

hola, paso a saludar, feliz cumpleaños y que sean muchos mas, que todos tus objetivos se cumplan

ojala mis profes suban las notas que di antes de la toma, le puse dedicacion a una de Algebra II (si me iba bien, me eximia segun mi opinion) xd

miren, no quiero crear conflicto, en primer lugar, yo estoy a favor que la educacion sea mas barata o mejor, que sea gratis, pero lo que no apoyo es que se tomen la universidad, si no se llega a nada con la toma, podria perderse el año por las puras lo que si apoyo son las protestas pacificas, sin politizar, los actos y todas esas cosas, de la manera mas imaginativa y que llegue, recomendaria hacerlo todos los dias, hasta hinchar al gobierno y tomen cartas en el asunto bueno, era eso no he participado mucho de los plenos y asambleas, pero he estado trabajando todo este tiempo

bienvenida al club, parece que somos muchos xd

yo creo que no hay nadie que no tenga uno de esos ramos cacho, los de la chile tenemos que tomar 5 de ellos a lo largo de toda la carrera y son puras leseras y deportes xD he escuchado que a los alumnos de la federico santa maria hay un ramo que se llama Educacion Fisica I y II, en la Adolfo Ibañez conosco a uno que le pasna Artes mi papa que se titulo de geologo en la u de chile, dice que le pasaron Literatura pero no como electivo, si no dentro de la malla :o

yo soy el caso contrario, el profe de fisica que me toco es muy fome y enredado para explicar, este año el curso tenia como 40 alumnos y justo antes de la toma quedaban entre 15-20 alumnos, por cambiarse de profe cambiando de tema, hay alguno de aca que les enseñan asignaturas de relleno, que no tengan nada que ver con la carrera ? conosco gente que en sus universidades estudian ingenieria, pero en la malla de la carrera le ponen educacion fisica, como si fuera en el colegio, a alguien le pasa ? para "el caxulo" : no critiques si no me conoces

parece que hay varios en informatica aqui, tendre una dura competencia cuando termine la carrera :o ahora toy con toma, ojala no se suspenda el semestre, pero ya algunas universidades han empezado a retirarse de las toma, por mientras, estoy adelantando la materia, como leyendo algunos apuntes de intro a la programacion que me lo mando un compañero xd

que pena que haya muerto el perro gordo, era muy querido

Yo tambien estudio Ingenieria Civil Informatica, como muchos de aca, la carrera me gusto muchisimo, es mas, estoy en una academia aparte de la malla curricular, por que me gusta y me apasiona, no me conformo con sacar el titulo y chao, al contrario, quiero llegar lo mas lejos que pueda, pero me eche unos ramos cabezones, como calculo I y Algebra II (lineal) PD: a los que estudiamos ingenieria civil informatica, no nos relacionen con los tecnicos que arreglan el pc PD2: para JinXP, veo que ya sacaste una carrera y te estas especializando y naciste en 1990, a que edad entraste a la universidad ??

ahora estoy muriendo con Calculo II, no por que no sepa, si no por que falte a una prueba y tuve el 1.0, pero no importa, a la segunda lo pasare con honores, igual que el I =P

yo aprovechando de sacar plata en una pega esporadica mientras dura la toma xd, y solo ir de espectador a dos asambleas noma

oigan, una pregunta, en Iquique, en la Zofri sale mucho mas barato comprar un Nintendo 3DS que en cualquier parte del pais, y sobre todo, hacen envios ? (soy de Antofagasta), me gustaria saber algun dato porfa

jajajaja que buena manera de hacer un pedido, hay que ponerle alegria a la vida =)

yo no se por que pusiste que me trata como un down , lo unico que hice fue subir los videos que pille sabes, si viniste a puro carbonear este post, no lo tomare en cuenta si lo haces de nuevo, se va a la basura