Solved

IRC and List

Posted on 1998-10-04
1
217 Views
Last Modified: 2010-04-30
Hi
   I have a program that connects to IRC. My problem is that i want to fill a listbox with the names of the people in the room. When i use the /names <channel> command i get the response of just a list of names of the people in the room but I want to have the names go into a listbox. Like mIRC or most windows IRC programs. Thanks for any help.
0
Comment
Question by:Bart235
1 Comment
 
LVL 8

Accepted Solution

by:
MikeP090797 earned 100 total points
ID: 1438113
If you have the names in a string str, use this:

Dim N1 as integer
Dim N2 as integer
Dim S as string

Do
 N2=N1+1
 N1=Instr(N2, str, " ")
 
 If N1>0 then
  S=Mid$(str, N2, N1-N2+1)
  List1.additem s
 end if
Loop While(N1>0)
0

Featured Post

Netscaler Common Configuration How To guides

If you use NetScaler you will want to see these guides. The NetScaler How To Guides show administrators how to get NetScaler up and configured by providing instructions for common scenarios and some not so common ones.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

I’ve seen a number of people looking for examples of how to access web services from VB6.  I’ve been using a test harness I built in VB6 (using many resources I found online) that I use for small projects to work out how to communicate with web serv…
If you need to start windows update installation remotely or as a scheduled task you will find this very helpful.
Get people started with the process of using Access VBA to control Outlook using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Microsoft Outlook. Using automation, an Access applic…
This lesson covers basic error handling code in Microsoft Excel using VBA. This is the first lesson in a 3-part series that uses code to loop through an Excel spreadsheet in VBA and then fix errors, taking advantage of error handling code. This l…

770 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question