Spread中Combobox列的问题

Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

        Dim comboBoxType1 As FarPoint.Win.Spread.CellType.ComboBoxCellType = New FarPoint.Win.Spread.CellType.ComboBoxCellType
        Dim comboList1 As New List(Of String)
        Dim paraArray As Char() = {ChrW(10), ChrW(13)}

        For i As Integer = 0 To 10
            comboList1.Add(Text & i & Space(200) & 1)
            comboBoxType1.Editable = False
        Next
        comboBoxType1.Items = comboList1.ToArray
        With FpSpread1.ActiveSheet
            .Columns(0).CellType = comboBoxType1
        End With
    End Sub

如上，是我绑定Combobox的代码。
但是这样绑定后，为什么运行后总显示后面的数，
我只希望Combobox里面显示 Text & i  的内容，
换行后的i那个只是个标记，不需要再Combobo里
面显示，这个要怎么做呢？ 谢谢

回复 1楼miyaminn的帖子

请问使用后面标记想要实现的效果是？如果想标记value，那么可以通过 ItemData  属性来设置，ItemData 对应的显示界面就是 Items （显示的文本）

回复 2楼iceman的帖子

请问你说的那种写法要怎么写呢？
没有研究过，一直都是用这样的写法的。
ItemData怎么在代码中赋值呢？

在此对你的回复非常感谢！！！

回复 3楼miyaminn的帖子

miyaminn

我想这个章节中的内容，是你需要的功能，请参考帮助文档中的这个章节：FarPoint.Win.Spread Assembly > FarPoint.Win.Spread.CellType Namespace > ComboBoxCellType Class : ItemData Property

1. Dim combo As New FarPoint.Win.Spread.CellType.ComboBoxCellType()
   
2. 
   
3. Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
   
4.         Dim cbstr As String()
   
5.         cbstr = New String() {"One", "Two", "Three"}
   
6.         Dim strval As String()
   
7.         strval = New String() {"1", "2", "3"}
   
8.         combo.Items = cbstr
   
9.         combo.ItemData = strval
   
10.         combo.EditorValue = FarPoint.Win.Spread.CellType.EditorValue.ItemData
    
11.         FpSpread1.Sheets(0).Cells(0, 0).CellType = combo
    
12. End Sub
    
13. 
    

复制代码