1,451
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
Cooly 2003-02-13
- 打赏
- 举报
试试看
Cooly 2003-02-13
- 打赏
- 举报
function txtMoveLast()
richtextbox.setfocus
SendKeys "^{End}"
end function
function txtMoveLast()
textbox.setfocus
SendKeys "^{End}"
end function
richtextbox.setfocus
SendKeys "^{End}"
end function
function txtMoveLast()
textbox.setfocus
SendKeys "^{End}"
end function
kink 2003-02-13
- 打赏
- 举报
我是说有多行文本，移到末尾
13161795500 2003-02-13
- 打赏
- 举报
richtextbox.SelStart=Len(richtextbox.Text)
richtextbox.SelLength=1
richtextbox.SelLength=1
Cooly 2003-02-13
- 打赏
- 举报
SendKeys "^{End}"
Cooly 2003-02-13
- 打赏
- 举报
richtextbox.setfocus
sendkeys "{End}"
textbox.setfocus
sendkeys "{End}"
sendkeys "{End}"
textbox.setfocus
sendkeys "{End}"
