文本框内容在粘贴时被覆盖，而不是附加到答案

【问题标题】：Textbox contents are overwritten, not appended to, on paste文本框内容在粘贴时被覆盖，而不是附加到
【发布时间】：2013-11-21 15:14:39
【问题描述】：

我有一个我继承的 VB.Net 应用程序，它的文本框有一个烦人的问题。

他们似乎没有以“标准”的方式行事。例如，在光标中按“Ctrl+A”并不会全选。鼠标滚轮不会滚动框。

但我想解决的主要问题是粘贴问题。当我在剪贴板上有文本并粘贴时，不会附加该框的内容。相反，它们被覆盖。

这不是我粘贴时意外选择了所有内容的情况。即使我非常小心地没有选择任何内容，内容也会被覆盖。

此应用程序中的所有文本框都会发生这种情况。到目前为止，我已经浏览了其中一个 TextBoxes 的属性，看看是否有任何相关的东西 - 没有。我搜索了代码以查看是否在某处设置了属性来解决此问题 - 没有。我用谷歌搜索并检查了这里，但找不到类似的问题。

我不经常在 VB 中工作，所以我可能会遗漏一些明显的东西 - 但我无法在任何地方找到答案。

为了看看会发生什么，我刚刚添加了一个新的文本框。尽管我将它放入并且没有修改它的任何属性或编写任何与之相关的代码，但它具有相同的行为。

能够将文本附加到这些文本框中的内容对使用该程序的人来说真的很有帮助。

感谢您花时间阅读我的问题，以及您可以提供的任何帮助！

我不知道哪些附加信息可能会有所帮助，所以如果您需要任何信息，请告诉我。

【问题讨论】：

发布至少一行代码会有帮助。
您确定使用的是标准文本框而不是自定义的派生吗？如果它是自定义的，它将出现在工具箱的最顶部，与其他普通控件分开。如果不是这种情况，WndProc() 是否会在任何地方被覆盖？ IMessageFilter() 怎么样？
Douglas - 显然，如果我知道这是从哪里开始的，我会发布一些相关的代码。但我不知道（因此我的问题在这里）所以你想从我这里得到什么 - 也许项目中的所有 37,806 行？
Idle_Mind - 根据其中一个 TextBoxes 的属性，它是 System.Windows.Forms.TextBox。我在工具箱中看不到任何看起来像是自定义控件的东西。并且搜索不会出现任何 IMessageFilter 或 WndProc 实例

【解决方案1】：

texbox1.text = "Myoldvalue" 

textbox1.text & = " Add this too" 

msgbox(textbox1.text) 


OutPut : 

Myoldvalue Add this too

【讨论】：

【解决方案2】：

TextBox 似乎以标准方式支持标准剪贴板键（在光标处插入，替换选择），但不支持 Ctrl-A。

RichTextBox 确实支持 Ctrl-A，所以这可能是一个快速修复。

否则使用 Textbox.KeyDown 事件来处理 Ctrl-A

    If e.Control And e.KeyCode = Keys.A Then
        TextBox1.SelectAll()
        e.Handled = True
    End If

【讨论】：