A custom button with a collection?

[Sundown]

I am trying to create a custom button control for the web that, when clicked,
disables and changes the text of itself and a bunch of other controls (in the
collection). My goal is to end up with a button that prevents the user from
submitting a form back multiple times and also prevents them from submitting
the form and then clicking something else before the postback can finish
processing.

What I have is a working button that disables and changes the text of
itself. It generates the <input> tag and associated attributes and it
generates the javascript and the postback event and adds it to the tag. My
hope was to add a collection to the control to generate the javascript to
disable other controls and change their text as well. I wanted to be able to
add it to the properties window (similar to adding Items to a dropdownlist)
and use System.Web.UI.D esign.WebContro ls.ListItemsCol lectionEditor to create
the editor. The problem I am having is adding the collection.

In an attempt to make this work I have added 3 additional classes (basing
this all off of a non-function example of how to create a custom
ListItemsCollec tionEditor class I found on the web by Brian Mains). The
"ControlsToDisa ble" Class is the defines the object that the collection will
store. The "ControlsToDisa bleCollection" Class inherits from CollectionBase
and its only property is "Item". It also has a few functions for adding
items/ removing items/ etc. The "ControlsToDisa bleCollectionEd itor" Class
(you like the naming convention?) inherits from the ListItemsCollec tionEditor
class and sets the type of class to my "ControlsToDisa bleCollection" Class.
The "Button" Class then has a property that calls the collection. This works
in visual studio and allows me to use the editor to add items and stores
them... however when I run the page with the control on it and get a count of
items in the collection it's 0 and when I go back to the into visual studio
and open up the collection the list is empty. I was under the impression from
the article that the that the collection would be rendered on the page in the
HTML like items in a drop down are rendered, but they are not. I'm not sure
where they are getting stored while I'm in visual studio.

I am perfectly happy to go in a completely different direction with this if
that's what it takes, but I really want to be able to use the
ListItemsCollec tionEditor class, as there will be a number of people using
this control and the familiarity means I don't have to repeatedly explain how
to use it. Now if you are still with me (I'm sorry) I'll put the classes
below in the order that I mentioned them. Some stuff has been left out to
help reduce the size of this posting. Thanks in advance for any help that you
can provide.

------------ControlsToDisab le----------------------------------------

Imports System.Web.UI
Imports System.Componen tModel

Public Class ControlsToDisab le
Private _Name As String
Public Property Name() As String
Get
Return _Name
End Get
Set(ByVal Value As String)
_Name = Value
End Set
End Property

Public Sub New()
'Do Nothing
End Sub

Public Sub New(ByVal Name As String)
_Name = Name
End Sub

Public Overrides Function tostring() As String
Return _Name
End Function

End Class

------------ControlsToDisab leCollection------------------------------

Imports System.Web.UI
Imports System.Web.UI.W ebControls
Imports System.Componen tModel

<DefaultPropert y("Item")> _
Public Class ControlsToDisab leCollection
Inherits CollectionBase
<DesignerSerial izationVisibili ty(DesignerSeri alizationVisibi lity.Visible), _
PersistenceMode (PersistenceMod e.Attribute)> _
Default Public Property Item(ByVal intIndex As Integer) As
ButtonsToDisabl e
Get
Return DirectCast(list .Item(intIndex) , ControlsToDisab le)
End Get
Set(ByVal Value As ControlsToDisab le)
list.Item(intIn dex) = Value
End Set
End Property

Public Function Add(ByVal objItem As ControlsToDisab le) As Integer
Return list.Add(objIte m)
End Function

Public Function Add(ByVal Name As String) As Integer
Return list.Add(New ControlsToDisab le(Name))
End Function

Public Function Contains(ByVal objItem As ControlsToDisab le) As Boolean
Return list.Contains(o bjItem)
End Function

Public Sub Insert(ByVal intIndex As Integer, ByVal objItem As
ControlsToDisab le)
list.Insert(int Index, objItem)
End Sub

Public Sub Remove(ByVal objItem As ControlsToDisab le)
list.Remove(obj Item)
End Sub

End Class

------------ControlsToDisab leCollectionEdi tor------------------------

Public Class ControlsToDisab leCollectionEdi tor
Inherits System.Web.UI.D esign.WebContro ls.ListItemsCol lectionEditor

Public Sub New()
MyBase.New(GetT ype(ControlsToD isableCollectio n))
End Sub
End Class

------------Button---------------------------------------------------

Imports System.Componen tModel
Imports System.Web.UI
Imports System.Drawing

<ToolboxBitmap( GetType(System. Web.UI.WebContr ols.Button)), _
DefaultEvent("C lick"), DefaultProperty ("Text"), _
ParseChildren(F alse), PersistChildren (True)> _
Public Class Button
Inherits System.Web.UI.W ebControls.WebC ontrol

Private _ControlListToD isable As New controlsToDisab leCollection

<Bindable(True) , Browsable(True) , Category("Data" ), _
Editor(GetType( controlsToDisab leCollection),
GetType(System. Web.UI.Design.W ebControls.List ItemsCollection Editor)), _

DesignerSeriali zationVisibilit y(DesignerSeria lizationVisibil ity.Content), _
PersistenceMode (PersistenceMod e.InnerProperty )> _
Public Property ControlListToDi sable() As ControlsToDisab leCollection
Get
Return _ControlListToD isable
End Get
Set(ByVal Value As ControlsToDisab leCollection)
_ControlListToD isable = Value
End Set
End Property

Public Sub New()
MyBase.New(Html TextWriterTag.I nput)
End Sub

End Class