Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: rapbyone en 18 Febrero 2016, 07:05 am


Título: Problema con salto de linea al escribir codigo
Publicado por: rapbyone en 18 Febrero 2016, 07:05 am
Estimados, tengo un problema, les cuento, necesito comprobar un checkbox con 51 checkboxes, como no tengo un conocimiento avanzado en programación, lo hice en base a la condicional IF, es decir:

Código
  1. If Check52.Caption = Check1.Caption Or Check52.Caption = Check2.Caption Or Check52.Caption = Check3.Caption Or Check52.Caption = Check4.Caption Or Check52.Caption = Check5.Caption Or Check52.Caption = Check6.Caption Or Check52.Caption = Check7.Caption Or Check52.Caption = Check8.Caption Or Check52.Caption = Check9.Caption Or Check52.Caption = Check10.Caption Or Check52.Caption = Check11.Caption Or Check52.Caption = Check12.Caption Or Check52.Caption = Check13.Caption Or Check52.Caption = Check14.Caption Or Check52.Caption = Check15.Caption Or Check52.Caption = Check16.Caption Or Check52.Caption = Check17.Caption Or Check52.Caption = Check18.Caption Or Check52.Caption = Check19.Caption Or Check52.Caption = Check20.Caption Or Check52.Caption = Check21.Caption Or Check52.Caption = Check22.Caption Or Check52.Caption = Check23.Caption Or Check52.Caption = Check24.Caption Or Check52.Caption = Check25.Caption Or Check52.Caption = Check26.Caption Or Check52.Caption = Check27.Caption Then
  2. msgbox "1"
  3. Else
  4. msgbox "2"
  5. End If
  6.  

El problema es que solo lo puede hacer hasta el checkbox 27 ya que desde el 28 el programa hace un salto de linea y me corta el código, supongo que hay un limite por linea.

Se que no es la forma mas optima de hacerlo, pero es lo que tenía a la mano.
Habrá alguna forma de hacerlo ya sea con este código o con otro.

Muchas gracias amigos

Título: Re: Problema con salto de linea al escribir codigo
Publicado por: Eleкtro en 18 Febrero 2016, 09:16 am
No utilizo VB6, pero creo que el símbolo de continuación de linea se puede usar de esta misma manera:

Código
  1. If Check52.Caption = Check1.Caption Or Check52.Caption = Check2.Caption Or Check52.Caption = Check3.Caption _
  2. Or Check52.Caption = Check4.Caption Or Check52.Caption = Check5.Caption Or Check52.Caption = Check6.Caption _
  3. Or Check52.Caption = Check7.Caption Or Check52.Caption = Check8.Caption Or Check52.Caption = Check9.Caption _
  4. Or Check52.Caption = Check10.Caption Or Check52.Caption = Check11.Caption Or Check52.Caption = Check12.Caption _
  5. Or Check52.Caption = Check13.Caption Or Check52.Caption = Check14.Caption Or Check52.Caption = Check15.Caption _
  6. Or Check52.Caption = Check16.Caption Or Check52.Caption = Check17.Caption Or Check52.Caption = Check18.Caption _
  7. Or Check52.Caption = Check19.Caption Or Check52.Caption = Check20.Caption Or Check52.Caption = Check21.Caption _
  8. Or Check52.Caption = Check22.Caption Or Check52.Caption = Check23.Caption Or Check52.Caption = Check24.Caption _
  9. Or Check52.Caption = Check25.Caption Or Check52.Caption = Check26.Caption Or Check52.Caption = Check27.Caption Then
  10.     msgbox "1"
  11.  
  12. Else
  13.     msgbox "2"
  14.  
  15. End If
  16.  

PD: Deberías crear un Array con los 52 controles (o los que sean), e iterarlo.

Saludos

Título: Re: Problema con salto de linea al escribir codigo
Publicado por: fary en 18 Febrero 2016, 18:46 pm
Eso es una chapuza...

Ya se te explico como hacerlo de manera correcta

http://foro.elhacker.net/programacion_visual_basic/comparar_checkbox_con_varios_elementos-t448095.0.html

Pero valla si te empeñas en hacerlo así... :xD


Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines