如何使 TextBox 一直向下滚动?
How to make TextBox already scrolled-down at all times?
我正在使用 Access 表单构建聊天室。
我在表单中设置了一个大型 TextBox
控件,以包含所有聊天消息。
我需要让它一直向下滚动,即使它没有聚焦。
我该怎么做?
答案是:
txtBox.selstart = len(txtBox.Value)
但是你会从哪里调用它呢?你总是说即使不专注但要做到这一点你总是需要一个 VBA 宏 运行:寻找新消息、添加新消息和滚动框。 Access 并非设计为以这种方式工作。
Access 不是制作聊天室前端的好应用程序。您可以将 Access 用于后端:将消息、用户和时间戳存储在表中。我建议你使用 VB.NET 来制作前端。 VB.NET 是多线程的,因此前端会让消息检查线程将新消息添加到文本框,而 UI 线程可以将新消息推送到数据库,新消息将被新消息接收消息事件并显示在文本框中。
我正在使用 Access 表单构建聊天室。
我在表单中设置了一个大型 TextBox
控件,以包含所有聊天消息。
我需要让它一直向下滚动,即使它没有聚焦。
我该怎么做?
答案是:
txtBox.selstart = len(txtBox.Value)
但是你会从哪里调用它呢?你总是说即使不专注但要做到这一点你总是需要一个 VBA 宏 运行:寻找新消息、添加新消息和滚动框。 Access 并非设计为以这种方式工作。
Access 不是制作聊天室前端的好应用程序。您可以将 Access 用于后端:将消息、用户和时间戳存储在表中。我建议你使用 VB.NET 来制作前端。 VB.NET 是多线程的,因此前端会让消息检查线程将新消息添加到文本框,而 UI 线程可以将新消息推送到数据库,新消息将被新消息接收消息事件并显示在文本框中。