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

 我来答
爱栀竹的人
2013-10-17 · TA获得超过1352个赞
知道大有可为答主
回答量:1743
采纳率:0%
帮助的人:976万
展开全部
只需要执行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过程,添加你想添加的字符
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式