Question

VB 如何把光标发送到已知文本框句柄内容的最后

已知外部程序的有一个文本框，VB编写的程序如何将光标发送到该句柄内容的最后。

Answer 1

Text1.SelStart = 0
设置光标的位置,和Text1.SelLength配合时选择文本

先获取对象文本长度,然后设置相应的光标位置

追问

不行啊，发送过去光标还是在第一位置

追答

Text1.SelStart = Len(Text1.Text)
后边的数值要改....

追问

你没理解错吧，我说的是外部程序，不是本程序，已知文本框的句柄为A，如何从VB编写的程序的文本框内将TEXT1的内容发送过去，并把光标置于内容的最后。

追答

sorry,我看错了...
调用windows的API
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Private Const EM_SETSEL = &HB1
调用:
Call SendMessage(hWnd, EM_SETSEL, ByVal nStart, ByVal nEnd)
wParam = (WPARAM)(INT) nStart;
lParam = (LPARAM)(INT) nEnd;

详细的可以查下msdn,参数:(句柄,标识,开始,结束),这个也可以用来选择文本,设置光标只要开始=结束就行了.试下.

参考:
百度: api 设置文本框光标位置
第一个结果"关于 SendMessage 使用的问题（在Text1中，转到指定行、设置光标位置、返回光标位置、获得光标所在行的位置）"
要善于搜索.

Answer 2

1 有int函数啊 这个函数的功能是取不大于这个数本身的整数 例如 对4.6取整 k=int(4.6) k的值就为4 对-3.6取值 k=int(-3.6) k的值就是-3
2 如果你想四舍五入取整的话 得用这个表达式 k=int(n+0.5) n代表任意一个你想要进行四舍五入的小数
3 cint 这个函数我忘了 你查一下吧
4 fix 你也可以看一下 记不太清了 我学这个的时候 用int 用的比较熟
0
| 评论