VB.NET中如何从无SelectedText属性的活动控件获取选中文本？

好的，针对你的问题，这里有几个可行的方案，取决于你的EnhancedTextBox控件的具体实现：

方案一：尝试强制转换为TextBoxBase类型 #

很多自定义文本框控件都是基于.NET的TextBoxBase类扩展而来的，这类控件其实内置了SelectedText属性——只是你可能没通过正确的类型访问它。你可以试试将活动控件强制转换为TextBoxBase，然后直接获取选中文本：

// 获取当前活动控件
var activeControl = this.ActiveControl;

// 尝试转换为TextBoxBase（多数文本框控件的基类）
if (activeControl is TextBoxBase textBoxControl)
{
    // 直接获取选中的文本
    string selectedText = textBoxControl.SelectedText;
    
    // 如果有选中内容，复制到剪贴板
    if (!string.IsNullOrEmpty(selectedText))
    {
        Clipboard.SetDataObject(selectedText);
    }
}

方案二：利用SelectionStart和SelectionLength截取文本 #

如果你的EnhancedTextBox确实没有暴露SelectedText属性，那它大概率会提供SelectionStart（选中文本的起始索引）和SelectionLength（选中文本的长度）这两个属性。你可以用这两个值从完整的文本中截取选中的部分：

var activeControl = this.ActiveControl;

// 检查控件是否具备这两个属性
var selectionStartProp = activeControl.GetType().GetProperty("SelectionStart");
var selectionLengthProp = activeControl.GetType().GetProperty("SelectionLength");

if (selectionStartProp != null && selectionLengthProp != null)
{
    int startIndex = (int)selectionStartProp.GetValue(activeControl);
    int selectLength = (int)selectionLengthProp.GetValue(activeControl);
    
    // 确保截取范围有效
    if (selectLength > 0 && startIndex + selectLength <= activeControl.Text.Length)
    {
        string selectedText = activeControl.Text.Substring(startIndex, selectLength);
        Clipboard.SetDataObject(selectedText);
    }
}

如果这两个属性是控件的内部成员（外部无法直接访问），上面的反射写法也能帮你获取到它们的值。

额外提示 #

• 记得添加空值和范围判断，避免出现索引越界或者复制空文本的情况。
• 如果以上方法都不行，你可以查看EnhancedTextBox的文档或者源代码，看看它有没有其他用于获取选中文本的方法或属性——比如有些自定义控件会把选中文本存放在SelectedContent之类的属性里。

内容的提问来源于stack exchange，提问作者ianneAB