Question

VB高手告诉我，如果我想让一个字符串写入到TEXT控件有光标处，前提是光标在中间，不是开头

Answer 1

只需要执行sendkey方法就行了。
看下面的例子，窗口上放置一个textbox控件text1,然后拷贝下面的代码放进窗口里
执行后，先不要使用鼠标。在text1里输入字符，移动光标到字符中间，然后用鼠标点一下左键，

Private Sub s_SendKey(ByVal sA As String)
Dim sB As String
Do While sA <> ""
SendKeys "{" & Left(sA, 1) & "}"
sA = Mid(sA, 2)
Loop
End Sub

Private Sub Text1_Click()
s_SendKey ("123451")
End Sub

追问

我试试吧，我左击就会粘贴吗？

追答

是的，点击就会添加字符串123451，你可以调用s_sendkey过程，添加你想添加的字符

追问

换行怎么实现啊？

追答

换行
sendkeys "{ENTER}"