AYUDA CON PROCEDIMIENTO PORFAVOR!!!

Karla
25 de Septiembre del 2003
HOLA
TENGO UN JUEGUITO PARA NIÑOS DE PREGUNTAS DONDE CADA QUE SE EQUIVOCA AL CONTESTAR LE SALE UNA TACHA, DISPERSA Y ASI SI SE EQUIVOCA EN TODO SON 40 TACHAS QUE SON LABELS, ENTONCES AL TERMINAR NECESITO YO ALINEAR LAS TACHAS, LOGICO DEBO DE PONERLAS EN EL MISMO TOP E INCREMENTAR EL LEFT PARA QUE NPO SALGAN AMONTONADAS, Y NO QUIERO GENERAR TANTO CODIGO PUES SON 40 LO QUE TENGO ES UN PROCEDIMIENTO DONDE YO QUISIERA MANDARLO LLAMAR DE FORMA QUE MODIFIQUE EL LEFT DE CADA LABEL QUE ESTA VISIBLE PERO ME MARCA ERROR ESTES ES
Private Sub compac(labe As Label, estado As Boolean)
If labe = True Then
labe.Left = vp
labe.Top = 360 'COMO ELTOP ALPRINCIPIO EN TODAS VARIA POR ESO DEBO DE ESPECIFICARSELO DE NUEVO
vp = vp + 480
End If
End Sub
AL MANDARLO LLAMAR
COMPACTA(INCORRECTO,TRUE)
ME DICE QUE ME FALTA UN =
SI LO CAMBIO ASI
Private Sub compac(labe As Label)
labe.Left = vp
labe.Top = 360
vp = vp + 480
End Sub
Y LO LLAMO ASI IF INCORRECTO.VISIBLE=TRUE THEN COMPACTA(INCORRECTO) DICE QUE NO COINCIDEN LOS TIPOS, OJALA ALGUIEN ME PUEDA AYUDAR.
GRACIAS!!!

Baltasar
25 de Septiembre del 2003
Al llamar a un procedimiento no se ponen los paréntesis, eso es sólo para las funciones.
Una pregunta: el parámetro "estado", para qué lo usas?
De todos modos, sería mejor que usaras arrays de labels, si los usas, verás que el programa se te reduce enormemente.