I'd already posted this in microsoft.public.dotnet.framework.windowsforms
and microsoft.public.dotnet.framework.windowsforms.con trols to no avail so
apologies for the cross-posting.
Hi,
I'm writing a usercontrol which displays the typical two listboxes and the
ability to move items from one to the other.
The listboxes are populated with my custom objects (SwapItem), which simply
have a ValueMember, DisplayMember a couple of other properties and the
tostring function to display the DisplayMember in the listbox.
The issue I'm getting is with the SelectedIndices array
I selected four items in the listbox and then I use:
For i As Int32 = 0 To lstAvailable.SelectedIndices.Count - 1
lstItem =
CType(lstAvailable.Items.Item(lstAvailable.Selecte dIndices(i)),
SwapListBoxItem)
lstItem.Selected = True
intIndex = i
Next
Before execution gets to this, the lstAvailable.SelectedIndices.count
returns 4.
Happy Days.
However when I try to evaluate lstAvailable.SelectedIndices(0) or
lstAvailable.SelectedIndices(1) or lstAvailable.SelectedIndices(2) or
lstAvailable.SelectedIndices(4) i get the error "Index was outside the
bounds of the array".
This can't be true as the.count is 4.
I get exactly the same results using the SelectedItems array to.
Is this a symptom of using my own custom object in the listbox (I've posted
the custom object code below for reference)??
Once the custom object is instantiated and then populated I use this line to
add it to the listbox:
lstAvailable.Items.Add(SwapItem)
Also, when I use:
Dim lst As SwapListBoxItem
For Each lst In lstAvailable.SelectedItems
lstItem.Selected = True
Next
The lstAvailable.SelectedItems.Count returns 4, but the execution doesn't
iterate, just jumps over the For statement.
However, I can use this and it iterates correctly:
Dim lstItem As SwapListBoxItem
For Each lstItem In lstSelected.Items
lstItem.Selected = True
Next
So it seems that the items collection can iterate my customer objects but
the selecteditems cannot????
Thanks
Alex
*****Custom Object Code Start******
Public Class SwapListBoxItem
Private m_objValueMember As Object = ""
Private m_strDisplayMember As String = ""
Private m_bolSelected As Boolean = False
Public Property ValueMember() As Object
Get
Return m_objValueMember
End Get
Set(ByVal ValueMember As Object)
m_objValueMember = ValueMember
End Set
End Property
Public Property DisplayMember() As String
Get
Return m_strDisplayMember
End Get
Set(ByVal DisplayMember As String)
m_strDisplayMember = DisplayMember
End Set
End Property
Public Property Selected() As Boolean
Get
Return m_bolSelected
End Get
Set(ByVal Selected As Boolean)
m_bolSelected = Selected
End Set
End Property
Public Sub ChangeSelected()
m_bolSelected = Not m_bolSelected
End Sub
Public Overrides Function ToString() As String
Return Me.DisplayMember
End Function
End Class
*****Custom Object Code End****** 3 2362
Remember, you are returning a collection of indicies so you should use the
follwing to access a particular element
ListBox1.SelectedIndicies.Item( numOfElement )
OHM
"Alex Stevens" <Al**********************@gcc.co.uk> wrote in message
news:eU**************@TK2MSFTNGP09.phx.gbl... I'd already posted this in microsoft.public.dotnet.framework.windowsforms and microsoft.public.dotnet.framework.windowsforms.con trols to no avail so apologies for the cross-posting.
Hi,
I'm writing a usercontrol which displays the typical two listboxes and the ability to move items from one to the other.
The listboxes are populated with my custom objects (SwapItem), which
simply have a ValueMember, DisplayMember a couple of other properties and the tostring function to display the DisplayMember in the listbox.
The issue I'm getting is with the SelectedIndices array I selected four items in the listbox and then I use:
For i As Int32 = 0 To lstAvailable.SelectedIndices.Count - 1 lstItem = CType(lstAvailable.Items.Item(lstAvailable.Selecte dIndices(i)), SwapListBoxItem) lstItem.Selected = True intIndex = i Next
Before execution gets to this, the lstAvailable.SelectedIndices.count returns 4. Happy Days.
However when I try to evaluate lstAvailable.SelectedIndices(0) or lstAvailable.SelectedIndices(1) or lstAvailable.SelectedIndices(2) or lstAvailable.SelectedIndices(4) i get the error "Index was outside the bounds of the array". This can't be true as the.count is 4.
I get exactly the same results using the SelectedItems array to. Is this a symptom of using my own custom object in the listbox (I've
posted the custom object code below for reference)??
Once the custom object is instantiated and then populated I use this line
to add it to the listbox: lstAvailable.Items.Add(SwapItem)
Also, when I use: Dim lst As SwapListBoxItem For Each lst In lstAvailable.SelectedItems lstItem.Selected = True Next
The lstAvailable.SelectedItems.Count returns 4, but the execution doesn't iterate, just jumps over the For statement. However, I can use this and it iterates correctly:
Dim lstItem As SwapListBoxItem For Each lstItem In lstSelected.Items lstItem.Selected = True Next
So it seems that the items collection can iterate my customer objects but the selecteditems cannot????
Thanks
Alex
*****Custom Object Code Start****** Public Class SwapListBoxItem
Private m_objValueMember As Object = "" Private m_strDisplayMember As String = "" Private m_bolSelected As Boolean = False
Public Property ValueMember() As Object Get Return m_objValueMember End Get Set(ByVal ValueMember As Object) m_objValueMember = ValueMember End Set End Property
Public Property DisplayMember() As String Get Return m_strDisplayMember End Get Set(ByVal DisplayMember As String) m_strDisplayMember = DisplayMember End Set End Property
Public Property Selected() As Boolean Get Return m_bolSelected End Get Set(ByVal Selected As Boolean) m_bolSelected = Selected End Set End Property
Public Sub ChangeSelected() m_bolSelected = Not m_bolSelected End Sub
Public Overrides Function ToString() As String Return Me.DisplayMember End Function
End Class
*****Custom Object Code End******
Well, that was irritating.......
I copied the code into a new project to attach to this message.
Added a new listbox to a new form and hooked up the code.
Guess what....it worked.
I then gradually worked back to the original form (which is actually a
custom control), and ended up simply deleting the listbox on the control,
and adding a new one and renaming it.
Guess what it started to work again.
(I wondered why there weren't many posting with the same syptoms).
Also, lstAvailable.SelectedIndices(i) works just the same as
lstAvailable.SelectedIndices.Item(i)
I wish I could invoice MS for what was a day or so of my time!!!
"One Handed Man ( OHM#)" <news.microsoft.com> wrote in message
news:ug****************@TK2MSFTNGP10.phx.gbl... Remember, you are returning a collection of indicies so you should use the follwing to access a particular element
ListBox1.SelectedIndicies.Item( numOfElement )
OHM
"Alex Stevens" <Al**********************@gcc.co.uk> wrote in message news:eU**************@TK2MSFTNGP09.phx.gbl... I'd already posted this in
microsoft.public.dotnet.framework.windowsforms and microsoft.public.dotnet.framework.windowsforms.con trols to no avail
so apologies for the cross-posting.
Hi,
I'm writing a usercontrol which displays the typical two listboxes and
the ability to move items from one to the other.
The listboxes are populated with my custom objects (SwapItem), which simply have a ValueMember, DisplayMember a couple of other properties and the tostring function to display the DisplayMember in the listbox.
The issue I'm getting is with the SelectedIndices array I selected four items in the listbox and then I use:
For i As Int32 = 0 To lstAvailable.SelectedIndices.Count - 1 lstItem = CType(lstAvailable.Items.Item(lstAvailable.Selecte dIndices(i)), SwapListBoxItem) lstItem.Selected = True intIndex = i Next
Before execution gets to this, the lstAvailable.SelectedIndices.count returns 4. Happy Days.
However when I try to evaluate lstAvailable.SelectedIndices(0) or lstAvailable.SelectedIndices(1) or lstAvailable.SelectedIndices(2) or lstAvailable.SelectedIndices(4) i get the error "Index was outside the bounds of the array". This can't be true as the.count is 4.
I get exactly the same results using the SelectedItems array to. Is this a symptom of using my own custom object in the listbox (I've posted the custom object code below for reference)??
Once the custom object is instantiated and then populated I use this
line to add it to the listbox: lstAvailable.Items.Add(SwapItem)
Also, when I use: Dim lst As SwapListBoxItem For Each lst In lstAvailable.SelectedItems lstItem.Selected = True Next
The lstAvailable.SelectedItems.Count returns 4, but the execution
doesn't iterate, just jumps over the For statement. However, I can use this and it iterates correctly:
Dim lstItem As SwapListBoxItem For Each lstItem In lstSelected.Items lstItem.Selected = True Next
So it seems that the items collection can iterate my customer objects
but the selecteditems cannot????
Thanks
Alex
*****Custom Object Code Start****** Public Class SwapListBoxItem
Private m_objValueMember As Object = "" Private m_strDisplayMember As String = "" Private m_bolSelected As Boolean = False
Public Property ValueMember() As Object Get Return m_objValueMember End Get Set(ByVal ValueMember As Object) m_objValueMember = ValueMember End Set End Property
Public Property DisplayMember() As String Get Return m_strDisplayMember End Get Set(ByVal DisplayMember As String) m_strDisplayMember = DisplayMember End Set End Property
Public Property Selected() As Boolean Get Return m_bolSelected End Get Set(ByVal Selected As Boolean) m_bolSelected = Selected End Set End Property
Public Sub ChangeSelected() m_bolSelected = Not m_bolSelected End Sub
Public Overrides Function ToString() As String Return Me.DisplayMember End Function
End Class
*****Custom Object Code End******
Actually, I tested this and got the same error, it was only when I used
..Item that it worked consistantly, I found Once I had encountered the error
once, I ket getting it by omitting the .Item
One would think that Item would be the default property to enable you to use
parenthasis directly after the object, but I had to consistently use item
for good results.
Regards - OHM
"Alex Stevens" <Al**********************@gcc.co.uk> wrote in message
news:%2***************@TK2MSFTNGP10.phx.gbl... Well, that was irritating.......
I copied the code into a new project to attach to this message. Added a new listbox to a new form and hooked up the code.
Guess what....it worked.
I then gradually worked back to the original form (which is actually a custom control), and ended up simply deleting the listbox on the control, and adding a new one and renaming it.
Guess what it started to work again. (I wondered why there weren't many posting with the same syptoms).
Also, lstAvailable.SelectedIndices(i) works just the same as lstAvailable.SelectedIndices.Item(i)
I wish I could invoice MS for what was a day or so of my time!!!
"One Handed Man ( OHM#)" <news.microsoft.com> wrote in message news:ug****************@TK2MSFTNGP10.phx.gbl... Remember, you are returning a collection of indicies so you should use
the follwing to access a particular element
ListBox1.SelectedIndicies.Item( numOfElement )
OHM
"Alex Stevens" <Al**********************@gcc.co.uk> wrote in message news:eU**************@TK2MSFTNGP09.phx.gbl... I'd already posted this in microsoft.public.dotnet.framework.windowsforms and microsoft.public.dotnet.framework.windowsforms.con trols to no
avail so apologies for the cross-posting.
Hi,
I'm writing a usercontrol which displays the typical two listboxes and the ability to move items from one to the other.
The listboxes are populated with my custom objects (SwapItem), which
simply have a ValueMember, DisplayMember a couple of other properties and the tostring function to display the DisplayMember in the listbox.
The issue I'm getting is with the SelectedIndices array I selected four items in the listbox and then I use:
For i As Int32 = 0 To lstAvailable.SelectedIndices.Count - 1 lstItem = CType(lstAvailable.Items.Item(lstAvailable.Selecte dIndices(i)), SwapListBoxItem) lstItem.Selected = True intIndex = i Next
Before execution gets to this, the lstAvailable.SelectedIndices.count returns 4. Happy Days.
However when I try to evaluate lstAvailable.SelectedIndices(0) or lstAvailable.SelectedIndices(1) or lstAvailable.SelectedIndices(2) or lstAvailable.SelectedIndices(4) i get the error "Index was outside the bounds of the array". This can't be true as the.count is 4.
I get exactly the same results using the SelectedItems array to. Is this a symptom of using my own custom object in the listbox (I've posted the custom object code below for reference)??
Once the custom object is instantiated and then populated I use this line to add it to the listbox: lstAvailable.Items.Add(SwapItem)
Also, when I use: Dim lst As SwapListBoxItem For Each lst In lstAvailable.SelectedItems lstItem.Selected = True Next
The lstAvailable.SelectedItems.Count returns 4, but the execution doesn't iterate, just jumps over the For statement. However, I can use this and it iterates correctly:
Dim lstItem As SwapListBoxItem For Each lstItem In lstSelected.Items lstItem.Selected = True Next
So it seems that the items collection can iterate my customer objects but the selecteditems cannot????
Thanks
Alex
*****Custom Object Code Start****** Public Class SwapListBoxItem
Private m_objValueMember As Object = "" Private m_strDisplayMember As String = "" Private m_bolSelected As Boolean = False
Public Property ValueMember() As Object Get Return m_objValueMember End Get Set(ByVal ValueMember As Object) m_objValueMember = ValueMember End Set End Property
Public Property DisplayMember() As String Get Return m_strDisplayMember End Get Set(ByVal DisplayMember As String) m_strDisplayMember = DisplayMember End Set End Property
Public Property Selected() As Boolean Get Return m_bolSelected End Get Set(ByVal Selected As Boolean) m_bolSelected = Selected End Set End Property
Public Sub ChangeSelected() m_bolSelected = Not m_bolSelected End Sub
Public Overrides Function ToString() As String Return Me.DisplayMember End Function
End Class
*****Custom Object Code End******
This thread has been closed and replies have been disabled. Please start a new discussion. Similar topics
by: Jason Callas |
last post by:
I have a weird problem with a sorted ListBox which is bound to an ArrayList.
My ArrayList is holding a collection of custom objects. One of the public properties is called Name. When I add a few...
|
by: Steve Jorgensen |
last post by:
When writing VB or VBA code that works with databases or other external
libraries that cannot be trusted to automatically do the right thing when
references to their objects are arbitrarily...
|
by: Dave Rudolf |
last post by:
Hi all,
I have a System.Windows.Forms.ListBox object that I am putting objects into.
These objects are of custom types that I am defining. The list box displays
each object by its class name --...
|
by: Claire |
last post by:
Is it possible to associate data/objects for each item in a list or combobox
please (as you could with the objects member for tstrings in delphi)
thanks
|
by: Patty O'Dors |
last post by:
Hi
I have some code to create an ownerdrawn listbox (derived), and when I add
an item to it, the bold text of the first item (the title, 'Collections and
Maturities') mysteriously seems to get...
|
by: MrNobody |
last post by:
Hi, I'm doing something where I add custom objects to a ListBox which have
aToString() method overriden so it displays what I want. When adding
instances of these custom objects to the ListBox I...
|
by: Alex Stevens |
last post by:
I'd already posted this in microsoft.public.dotnet.framework.windowsforms
and microsoft.public.dotnet.framework.windowsforms.controls to no avail so
apologies for the cross-posting.
Hi,
I'm...
|
by: hyperpau |
last post by:
Before anything else, I am not a very technical expert when it comes to VBA coding.
I learned most of what I know by the excellent Access/VBA forum from bytes.com (formerly thescripts.com).
Ergo, I...
|
by: hyperpau |
last post by:
Before anything else, I am not a very technical expert when it comes to VBA coding.
I learned most of what I know by the excellent Access/VBA forum from bytes.com (formerly thescripts.com).
Ergo, I...
|
by: DolphinDB |
last post by:
The formulas of 101 quantitative trading alphas used by WorldQuant were presented in the paper 101 Formulaic Alphas. However, some formulas are complex, leading to challenges in calculation.
Take...
|
by: ryjfgjl |
last post by:
ExcelToDatabase: batch import excel into database automatically...
|
by: isladogs |
last post by:
The next Access Europe meeting will be on Wednesday 6 Mar 2024 starting at 18:00 UK time (6PM UTC) and finishing at about 19:15 (7.15PM).
In this month's session, we are pleased to welcome back...
|
by: isladogs |
last post by:
The next Access Europe meeting will be on Wednesday 6 Mar 2024 starting at 18:00 UK time (6PM UTC) and finishing at about 19:15 (7.15PM).
In this month's session, we are pleased to welcome back...
|
by: jfyes |
last post by:
As a hardware engineer, after seeing that CEIWEI recently released a new tool for Modbus RTU Over TCP/UDP filtering and monitoring, I actively went to its official website to take a look. It turned...
|
by: PapaRatzi |
last post by:
Hello,
I am teaching myself MS Access forms design and Visual Basic. I've created a table to capture a list of Top 30 singles and forms to capture new entries. The final step is a form (unbound)...
|
by: Shællîpôpï 09 |
last post by:
If u are using a keypad phone, how do u turn on JavaScript, to access features like WhatsApp, Facebook, Instagram....
|
by: af34tf |
last post by:
Hi Guys, I have a domain whose name is BytesLimited.com, and I want to sell it. Does anyone know about platforms that allow me to list my domain in auction for free. Thank you
|
by: Faith0G |
last post by:
I am starting a new it consulting business and it's been a while since I setup a new website. Is wordpress still the best web based software for hosting a 5 page website? The webpages will be...
| |