GUSRDAR EN UN TEXT MULTILAIN VARIOS CHECK

KELY
25 de Febrero del 2004
TENGO UNA LISTA DE PRODUCTOS:
1 ARROZ
2 FRIJOL
3 AZUCAR

Y QUIERO QUE SE GUARDE ESTO:
ARROZ, FRIJOL, AZUCAR
PORFAVOR SI ALGUIEN SABE

sdemingo
25 de Febrero del 2004
Hola,

los check deberán ser un array de controles.

Para este ejemplo, necesitas un textbox multiline, un commandbutton y los checkbox que quieras pero que estén en un array de controles:

Private Sub Command1_Click()

Dim i As Integer

Text1.Text = ""
For i = Check1.LBound To Check1.UBound
If Check1(i).Value Then
Text1.Text = Text1.Text & Check1(i).Caption & ", "
End If
Next i

End Sub

salu2
sdemingo
Foro: boards.melodysoft.com/sdemingo