0

我正在使用带有 Visual Basic 的 Visual Studio Express 2010。我试图在 30 天内充分学习和测试该产品，以查看常规 Visual Studio 2010（尤其是 Vbasic）是否能满足我的需求。这是问题/问题。我在表单上有一种输出类型的文本框，textbox1，它是以编程方式写入的。我已将其设置为多行、启用、只读和滚动条：垂直。我需要修复它，以便每次覆盖或附加文本时滚动拇指自动移动到底部。（我正在覆盖，但实际上添加到文本框（TextBox1.Text & Chr(13) & Chr(10) & newtextdata）。TextBox1 的值属性包括最小值为零和最大值为 100。更改这些不会'似乎没有帮助。文本框上没有自动滚动属性。我什至尝试将文本框设置为滚动条：无，然后从工具栏中添加一个 VScrollBar，但我无法将它连接到 TextBox1，而且我也不知道如何以编程方式将其滚动到底部。请给我必要的代码好吗？另外，如果需要系统导入，请您也提一下吗？这对我来说是一个成败的功能。如果这个产品和 vbasic 不会这样做，那么我必须看看别的东西。我已经在这里搜索了三本书以及在线，但无法弄清楚。非常感谢！请给我必要的代码好吗？另外，如果需要系统导入，请您也提一下吗？这对我来说是一个成败的功能。如果这个产品和 vbasic 不会这样做，那么我必须看看别的东西。我已经在这里搜索了三本书以及在线，但无法弄清楚。非常感谢！请给我必要的代码好吗？另外，如果需要系统导入，请您也提一下吗？这对我来说是一个成败的功能。如果这个产品和 vbasic 不会这样做，那么我必须看看别的东西。我已经在这里搜索了三本书以及在线，但无法弄清楚。非常感谢！

4

2 回答 2

1

感谢这里的建议（来自 David），我想出了一些可行的方法，并且因为它与 David 的建议不完全相同，所以我想与您分享具体细节……</p>

首先，我添加了一个公共子…</p>

PublicClassForm1 PublicSub ScrollToCaret()

结束子

然后在用户输入的接受按钮例程中，我做了以下......

        OutputTextBox.ScrollToCaret()
        OutputTextBox.SelectedText = strTextBeingAdded + _
            Microsoft.VisualBasic.vbCrLf

我遇到了一个问题，尽管在设计页面上设置了 OutputTextBox.Text 并且不得不将其删除并将其放入 Form 加载事件中，以便它也可以滚动到插入符号那里......

PrivateSub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) HandlesMyBase.Load OutputTextBox.ScrollToCaret() OutputTextBox.SelectedText = "Initial Description" & strWrap + _ Microsoft.VisualBasic.vbCrLf

感谢您的评论导致我这样做！

于 2012-12-13T17:10:31.227 回答
0

使用SelectionStart属性：

TextBox.SelectionStart = Len(TextBox.Text)
于 2012-12-12T18:34:19.490 回答