我发一个自己写的多列列表控件，希望能有朋友帮忙测试一下，for .Net的

i815ep-t

我发一个自己写的多列列表控件，希望能有朋友帮忙测试一下,我自己用了一下，暂时没有发现错误

使用方法正在编写中，有需要者请 Email：[email protected]

ljtlily

在工具箱中无法添加控件。信息如下：

未能从程序集 mscorlib, Version=1.0.5000.0, Culture=neutral, PublicKeyToken=b77a5c561934e089中加载类型CControl.ListControl.ListBoxExDesigner。

i815ep-t

哎，为什么在我自己的机器上能添加呢，我得查查，多谢啦，请继续关注，再次感谢

i815ep-t

我看了一下，问题出在 Dotfuscator 在模糊时将 设计类也给模糊了，已改过来了，现在再发上来，请朋友再帮忙测试一下

现在就只改了这一点，下一步我想加入对数据集的支持，顺便加入帮助文件

多谢朋友帮忙测试，谢啦：）

ljtlily

控件已可添加，但不知用法，能否给一个例子？是那种类似于Grid的控件么？果真如此，那么能够对数据集进行支持则在一定程度上显示得很重要。

请将相关资料发至[email protected]中，谢谢！

i815ep-t

首先多谢你的测试，但新年开始，工作有点忙，所以一直没有时间把帮助文件制作出来，就先发一段我的测试代码给你吧，如有什么问题，希望并且欢迎你给我来信，谢谢！！！同时我已将此代码发到你的信箱，怕你收不到，又在此发一下：）

以下代码，假定你在窗体上已经放了一个ListBoxEx控件，并且将其命名为 cT

Private Sub AddString()
  Dim cI As CControl.ListControl.CListItem
  For iL As Int32 = 980 To 1020
   cI = cT.NewItem("测试一下速度 " & iL)
   cI.ForeColor = Drawing.Color.Blue
   cI.AddCell("测试2")
   cI.AddCell("测试3")
   cI.AddCell("测试4")
   cI.AddCell("测试5")
   cI.AddCell("测试6")
   cI.AddCell("测试7")
   cI.Font = New Font("汉仪黛玉体简", 12)
   cT.AddItem(cI)
  Next
End Sub

Private Sub AddColor()
  Dim cL As Color
  Dim cI As CControl.ListControl.CListItem
  For iL As KnownColor = 1 To KnownColor.YellowGreen
   cL = Color.FromKnownColor(iL)
   cI = cT.NewItem(cL)
   cI.AddCell(cL.Name)
   cI.Font = New Font("汉仪黛玉体简", 12)
   cT.AddItem(cI)
  Next
End Sub