[VB] Client per CHAT

[Dr.FixMan]

NON CAPISCO... SCUSAMI, TI SCRIVO UN PEZZO DI CODICE CH AVEVO UTILIZZATO MA CHE NON MI FUNZIONA DOVE PERO' AL POSTO DELL'ARRAY AVEVO UTILIZZATO UNA TEXTBOX:

Private Sub ListUser_ItemCheck(ByVal Item As MSComctlLib.ListItem)
Dim i As Integer
For i = 1 To ListUser.ListItems.Count
If ListUser.ListItems.Item(i).Checked = False Then
   ListUser.ListItems.Item(i).SmallIcon = 1
Else
  If ListUser.ListItems.Item(i).Checked = True Then
   ListUser.ListItems.Item(i).SmallIcon = 3
   ChecChecked
  End If
End If
Next
End Sub
Private Sub ChecChecked()
Dim i As Integer
  txtboxIgnoraUtenti.Text = ""
  For i = 1 To ListUser.ListItems.Count
      If ListUser.ListItems.Item(i).Checked = True Then         txtboxIgnoraUtenti.Text = ListUser.ListItems.Item(i).Text & vbNewLine
   Next i
End Sub 

SE CAMBIO LA TEXTBOX CON L'ARRAY, COME FACCIO PASSARE SOLO I NICK SELEZIONATI UTILIZZANDO I CHECKBOX DELLA LISTA ???
OPPURE MI CONSIGLI DI LASCIARE LA TEXTBOX ???
SOLO CHE NON SO USARE LA FUNZIONE InStr, E POI HO NOTATO CHE QUANDO AGGIUNGO PIU' NICK (CON IL CHECK MULTIPLO, NON SI SOMMANO L'UNO SOTTO L'ALTRO NELLA TEXTBOX MA NE RIMANE UNO SOLO (L'ULTIMO SELEZIONATO); ED ANCHE QUANDO LO DESELEZIONO NON FUNZIONA... RESTA SEMPRE UN NICK MEMORIZZATO NELLA TEXTBOX.. MI AVEVANO SUGGERITO DI DEFINIRE UN ARRAY PER QUESTO, DICENDO CHE ERA PIU' FACILE.. MA IO HO LA CONFUSIONE IN TESTAA
COME DICO AL NICK DI PASSARE IN IGNORAUTENTI ?????
E COME GLI DICO DI CANCELLARSI QUANDO DESELEZIONO IL CHECK ?????
FORSE PER TE SONO DOMANDE UMILIANTI E SCONTATE... PER ME, PURTROPPO NO..:quipy: