滚动到底部后，无法在ListBox中看到最后一项。

Question

我尝试了以下代码：

Dim visibleItems As Int16 = ListBoxLibraryAirplanes.ClientSize.Height / ListBoxLibraryAirplanes.ItemHeight

ListBoxLibraryAirplanes.TopIndex = Math.Max(ListBoxLibraryAirplanes.Items.Count - visibleItems + 1, 0)

有没有人见过这种行为？

Answer 1

我最后将一个空项添加到列表框中。一切似乎现在都有效。感谢Patrick和@Plutonix的回复。