ByVal lineNumber As Integer)textBox.Focus()Dim beginIndex = textBox.GetFirstCharIndexFromLine(lineNumber)If beginIndex = -1 ThenReturnEnd IfDim linelength = textBox.Lines(lineNumber).LengthtextBox.Select(beginIndex，使用方式如下，建立一个 TextBox 的扩充方法 SelectionLine。

TextBox 设定第几行选取， (v=vs.110).aspx Select：选取控件内的文字，参考以下程序代码： Imports System.Runtime.CompilerServicesModule TextBoxExtensions_Public Sub SelectionLine(ByVal textBox As TextBox， Property Lines：取得或设定文字方块控件中的文字行数， GetFirstCharIndexFromLine：撷取指定行的第一个字符之索引， linelength)End SubEnd Module 如果要让 TextBox 的第三行反白， 运用扩充方法，使用以下 TextBox 的 Function 和 Property： Function Focus：设定控件的输入焦点，请注意行从 0 开始 TextBox1.SelectionLine(3) 执行结果 ，。