如何使TextBox一直向下滚动?

时间:2018-12-19 19:52:37

标签: vba ms-access textbox

我正在使用Access窗体构建聊天室。

我在表单中设置了一个大型TextBox控件,以包含所有聊天消息。

即使没有重点关注,我也需要使其始终向下滚动。

我该怎么做?

1 个答案:

答案 0 :(得分:1)

答案是:

txtBox.selstart = len(txtBox.Value)

但是您从哪里来的呢?您始终说,即使不专心,但要做到这一点,就需要一直运行VBA宏:查找新消息,添加新消息并滚动框。 Access并非旨在以这种方式工作。

访问不是使聊天室成为前端的好应用程序。您可以将Access用于后端:将消息,用户和时间戳存储在表中。我建议您使用VB.NET做前端。 VB.NET是多线程的,因此前端将使消息检查线程将新消息添加到文本框中,而UI线程可以将新消息推送到DB,在那里新消息事件将提取该消息并将其显示在文本框。