下面的都可以成功使用，但是shift键我一直试不成功，怎么回事？（Shift键对应ASCII码值为： VK_SHIFT  ($10)，如果按照下面的代码，我就设VK_SHIFT=16，但是我怎么都用不出来）


Declare keybd_event In user32 Integer, Integer,Integer,Integer
Public VK_CTRL,VK_TAB,VK_ALT,VK_ESC,VK_WIN,VK_ENTER,VK_F10,VK_F12
Public VK_W,VK_V,VK_S,VK_Y,VK_N,VK_D
Public VK_0,VK_1,VK_2,VK_3,VK_4,VK_5,VK_6,VK_7,VK_8,VK_9
VK_CTRL=17                        && Ctrl键： VK_CTRL  ( 17)
VK_TAB=9                          &&  TAB键： VK_TAB   (  9)
VK_ALT=18                         &&  Alt键： VK_ALT   ( 18)
VK_ESC=27                         &&  ESC键： VK_ESC   ( 27)
VK_WIN=91                         && 窗口键： VK_WIN   ( 91)
VK_ENTER=13                       && 回车键： VK_ENTER ( 13)
VK_F10=121                        &&  F10键： VK_F10   (121)
VK_F12=123                        &&  F12键： VK_F12   (123)

VK_W=87                        &&   W 键：        ( 87)
VK_V=86                        &&   V 键：        ( 86)
VK_S=83                        &&   S 键：        ( 83)
VK_Y=89                        &&   Y 键：        ( 89)
VK_N=78                        &&   N 键：        ( 78)
VK_D=68                        &&   D 键：        ( 68)

VK_0=48                        &&   0 键：        ( 48)
VK_1=49                        &&   1 键：        ( 49)
VK_2=50                        &&   2 键：        ( 50)
VK_3=51                        &&   3 键：        ( 51)
VK_4=52                        &&   4 键：        ( 52)
VK_5=53                        &&   5 键：        ( 53)
VK_6=54                        &&   6 键：        ( 54)
VK_7=55                        &&   7 键：        ( 55)
VK_8=56                        &&   8 键：        ( 56)
VK_9=57                        &&   9 键：        ( 57)

比如，如果我要虚拟复制功能，就可以：

keybd_event(VK_CTRL, 0, 0, 0)       && CTRL + C
keybd_event(VK_C, 0, 0, 0)
keybd_event(VK_C, 0, 2, 0)
keybd_event(VK_CTRL, 0, 2, 0)

就是要按一下:

keybd_event(VK_SHIFT, 0, 0, 0)       && SHIFT按下
keybd_event(VK_SHIFT, 0, 2, 0)       && SHIFT弹起

还是不行哦

那ctrl键怎么可以呢？其实就是按住ctrl再按下c，放开c再放开ctrl，怎么换成shift就不行呢？ 就当作我要大写C吧，但是不是用大写锁定键

keybd_event(VK_CTRL, 0, 0, 0)       && CTRL + C
keybd_event(VK_C, 0, 0, 0)
keybd_event(VK_C, 0, 2, 0)
keybd_event(VK_CTRL, 0, 2, 0)

g搞不懂啊

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

实验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这个键的组合没效果。

谢谢！可以有效使用了！但是有个疑问：
=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)

感谢二锅头同志

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

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