主题：[求助]如何通过按钮命令实现首行缩进

Dim txt As WinForm.TextBox = e.Form.Controls("TextBox1")
Dim ary() As String = txt.Text.Split(chr(13))
Dim str As String = ""
For Each s As String In ary
    str &= "    " & s.trim & vbcrlf
Next
txt.text = str

Dim txt As WinForm.TextBox = e.Form.Controls("TextBox2")
Dim ary() As String = txt.Text.Split(chr(13))
Dim str As String = ""
For Each s As String In ary
    If s <> chr(10) Then
        str &= "    " & s.trim & vbcrlf
        str &= vbcrlf & ""
    End If
Next
txt.text = str

 测试没有问题啊

 不知道你想表达什么，如果有问题，请上传具体的例子啊

 不可能啊，代码没问题啊。我测试没问题，要么你贴出对应的文章测试，或者上传对应的例子

 那你上传对应的不行的例子上来啊