Results 1 to 4 of 4

Thread: Another Listbox Question

  1. #1

    Thread Starter
    Addicted Member Smie's Avatar
    Join Date
    Jun 1999
    Location
    Columbus, OH
    Posts
    249

    Post

    Thanks for the previous help, Now, how would i reverse that and send all the list to a textbox separated by ";" i tried:

    text1.text = List1.listindex & ";"

    but that wasnt it, I need to send All of the list, just not one part. Thanks

  2. #2
    Former Admin/Moderator MartinLiss's Avatar
    Join Date
    Sep 1999
    Location
    San Jose, CA
    Posts
    33,175

    Post

    Code:
    Dim intIndex As Integer
        
        For intIndex = 0 To List1.ListCount - 1
            If List1.Selected(intIndex) Then
                Text1.Text = Text1.Text & List1.List(intIndex) & ";"
            End If
        Next intIndex
        
        Text1.Text = Left(Text1, Len(Text1.Text) - 1)

    ------------------
    Marty

  3. #3

    Thread Starter
    Addicted Member Smie's Avatar
    Join Date
    Jun 1999
    Location
    Columbus, OH
    Posts
    249

    Post

    That did not work, sorry. Any clue how to fix it, and get it to send ALL the info, not just the selected? thanks!

  4. #4
    Hyperactive Member
    Join Date
    Jun 1999
    Location
    Taipei
    Posts
    318

    Post

    Just remove the if statement will work!

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width