Try it and find out to the code add: VB Code: Private Declare Function DestroyWindow Lib "user32" Alias "DestroyWindow" (ByVal hwnd As Long) As Long 'then in the sub add If lngHandle > 0 Then DestroyWindow lngHandle End If Woka
Private Declare Function DestroyWindow Lib "user32" Alias "DestroyWindow" (ByVal hwnd As Long) As Long 'then in the sub add If lngHandle > 0 Then DestroyWindow lngHandle End If
My .NET Tutorials: • Silverlight Enabled WebPart in WSS My VB.NET Code Examples: • Create IIS Virtual Directory • Validate Login Against Active Directory • Automatically retrieve Identity field value from inserted DataRow using SQL Server and ADO.NET My ASP.NET Code Examples: • Login To Website (Forms Authentication) • Login To Website (Custom Authentication) My VB6 Code Projects: • Multithreading In VB6 • Custom Tooltips • Multi Language Support • Item Selector Control • Annimated Systray Icon • Simple Effective Graph Control • Download From Web • LiveUpdate, download application updates from the web automatically • Systray Notification Messages • Skin A Form • API Timer • Badger Messenger, an MSN clone that uses the MSN Network • Wokawidgets VB6 Component Suite
Forum Rules
Reply With Quote