请教一个窗口显示的问题

[xiaoaowanghu]

我想实现一个功能，就是除了当前运行的程序窗口外，使桌面变成黑屏。请问该如何实现？

[江海门户]

另外打开一个窗口form2
with form2
.backcolor=vbblack
.broderstyle=none
.height=screen.height
.width=screen.width
.move 0,0
end with

再用setwindowpos将你当前运行的窗体设置为总在最前就可以