Create New Desktop using VB.NET

jmiguy · July 11th, 2012, 12:35 PM

I cannot find any info in the VB 2010 reference book regarding creating new Windows desktops.

Does anyone have any VB.NET code they can share? I would like to be able to create a new desktop and run a kiosk type application on it.... just like this VB6 sample kiosk app I found at the link below.

http://www.vbaccelerator.com/home/VB...top_Sample.asp

So far I've only been able to create the new desktop and switch to it, then back to the original but cannot run an app on the new desktop. I'm using Imports System.Runtime.InteropServices and the CreateDesktop, OpenDesktop, and SwitchDesktop API's.

Thanks!

Code:

    Private Declare Function OpenDesktop Lib "user32" Alias "OpenDesktopA" _
       (ByVal lpszDesktop As String, _
        ByVal dwFlags As IntPtr, _
        ByVal fInherit As Boolean, _
        ByVal dwDesiredAccess As IntPtr) As IntPtr

    Private Declare Function CreateDesktop Lib "user32" Alias "CreateDesktopA" _
        (ByVal lpszDesktop As String, _
        ByVal lpszDevice As String, _
        ByVal lpDevMode As IntPtr, _
        ByVal dwFlags As IntPtr, _
        ByVal dwDesiredAccess As IntPtr,
        ByVal lpSecAttrib As IntPtr) As IntPtr

    Private Declare Function SwitchDesktop Lib "user32" (ByVal hDesktop As IntPtr) As IntPtr

Rod Stephens · July 11th, 2012, 12:49 PM

Sorry but I for one haven't tried anything like this before. If anyone else has any ideas, please share!

You might get more response from the Microsoft discussion groups. They get more participation. You might try one of these:

jmiguy · July 11th, 2012, 01:00 PM

Rod, thanks for the info and for the quick response. I will try the forums you suggested. By the way, I also have your VB 24 hour trainer book... what a great book! I've learned so much in such a short time using your books... please keep up the great work!

Rod Stephens · July 11th, 2012, 01:14 PM

Thanks for the kind words. Post a review when you have a chance!

If you get a good solution to the desktop issue, let us know.