Click here to Skip to main content
16,006,845 members
Home / Discussions / Visual Basic
   

Visual Basic

 
AnswerRe: OpenFileDialog Pin
J4amieC15-Jan-06 21:46
J4amieC15-Jan-06 21:46 
QuestionHELLLP!!! Pin
GitaWist15-Jan-06 19:35
GitaWist15-Jan-06 19:35 
AnswerRe: HELLLP!!! Pin
minh trang15-Jan-06 19:58
minh trang15-Jan-06 19:58 
AnswerRe: HELLLP!!! Pin
Eric Dahlvang16-Jan-06 11:42
Eric Dahlvang16-Jan-06 11:42 
GeneralRe: HELLLP!!! Pin
GitaWist16-Jan-06 13:58
GitaWist16-Jan-06 13:58 
GeneralRe: HELLLP!!! Pin
Eric Dahlvang17-Jan-06 3:56
Eric Dahlvang17-Jan-06 3:56 
GeneralRe: HELLLP!!! Pin
GitaWist17-Jan-06 17:05
GitaWist17-Jan-06 17:05 
GeneralRe: HELLLP!!! Pin
Eric Dahlvang18-Jan-06 5:47
Eric Dahlvang18-Jan-06 5:47 
What version of windows are you on?

here is some vb code to do the same thing without the dll


<br />
Private Const TASKBAR = "Shell_TrayWnd"<br />
Private Const ID_TRAY = &H12F<br />
Private Const ID_CLOCK As Long = &H12F<br />
Private Const IDM_TABLEPROPERTIES = 2210<br />
Private Const SW_SHOW = 5<br />
Private Const SW_HIDE = 0<br />
<br />
Private Declare Function UpdateWindow Lib "user32" (ByVal hWnd&) As Long<br />
Private Declare Function ShowWindow Lib "user32" (ByVal hWnd&, ByVal nCmdShow&) As Long<br />
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long<br />
Private Declare Function GetDlgItem Lib "user32" (ByVal hDlg&, ByVal nIDDlgItem&) As Long<br />
'<br />
<br />
Private Sub Command1_Click()<br />
 Show_Hide True<br />
End Sub<br />
<br />
Private Sub Command2_Click()<br />
 Show_Hide False<br />
End Sub<br />
<br />
Private Sub Show_Hide(blnShow As Boolean)<br />
    Dim hWnd As Long<br />
    <br />
    hWnd = GetDlgItem(FindWindow(TASKBAR, ""), ID_TRAY)<br />
    hWnd = GetDlgItem(hWnd, ID_CLOCK)<br />
    If hWnd = 0 Then Exit Sub<br />
    <br />
    ShowWindow hWnd, IIf(blnShow, SW_SHOW, SW_HIDE)<br />
    UpdateWindow hWnd<br />
End Sub<br />

GeneralRe: HELLLP!!! Pin
GitaWist18-Jan-06 23:33
GitaWist18-Jan-06 23:33 
GeneralRe: HELLLP!!! Pin
Eric Dahlvang19-Jan-06 6:09
Eric Dahlvang19-Jan-06 6:09 
QuestionHow to solve error about cast from string Pin
angelagke15-Jan-06 19:29
angelagke15-Jan-06 19:29 
AnswerRe: How to solve error about cast from string Pin
Guffa15-Jan-06 21:15
Guffa15-Jan-06 21:15 
GeneralRe: How to solve error about cast from string Pin
angelagke15-Jan-06 23:36
angelagke15-Jan-06 23:36 
QuestionHow to delete files? Pin
cylix200015-Jan-06 17:44
cylix200015-Jan-06 17:44 
AnswerRe: How to delete files? Pin
Christian Graus15-Jan-06 18:02
protectorChristian Graus15-Jan-06 18:02 
GeneralRe: How to delete files? Pin
feezymac15-Jan-06 18:09
feezymac15-Jan-06 18:09 
General[Solved] Pin
cylix200015-Jan-06 20:37
cylix200015-Jan-06 20:37 
QuestionDistribute results of SQL Query to multiple clients..... Pin
feezymac15-Jan-06 17:42
feezymac15-Jan-06 17:42 
QuestionHow to use windows service with user interface? Pin
bskirkman15-Jan-06 13:39
bskirkman15-Jan-06 13:39 
QuestionRe: How to use windows service with user interface? Pin
bskirkman15-Jan-06 18:15
bskirkman15-Jan-06 18:15 
Question[Message Deleted] Pin
militiaware15-Jan-06 13:31
militiaware15-Jan-06 13:31 
AnswerRe: To Chris Maunder Pin
Christian Graus15-Jan-06 14:10
protectorChristian Graus15-Jan-06 14:10 
QuestionHow to use crystal report 9.2 files in VB6... Pin
Murtuza Husain Miyan Patel15-Jan-06 5:56
professionalMurtuza Husain Miyan Patel15-Jan-06 5:56 
QuestionOverloading Overriding in vb.net Pin
Amit R15-Jan-06 5:12
Amit R15-Jan-06 5:12 
AnswerRe: Overloading Overriding in vb.net Pin
Guffa15-Jan-06 7:50
Guffa15-Jan-06 7:50 

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Praise Praise    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.