Solved

VB.net Binding DataGridViewComboBoxCell to Enumeration

Posted on 2010-08-21
3
2,078 Views
Last Modified: 2012-05-10
I have the following code to define and set up my enumeration which I want to bind to a datagridviewcomboboxcell

<System.SerializableAttribute(), _
 System.Xml.Serialization.XmlTypeAttribute([Namespace]:="")> _
Partial Public Class WorkingDaysOfWeek
    Private iDay As iWeekDay
    <System.Xml.Serialization.XmlElementAttribute(Form:=System.Xml.Schema.XmlSchemaForm.Unqualified)> _
    Public Property HELDINACCT() As iWeekDay
        Get
            Return Me.iDay
        End Get
        Set(ByVal value As iWeekDay)
            Me.iDay = value
        End Set
    End Property

    <System.SerializableAttribute(), _
 System.Xml.Serialization.XmlTypeAttribute([Namespace]:="")> _
    Enum iWeekDay
        Monday
        Tuesday
        Wednesday
        Thursday
        Friday
    End Enum

End Class

Open in new window


I then use this routine to bind the enumeration to the datagridviewcomboboxcolumn

        Dim iSa As New DataGridViewComboBoxColumn
        With iSA
            .DataSource = System.Enum.GetValues(GetType(WorkingDaysOfWeek.iWeekDay))
            .Name = "Days"
            .FlatStyle = FlatStyle.Flat
        End With

Open in new window


My question is:

I am using VB 2010 Express edition and whenever I select a value from any cell in the combo column, the DISPLAYED value always returns to Monday (notwithstanding that I may have chosen another day).

Is this because of the way I have defined my class and enumeration, or is there some setting I have to make in the datagridview itself?

PS. I use the class above as part of a bigger class that serializes to XML. Incidentally, all enumerations in that class (sisters of the above) behave in the same way when bound to a DataGridviewComboboxCell / Column.
0
Comment
Question by:nepaluz
  • 2
3 Comments
 
LVL 18

Accepted Solution

by:
John (Yiannis) Toutountzoglou earned 500 total points
Comment Utility
try this
Public Shared Function BindEnumeration(ByVal _enum As Type) As ArrayList

        'get the names from the enumeration

        Dim enumNames() As String = System.Enum.GetNames(_enum)

        'get the values from the enumeration

        Dim enumValues() As Integer = System.Enum.GetValues(_enum)

        'turn it into a hash table

        Dim aList As New ArrayList()

        For i As Integer = 0 To enumNames.Length - 1

            aList.Insert(enumValues(i), enumNames(i))

        Next

        Return aList

    End Function

    Enum iWeekDay

        Monday

        Tuesday

        Wednesday

        Thursday

        Friday

    End Enum

DatsGridViewComboBox.DataSource = BindEnumeration(GetType(iWeekDay))

Open in new window

0
 
LVL 17

Author Comment

by:nepaluz
Comment Utility
jtoutou - thanks for the response.

Your code (should) work, however, it does not take into consideration of the "duo" purpose of my code request and question.

1. In the first place, the class serialize to XML (your suggested solution does not cater for that).

2. The second purpose is to have a working comboboxcell. My code above DOES produce a combocell bound to the enumeration (again as illustrated), however, there seems to be an issue with the displyed value (after selecting from the combo), which was my request for help (NOT INDEPENDENT OF THE SERIALIZATION!).
I may be missing something from your code, but may I request a more complete code sample with serialization included?

0
 
LVL 17

Author Closing Comment

by:nepaluz
Comment Utility
It should have been obvious (having tested the code) that this was the solution, and it indeed is the solution.

jtoutou - could you be a bit more verbose next time PSE!???
0

Featured Post

Find Ransomware Secrets With All-Source Analysis

Ransomware has become a major concern for organizations; its prevalence has grown due to past successes achieved by threat actors. While each ransomware variant is different, we’ve seen some common tactics and trends used among the authors of the malware.

Join & Write a Comment

I think the Typed DataTable and Typed DataSet are very good options when working with data, but I don't like auto-generated code. First, I create an Abstract Class for my DataTables Common Code.  This class Inherits from DataTable. Also, it can …
If you need to start windows update installation remotely or as a scheduled task you will find this very helpful.
Sending a Secure fax is easy with eFax Corporate (http://www.enterprise.efax.com). First, Just open a new email message.  In the To field, type your recipient's fax number @efaxsend.com. You can even send a secure international fax — just include t…
Internet Business Fax to Email Made Easy - With eFax Corporate (http://www.enterprise.efax.com), you'll receive a dedicated online fax number, which is used the same way as a typical analog fax number. You'll receive secure faxes in your email, fr…

762 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

Need Help in Real-Time?

Connect with top rated Experts

6 Experts available now in Live!

Get 1:1 Help Now