操作方法
首先先新建一个标准工程，双击窗口进入代码窗口。
在右边点击选择时间，选择Activate事件。接下来就是写进代码了。
选择外接程序，选择API浏览器，进入。
首先你要先加载文件，如图，选择第三个文件，打开。确定。
在搜索栏中输入sendmessage，之后就能看到，在右边选择私有，然后双击待选框的sendmessage，下面的框会出现代码，选择复制，，，之后关闭。代码（ 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 ）也可自行复制。
把之前的代码复制到那个的上面，如图。再加上 （ Const WM_SYSCOMMAND = &H112 Const SC_MONITORPOWER = &HF170& ）两句，，在之后加上。如图
在下面的activate事件里面打入如下代码 （SendMessage Me.hwnd, WM_SYSCOMMAND, SC_MONITORPOWER, ByVal 2&）后面再加上end，意思是给系统发送了信息之后就结束自己的运行，从而实现再次打开的时候不会看到。总体图如下：
把exe生成到桌面，，然后把它拉到任务栏，以后只要你单击一下就可以实现一键锁屏了。如果你不放在任务栏，就需要双击它，想打开其他程序一样的。完成了。