关于光标的位置。

[itme99]

1.一个文本框中有一个字符串，光标在这个字符串中的任一位置。现在想通过代码在这个紧贴光标的后面再加进字符串。
如字符串为："aaabb",光标现在在"aaa"的后面，想在它中间加上"HHHH"，变成串，"aaaHHHHbb".
2.如何判断光标在一个字符串中的位置。
3.如何在代码中移动光标，使之到一个串中的任一位置。

[minajo21]

With Text1
.Text = "aaabb"
.SelStart = 3
.SelText = "HHHH"
End With

[minajo21]

With Text1
.Text = "aaabb"
.SelStart = InStr(.Text, "b") - 1
.SelText = "HHHH"
End With

[qingming81]

2.如何判断光标在一个字符串中的位置。
dim position as long
position=text1.selstart
3.如何在代码中移动光标，使之到一个串中的任一位置。
dim X as long
X =input("请输入你需要指定的光标位置!")
if X<>"" and isnumeric(X) then
text1.selstart = X
end if