LIST BOX HELL. Please Save, Remove Items, Many List Boxes...one Last Name

ok, so the code so far, or as much as you need to see, is
****************************
***************************
***************************
***************************
***************************

Sub LoadCal()
Dim gdtDate As Date
Dim i As Integer
Dim x As Integer
Dim startDay As Integer
Dim giMaxDays As Integer

' clear list boxes before filling again
For i = 0 To 41
List1(i).Clear
Next

' * * * * * * * * * * * * * * * * * * * * * *
' * * * * * ADD DAY NUMBERS * * * * *
'label at top of form
Label1.Caption = MonthName(giMonth) & " " & giYear

'this is the current date
gdtDate = CDate(giMonth & "/01/" & giYear)

'minus one so the first line is never completely empty
startDay = Weekday(gdtDate) - 1

'the number of days in this month
giMaxDays = Day(DateAdd("m", 1, gdtDate) - 1)

'populates list boxes with days
x = 1
i = startDay
While i < (giMaxDays + startDay)
List1(i).AddItem (x)
x = x + 1
i = i + 1
Wend

' * * * * * * * * * * * * * * * * * * * * * *
' * * * * * ADD NAMES TO DAYS * * * * *

' !!!!!!!!!!!!!!!!!check to see that list is not empty !!!!!!!!!!!
If lstAgentList.ListCount = 0 Then GoTo done
'!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

'agent list counter, "at which item" index
x = -1
'populate list boxes from the first day of the month with numbers
i = startDay
'counter for number of days until sunday
a = startDay - 1

'from the first day to the last day
While i < (giMaxDays + startDay)
If a < 6 Then
'a maximum of 3 names per day
While (List1(i).ListCount) < 4
' if there are no more items in the items list ('x' is greater than counter)
If x < (lstAgentList.ListCount - 1) Then
x = x + 1
' otherwise set it back to 0 (zero)
Else
x = 0
End If
'add the next name from the established agent list
List1(i).AddItem (lstAgentList.List(x))
Wend
a = a + 1
Else
'a maximum of 3 names per day
While (List1(i).ListCount) < 4
'add the next name from the established agent list
List1(i).AddItem (lstAgentList.List(x))
'here we do not increment name for it is a sunday
Wend
'reset 7 days until sunday counter
a = 0
End If
'increment day count
i = i + 1
Wend

done:
' end
End Sub



***************************
***************************
***************************
***************************
now see the shaddy thing with this is...well, it's a calendar month see, and every day is a list box....first item, the date, 1st, 2nd, 3rd, 4th, and so on...each list box can hold that first item, the date, plus 3 names.

if someone double clicks on one of those names (which are populated through other methods...not important) i want that name to be deleted...now where i am out of ideas is: how do i delete one item from one list when my list (List1) is an array of about 41 list boxes all named List1 (x) see....

also if I wanted that name which was double click to delete itself through the entire month, then ....well...the rest is my own trouble...but so far i can't seem to be able to delete.

grrr.
...

thanks in advance,
-munchkin

• List Box (Remove Items)
• List Box, Remove Items 1 By 1
• Remove Items From List Box
• Check Box To Remove Items From List?
• How Do I Remove Empty Items From A List Box?
• Remove Item From 2 List Boxes
• List Boxes Remove Item
• Move Items In 2 List Boxes
• List Boxes (adding Together Items)
• Access 2002 - Remove Multiple Items In A List Box (Resolved)
• Removing Items Form List Boxes!
• Sorting List Boxes And Combining Items That Are The Same
• List View Selected Items In Text Boxes
• Help With File List , Dir List And Drive List Boxes..
• If Item Selected In Combo Box Then Clear List Box Then Add New Items In The List Box
• Editing List Items And ListSubItems In List View Control
• Combine List Items To Create New Item In Same List?
• How To List The Items Of Combo List When It Get Focus Without Click On It
• Remove Selection Bar From List Box, Without Disabling List Box??
• Remove The Last 4 Letters From My List Box List Names.
• List Box, How Can I Paint Specific Items On A List
• List Box, How Can I Paint Specific Items On A List ?
• List Box - Selecting Items To Be Displayed Into Another List Box
• Drive List And Directory List Boxes
• Drive List And Directory List Boxes
• Dragging List Items Around A List Box: Example
• Importing List Items To Another List
• Selects Items From List Box To List Box?
• Saving Items (selected Items) In List Box To A Text File
• All Things In Form Text Boxes List Boxes...Saving
• Is There A Way To List Items In A List Box Using Tab?
• Web Control, List Boxes, Text Boxes, Please Help This Is Winding Me Up!
• Combo And List Boxes To Text Boxes?
• Bit Of List/Remove Help
• Remove Certain Value From List Box
• Remove From List
• Remove From List Box
• List Box Remove Item
• How To Remove Duplicates From A List Box?
• Remove Item From List???
• How Remove From A List And From A Table?
• How Remove From A List And From A Table?
• Add/Remove Program List
• Remove List Index Via ID
• How Do You Remove Duplicates From A List Box?
• Remove Character From List Box
• Remove Blank From List
• Remove End Of Item In List
• List - Remove Item