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