顶啊，搞不定，实验现状：

实验1：组合键使用，达不到想要的效果，这个的目的是：选择本行光标位置到句末的文本内容。实际得到的结果只是光标移到了最后。
keybd_event(VK_SHIFT,0, 0, 0)       && SHIFT + END
keybd_event(VK_END, 0, 0, 0)
keybd_event(VK_END, 0, 2, 0)
keybd_event(VK_SHIFT, 0, 2, 0)

实验2：
keybd_event(VK_SHIFT,0, 0, 0)       && SHIFT 按下
这时如果人工按一次end键，可以达到选择本行光标位置到句末的文本内容的目的，说明keybd_event(VK_SHIFT,0, 0, 0)   还是起作用的。

目前疑问：虚拟组合键是无效的，但是虚拟单个按键是有效的，其它键的虚拟组合也是有效的，只是shift这个键的组合没效果。

Keyboard "{Shift+End}"  && SHIFT + END

用 SPY++ 测试，第二个参数不是 0
用下面的代码试试看
管用吗？？？

Declare keybd_event In user32 Integer, Integer,Integer,Integer

KEYEVENTF_EXTENDEDKEY = 0x01
KEYEVENTF_KEYUP = 0x02
VK_SHIFT = 0x10
VK_END = 0x23

=keybd_event(VK_SHIFT, 0x2A ,0, 0)
=keybd_event(VK_END, 0x4F, KEYEVENTF_EXTENDEDKEY, 0)
=keybd_event(VK_END, 0x4F, KEYEVENTF_EXTENDEDKEY, 0)
=keybd_event(VK_SHIFT, 0x2A, KEYEVENTF_KEYUP, 0)

谢谢！可以有效使用了！但是有个疑问：
=keybd_event(VK_END, 0x4F, KEYEVENTF_EXTENDEDKEY, 0)
=keybd_event(VK_END, 0x4F, KEYEVENTF_EXTENDEDKEY, 0)

为何要两句一样的代码？我试了一句就可以实现了，是否会有其它问题？

现在可用代码：

keybd_event(VK_SHIFT, 42, 0, 0)
keybd_event(VK_END, 79, 1, 0)
keybd_event(VK_END, 79, 2, 0)
keybd_event(VK_SHIFT, 42, 2, 0)

感谢二锅头同志

是我粗心，复制后调试时没有及时的删除，对于你的善意批评，我虚心接受，谢谢，，，

呵呵，哪里敢提批评，真的是以为特殊需要，我有疑问我就问，有些东西不是理解得很深入，我一般都是照样画葫芦举一反三，能用就好。

真的非常感谢你！又学到一点！

为什么一定要使用 keybd_event API ？
如果要模拟 “SHIFT+END”按键
必须至少有6条语句
还要查该按键的扫描码
为什么不用 Keyboard "{Shift+End}"  && SHIFT + END
不是更简单吗？

我以前真不知道VFP还有这个命令，我以后会尝试用的，谢谢你！