Question

怎么在文本框中光标后面输入字符串（vb）

Answer 1

这个嘛，VB
的TEXTBOX有些功能你没有用上
.SelStart
开始选中的位置
.SelLength
选中长度
.SelText
选中文本
这三个都是可读写的
你试试
方法多种
1.得到当前位置,
选中左边到变量
,变量
&
新的字符串
,变量
&　右边的字符，输出到TEXTBOX
2.也是得到位置
选中某一个字符,可以是前也可以是后
然后把这个字符替换成
要加入的字符串,如果是选了左边的就是,选中字符
&
现要放入的字符,同理右边是现要放入的字符
&
选中的字符.
替换用
Replace
dim
v
as
string
v=replace(now,"2008","2009"
在这里,替换就是选中的文本
SelText
简单例子
从第2位选中3个字符
text1.selstart=2
text1.sellength=3
msgbox
text1.seltext
'替换
text1.seltext=now
'now是当前日期与时间的意思
临时写的,不知道行不行,
具体你试试,不懂的可以加我为好友,
号码
2,5,4,1,8,6,9,1,7

Answer 2

如果你是直接在text中输入，默认就是光标后面，如果通过其他控件添加，如下代码可以实现：
Dim
s
As
String
s
=
Mid(Text1.Text,
1,
Text1.SelStart)
s
=
s
&
"字符"
Text1.Text
=
s
&
Mid(Text1.Text,
Text1.SelStart
+
1,
Len(Text1.Text)
-
Text1.SelStart)