呵呵,刚刚测试了一下,Foxtable的PictureBox貌似不能触发KeyUp等事件(狐爸看见请测试一下)
所以,用按钮冒充一下PictureBox吧,比较遗憾的一点是按钮上面没有滚动条
新建一个窗口, 上面放一个按钮,样式设置为Flat,背景颜色,鼠标经过按下时的颜色都设置为与同一个颜色,边框设置一个另外的颜色.然后在Keyup事件中加入以下代码:
If e.Control AndAlso e.KeyCode = Keys.V Then Dim Img As Image = ClipBoard.GetImage If Img IsNot Nothing Then e.Sender.Image = ImgEnd If