2017-07-21 80 views
0

我有一个Access窗体上有一个列表框的Access数据库。这个列表可以滚动浏览,但是我需要知道滚动列表后顶部项目是什么。在滚动列表框VBA中获得热门项目

我想创建一个类似于甘特图的同步视图,它将坐在列表旁边(我已经有代码要做),但是我可以通过能够找出顶级项目是什么所以我知道哪些项目需要位于同步视图的顶部。

任何帮助将不胜感激。

谢谢

+0

您可能是指顶部显示的行。但是这个ID在Access中没有公开。用户必须选择一行,然后您的代码才能将图表同步到此ID。 – Gustav

+0

开始宏录制然后滚动列表框几次。也许有用的东西将得到记录 – jsotola

回答

0

您可以使用列表方法后跟索引。例如在一个MsgBox显示,那么你可以使用:

MsgBox ComboBox1.List(0) 

其中0是在列表中的第一个项目 1是第二等,等

希望帮助

编辑:

这是我作为测试尝试的代码,它工作正常。

Private Sub UserForm_Click 
MsgBox ListBox1.List(0) 
End Sub 



Private Sub UserForm_Initialize() 
UserForm1.ListBox1.AddItem "a" 
UserForm1.ListBox1.AddItem "b" 
UserForm1.ListBox1.AddItem "c" 
UserForm1.ListBox1.AddItem "d" 
UserForm1.ListBox1.AddItem "e" 
End Sub 

这显示消息框与字母“a”的内部,因为这是第一项添加到列表框(被包括来填充代码,以显示它被加到第一个)。如果你想直接显示列表框中的第一项,那么这将工作。如果您希望显示当时列表中的顶部(根据用户是否滚动),然后让我知道,我会尝试解决此问题。

+0

嗨,谢谢你,我有点困惑。我正在使用可以由窗体上的用户向下滚动的列表框。我不知道他们在哪里滚动,所以我不知道索引来获取项目数据。这就是为什么我想知道是否有像listbox.topindex vba –

+0

(0)将始终引用组合框中的顶部项目。我以为这就是你想要的? – wrslphil

+0

应该是一样的列表框 – wrslphil