帮帮忙，帮我解决一个我想了2天的问题!!!!

Question

我把一个字符串赋值给i，要怎么做才能把这个字符串赋给我用focus指定位置？最好是用复制，粘贴的方法，用这种方法的话代码要怎么写？
  或者有其他更好的方法？

Answer 1

赋值：
Clipboard.SetText(i)取值：
i = Clipboard.GetText()

Answer 2

假设你想使text1在获得焦点时获得i的值。你完全可以这样。
Private Sub Text1_GotFocus()
    Text1.Text = i
End Sub

Answer 3

在鼠标选中的焦点处插入指定的文本
Private Sub Command1_Click()
    Dim i As Integer
    Dim strTemp As String
    Dim str1 As String
    Dim str2 As String
    
    i = Text1.SelStart
    str1 = Left(Text1.Text, i)
    str2 = Mid(Text1.Text, i + 1, Len(Text1.Text) - i)
        
    Text1.Text = str1 & "要插入的文本" & str2End Sub