爲每個組合框項目存儲值

由於缺少Value屬性，我計劃使用類來存儲Text和Value屬性，用於我的ComboBox項目。到目前爲止，我已經成功。爲每個組合框項目存儲值

這裏是我的類：

Public Class clCombobox 
Public cname As String 
Public cvalue As Integer 

    Public Property Display() As String 
    Get 
     Return Me.cname 
    End Get 
    Set(ByVal value As String) 
     Me.cname = value 
    End Set 
End Property 
Public Property Value() As String 
    Get 
     Return Me.cvalue 
    End Get 
    Set(ByVal value As String) 
     Me.cvalue = value 
    End Set 
End Property 


Public Sub New(ByVal name As String, ByVal value As String) 
    cname = name 
    cvalue = value 
End Sub 

Public Overrides Function ToString() As String 
    Return cname 
End Function 
End Class

數據被添加到ComboBox這樣的：

cmbComboxBox.Items.Add(New clCombobox("Text", 1))

好像到目前爲止是這種情況。但是我如何獲取數據。如果我想要選擇CheckBox項目的值？

我試着使用：

CType(cmbCombobox.SelectedItem, clCombobox).Value()

沒有工作。

來源

2012-05-06 janlindso

什麼不工作有關'CTYPE（cmbCombobox.SelectedItem，clComboboks）.value的（）'？你意識到它說clCombobo ** ks **它應該是clCombobo ** x **？ – MarioDS

是的，我的不好。請在下面查看我的回答。 – janlindso

根據the documentation，使用SelectedItem property來檢索您存儲在其中的對象。

代碼檢索值你想要的：

Dim selectedItem as clCombobox = CType(cmbComboBox.SelectedItem, clCombobox) 
Dim value As Integer = selectedItem.cvalue

來源

2012-05-06 18:41:26 MarioDS

沒有得到它的工作。這是C＃嗎？ – janlindso

@ user880980是的，我的不好。一直在C＃編碼，因此錯誤。請參閱我的編輯;） – MarioDS

謝謝。在代碼中沒有錯誤，但是當我運行它時，我在該代碼的第二行得到'對象引用未設置爲對象的實例。 – janlindso

爲每個組合框項目存儲值

回答

相關問題