我在combobox的
TextChanged里动态添加项目数在使用中发现combobox下拉高度不正常，大部分情况下高度只有一行高，其实他的项目数都在两个以上。我在面板里手工指定高度也不管用
这是textchanged里的代码
If e.Sender.text.Length=1 Then
Dim drList As List(of DataRow) = DataTables("基础类别").Select("索引 = '" & e.Sender.text & "' And 级别 = 1 And 类别归属 = '地方车牌'")
If drList.count>0 Then
e.Sender.Items.Clear
e.Sender.text=drList(0)("类别名称")
e.Sender.SelectionStart=1
For Each dr As DataRow In drList
e.Sender.Items.Add(dr("类别名称"))
e.Sender.OpenDropDown
Next
End If
End If
[此贴子已经被作者于2013-12-23 16:48:12编辑过]
加好友 
发短信
Post By：2013/12/23 16:38:00 [只看该作者]
