1、打开VB，新建标准EXE工程。
2、将BorderStyle设置为None，将WindowState设置为Maximized
3、打开代码窗口，加上这几行代码：
Private Sub Form_Load()
Form1.WindowState = 2 '开始运行的时候把窗口最大化
End Sub
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
End '点击鼠标退出屏保
End Sub
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
End '按任意键退出屏保
End Sub
4、点击运行，你会发现程序全屏显示白屏；点击鼠标，会退出程序。
1、这时，你可以在代码界面编程，你可以加一些图形(Shape)和动画，你也可以弄图片。
我的例子和效果：
2、生成EXE，然后把exe的后缀名改成.scr
然后右键你的屏保程序，点击安装。
