Question

我有一个包含列表框（listbox1）的用户控件。

horizontalscrollbar设置设为TRUE。

另一个列表框（selectionchanged）上还有一个处理程序，用于设置listbox1的值（如果这可能导致问题）。

我将此usercontrol添加到tabcontrol中的标签页。

我面临的问题是，即使listbox1中显示的项目大于宽度，也不会显示水平滚动条。

任何人都知道如何解决这个问题？

由于

CNC中尽可能多的代码要求我显示

dim tabpage as new Tabpage
dim dict as new dictionary(of String, list(of MyObject))
'fill dict
tabpage.add(usercontrol(dict))
tabcontrol1.tabpages.add(tabpage)

用户控件：

class UserControl  
 public sub new(dict)
  Dim bs As BindingSource = New BindingSource(dict, Nothing)
    ListBox1.DataSource = bs
    ListBox1.DisplayMember = "Key"
 end sub  

 Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged
    ListBox2.DataSource = New BindingSource(CType(ListBox1.SelectedItem, KeyValuePair(Of String, List(Of MyObject))).Value, Nothing)
        End Sub
End Class

Answer 1

我已经弄清楚它为什么不起作用了。只是一个我忽略的小场景。我在这里张贴，因为它可能会帮助其他人。

如果列表框的 multiColumn 设置为 True ，那么水平滚动条将不会显示为您（我）想要的。

关闭multiColumn（不需要时）或修改列宽将解决此问题。

主题可以关闭。

水平滚动条未显示在列表框中

1 个答案: