求vb代码一段

使屏幕固定   （就和截屏意一样，但是不要暗了，，，，鼠标动不动无所谓）

追问：是使屏幕固定啊

答案：'------------------------------------------------
又来了，专门为你排忧解难的。。。。。呵呵，模拟一个按键值嘛，简单，看代码
'-------------------------------------------------

Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Private Const IGagNn = 44 '键盘按键值PrtSc


Private Sub Command1_Click()
    Call keybd_event(IGagNn, 0, 0, 0) '复制全屏
End Sub
’--------------------------------------------------
最后你打开QQ的聊天对话框，粘贴一下，就是复制全屏的效果了。很简单的。
是屏幕固定我做不到，但是你可以尝试使用VB模拟按键printscreen
然后将剪切板中的图像加载到程序的控件中，同时窗口置顶，然今后想干嘛自己看着办
我只是提供一下思路，很多截屏的都是这么写的
把屏幕截图下来放到一个窗口上，然后让这个窗口全屏、置顶。代码已经有了

上一个：VB如何连接SQL SERVER？
下一个：VB怎么读写INI文件