![]() |
BCX Console Demonstration Program S88.bas |
ShowDesktopIcons(
0
)
SLEEP
(
3000
)
' create a 3 second delay
ShowDesktopIcons(
1
)
SUB
ShowDesktopIcons(
bShow)
DIM
hProgManAS
HANDLE hProgMan=
FindWindow(
NULL,"Program Manager"
)
IF
hProgManTHEN
IF
bShowTHEN
ShowWindow(
hProgMan, SW_SHOW)
ELSE
ShowWindow(
hProgMan, SW_HIDE)
END
IF
END
IF
END
SUB