Mensajes

Da error acá cuando lo ejecuto:

http://i46.tinypic.com/6qfwn8.jpg

Podrías subir directamente la aplicación, osea el .exe?

Así lo pruebo

[BlackZeroX▓▓▒▒░░]

Muchas gracias BlackZeroX▓▓▒▒░░ ahora si está claro

[X]

Utilizo procedimientos y no funciones ya que los procedimientos me cargarán los datos y las funciones se utilizan para devolver algo, en este caso no necesito que devuelvan nada sino sólo que los carguen, y no se por qué dices que está mal que X sea estática ya que cuando apreto el boton de Cargar para que no se pierda el valor que tenía la X en el for por ejemplo, le pongo que sea estática para que lo guarde

Entiendo parcialmente tu código, sólo utilizamos las funciones básicas para crear nuestras propias funciones, nada de Lbound y eso (que sé que es válido)

Osea no entiendo específicamente el error que me quisiste remarcar De todas maneras el código como lo probé funciona..

[una duda si me la pueden responder]

Ya está chicos  ya me salió, me quedó una duda si me la pueden responder y dejo la solución por si algún novato en ese tema no le sale o no lo sabe

Botón cargar:

Código (vb) [Seleccionar] Expandir

Private Sub CargarVector(ByRef vectorN() As String, ByRef vectorE() As Byte)

Static x As Byte

For x = 0 To 2

    vectorN(x) = txtNombre(x).Text
    vectorE(x) = txtEdad(x).Text
   
Next x
   

End Sub


Procedimiento Cargar:

Código (vb) [Seleccionar] Expandir

Private Sub CargarVector(ByRef vectorN() As String, ByRef vectorE() As Byte)

Static x As Byte

For x = 0 To 2

    vectorN(x) = txtNombre(x).Text
    vectorE(x) = txtEdad(x).Text
   
Next x
   

End Sub

Procedimiento MostrarVector:

Código (vb) [Seleccionar] Expandir

Private Sub MostrarVector(ByRef vectorN() As String, ByRef vectorE() As Byte)

Static x As Byte

For x = 0 To 2
    Print vectorN(x)
    Print vectorE(x)
Next x

End Sub

Yupi!! Me quedó una duda:

En el procedimiento Private Sub cmdCargar_Click() cuando le paso los parametros a los procedimientos, los vectores van con parentesis vacios "()" o con los parentesis y la cantidad de espacios o lugares que contiene este? "(3)" en este caso

Muchas gracias

[CargarDatos]

Hola chicos, bueno voy a tratar de explicarles lo más breve y directo posible porque recién estoy aprendiendo como usar los procedimientos con vectores y el problema es el siguiente:

Tengo un formulario con una matriz de controles de 3 texbox's y 3 label's donde el usuario ingresa los nombres de 3 personas, y otra matriz de contrles de 3 textbox's y 3 label's también donde el usuario ingresa las edades de esas 3 personas

Lo que yo quiero hacer es, cuando el usuario apreta el botón asignar llame al procedimiento CargarDatos que ingresará por un lado la primer matriz de controles en un Vector que será llamado por parametros que lo cargará con los nombres, y en otro vector por separado las edades que también las recibirá por parametro, luego simpremente escribir en el cmdAsignar_Click la llamada el procedimiento CargarDatos y que cargue todo a los 2 vectores y los muestre por pantalla

Una imagen del form:



Espero que me puedan ayudar, se que es algo sencillo pero no termino de entender como hacerlo y usar los vectores por parametros para la carga, sin procedimiento lo hago de esta manera:

Código (vb) [Seleccionar] Expandir

Private Sub cmdCargar_Click()

Dim vectorNombre(3) As String, vectorEdad(3) As Byte

Static x As Byte

'Carga de datos a los vectores

For x = 0 To 2

    vectorNombre(x) = txtNombre(x).Text
    vectorEdad(x) = txtEdad(x).Text
   
Next x

End Sub

Pero yo lo quiero hacer con procedimientos como dije ya que eso me tomarán en el colegio

Muchas gracias y espero alguien se digne a ayudarme

PD: Según dijo el prof los vectores por parametros se pasan ByRef y todos los que no sean vectores Byval, por si acaso

[code=vb]

Coloca tu código entre [+code=vb][+/code] por favor (Sin el "+")

Gracias

Sabes español? Lee lo que te puse en el anterior mensaje.

[GeSHi]

Te recomiendo que escribas tu código en GeSHi porque sino resulta ilegible el código y nadie le hará la gana de leerlo

Un poco más prolijo los posts señores..

Linda interfaz, yo que soy partidario de que los programas -aparte de funcionales- deben verse bien

Le pudiste solucionar -y modificar- al post lo del problema del icono?