你怎么能在每一行的开头放一个空格？

Question

简单的问题，我有一个可以多行的文本框（可能不依赖于用户输入），并被称为i：

dim i as string
i = textbox1.text

我需要在i的每一行的开头插入一个空格。有可能吗？

Answer 1

手动向第一行添加空格，并用新行替换所有新行，后跟空格：

i = " " & Replace(textbox1.text, Chr$(10), Chr$(10) & " ")

Answer 2

i = " " + replace( trim(textbox1.text), vbCrLf, " " + vbCrLf)

1. 以空格开头
2. 修剪textbox1以摆脱领先的空间（我认为你想要1）
3. 用空格+ CR LF
替换CR / LF