VB6.0调用系统API函数。控制显示器的关闭