SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: comsuven en Jueves 1 de Abril de 2004, 15:35

Título: Ayuda Por Favor
Publicado por: comsuven en Jueves 1 de Abril de 2004, 15:35
saludos amigos, quisiera que me ayudaran con un problemilla tengo un codigo el cual tengo que ingresar 7 valores de temperatura y luego me da comop resultado la media pero ahota tengo que hacer que pueda ingresar infinitas temperaturas y no se que hacer me comentaron que utilizara el comando redim pero no se como empezar es un proyecto para la univeridad y tengo que entregar pronto ayuda porfavor saludos...


bueno de todos modos aqui esta el projectico que se olvido postear
Título: Re: Ayuda Por Favor
Publicado por: Brroz en Jueves 1 de Abril de 2004, 15:59
Hola consuvem.

Redim sirve para redimensionar una matriz declarada como dinámica (dimensionada con din pero sin especificar el número de elementos o utilizando una variable). Para conservar los posibles elementos existentes (siempre y cuando redimensiones haciendo más grande la matriz) deberás usarlo acompañado de la palabra Preserve. Fíjate en el ejemplo y saca tus propias conclusiones...

Código: Text
  1.  
  2. Public sub Ejemplo (Byval frase as string, ByRef Caracteres() As Byte )
  3.      Dim int1 As integer
  4.      For int1 = 1 To Len(frase)
  5.            If int1 > 1 Then
  6.                 Redim Preserve Caracteres(1 to int1)
  7.            Else
  8.                 Redim Caracteres(1 to 1)
  9.            End If  
  10.            Caracteres(int1)=asc(mid(frase,int1,1))
  11.      Next int1
  12. End Sub
  13.  
  14.  

Chau.
Título: Re: Ayuda Por Favor
Publicado por: comsuven en Jueves 1 de Abril de 2004, 16:05
pero sirve para el ejemplo que esta posteado gracias por tu respuesta
Título: Re: Ayuda Por Favor
Publicado por: Brroz en Jueves 1 de Abril de 2004, 16:07
¿Tú que crees?
Título: Re: Ayuda Por Favor
Publicado por: comsuven en Jueves 1 de Abril de 2004, 16:11
bueno lo que pasa esd que soy nuevo en esto tengo que entregar el dichoso ejemplo en la tarde y no lopgro hacerlo funcionar
Título: Re: Ayuda Por Favor
Publicado por: Brroz en Jueves 1 de Abril de 2004, 16:19
Ya, pero que alguien lo haga por ti realmente no te va a servir de mucho... El ejemplo que adjuntas ¿lo has hecho tú?. Si tu repuesta es afirmativa, supongo que la repuesta a mi anterior pregunta debería ser "claro que se puede aplicar al ejemplo" y no una excusa...

Abur.
Título: Re: Ayuda Por Favor
Publicado por: comsuven en Jueves 1 de Abril de 2004, 16:22
si te entiendo brroz y gracias por tu cooperacion lo que pasa es que si lo hicimos en clase con ayuda del profesor y al terminar nos dejo lo que estoy planteando como projecto para entregarlo en la tarde por eso al menos necesito una ayuda que tengo que modificar en mi projecto para que funcione al menos dame un apista si no lo logroterminar no importa a la final agradecere su apoyo y que tomaron en cuenta mi pregunta chao gracias ..... :D