用vb写的抓屏代码非常实用,行13:不能加载控件screencapture1。