Solved

run an application in fi\ull screen

Posted on 2003-10-25
9
167 Views
Last Modified: 2010-05-03
Dear Experts,

Is there a way to run an application of visual basic in full screen?

I mean that I do not want to show the start menu, so the user can not do anything on the work station, only the application, he can not use any short cut to open explorer or find or …

And if no with VB6 is it with VB.NET?

And if it is possible can I run this application when the windows 2000 is not Logged on.

Thanks in advance

0
Comment
Question by:LeDaouk
9 Comments
 
LVL 19

Expert Comment

by:Desp
ID: 9620395
just download this:
http://www.codearchive.com/vbasic/HideShowTaskBar.zip
and then set your form propert to full screen
0
 
LVL 19

Expert Comment

by:Desp
ID: 9620416
also change Form' s
BorderStyle to None
and
Windowstate to Maximised

you cannot run this application when the windows 2000 is not Logged on.. Only services can run at that time..
0
 
LVL 4

Author Comment

by:LeDaouk
ID: 9621866
Sorry, I could not access this link

I what I want is not just to maximize the form
I want to run it in full mode as the user can not do anything else working on this application

any comment ?
0
Industry Leaders: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

 
LVL 2

Expert Comment

by:Discofish
ID: 9622359
LeDaouk,

Do what Desp suggested.  Then, you can disable keys that you don't want the user to be able to press. What OS is this program designed for?
0
 
LVL 19

Expert Comment

by:Desp
ID: 9624803
0
 
LVL 1

Accepted Solution

by:
s_sarigul earned 250 total points
ID: 9625546
Option Explicit

Dim hWnd1 As Long
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
Const SWP_HIDEWINDOW = &H80
Const SWP_SHOWWINDOW = &H40

Private Sub Command1_Click()
'HIDING TASK BAR
     hWnd1 = FindWindow("Shell_traywnd", "")
     Call SetWindowPos(hWnd1, 0, 0, 0, 0, 0, SWP_HIDEWINDOW)
End Sub

Private Sub Command2_Click()
SHOWING TASKBAR
     Call SetWindowPos(hWnd1, 0, 0, 0, 0, 0, SWP_SHOWWINDOW)
End Sub

private sub form_load()
   'TRY THIS
    me.WindowState=2
   'OR
    me.width=screen.width
    me.height=screen.height
end Sub
0

Featured Post

Free Tool: Path Explorer

An intuitive utility to help find the CSS path to UI elements on a webpage. These paths are used frequently in a variety of front-end development and QA automation tasks.

One of a set of tools we're offering as a way of saying thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Title # Comments Views Activity
VBS file using code from 2nd file (txt or vbs) 4 47
VBA filters 2 70
Macro Excel - Multiple If conditions 2 87
how to know if my Checkbox is True in VB6.0? 9 65
The debugging module of the VB 6 IDE can be accessed by way of the Debug menu item. That menu item can normally be found in the IDE's main menu line as shown in this picture.   There is also a companion Debug Toolbar that looks like the followin…
Article by: Martin
Here are a few simple, working, games that you can use as-is or as the basis for your own games. Tic-Tac-Toe This is one of the simplest of all games.   The game allows for a choice of who goes first and keeps track of the number of wins for…
As developers, we are not limited to the functions provided by the VBA language. In addition, we can call the functions that are part of the Windows operating system. These functions are part of the Windows API (Application Programming Interface). U…
Get people started with the process of using Access VBA to control Outlook using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Microsoft Outlook. Using automation, an Access applic…

685 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question