Ver Mensaje Individual
  #3 (permalink)  
Antiguo 25/10/2010, 03:11
Avatar de pkj
pkj
 
Fecha de Ingreso: julio-2006
Ubicación: Órbita sincrónica
Mensajes: 899
Antigüedad: 17 años, 9 meses
Puntos: 29
Respuesta: ayuda con esta matriz urgente

Ese lenguaje no es vb clásico, más bien parece vb 2005 o algo así.
Tambien parece ser que lo estás haciendo para mostrar en consola, no en forms.
De todas formas te paso tu código modificado y que debería funcionar si lo pones en un botón de un formulario. Haz los cambios que necesites.

Código vb:
Ver original
  1. Dim n, i As Integer
  2.     Dim suma, media As Double
  3.     n = InputBox("Digite el numero de elementos a introducir")
  4.     Dim vector(n) As Double
  5.     For i = 1 To n
  6.       vector(i) = InputBox(" Digita el valor del elemento " & i)
  7.  
  8.       suma = suma + vector(i)
  9.  
  10.     Next
  11.     media = suma / n
  12.     MsgBox(" la suma de los elementos es:" & CDec(suma) & vbCrLf & _
  13.     " La media de los elementos es: " & CDec(media))
Saludos
__________________
No hay preguntas tontas, solo gente estup..., ¡No!, ¿como era? No hay gente que pregunte a tontos... ¡Nooo!... ¡Vaya cabeza!