[AccessD] Clear Debug Window Programmatically

Arthur,

1. Write a autokey marco to do:

Ctrl/G
Crtl/A
{del}

2. Write a autokey macro to do:
Ctrl/G
Ctrl+Home
Shift+Ctrl+End
{del}

3. Call a procedure:

Sub ClearImmediateWindow()
  'Make sure that the Immediate window is visible
  Application.VBE.Windows("Immediate").Visible = True
  
  'Activate the Immediate window
  Application.VBE.Windows("Immediate").SetFocus
  
  'Send keystrokes to clear the Immediate window
  SendKeys "^{HOME}^+{END}{DEL}"
End Sub

Jim.


-----Original Message-----
From: accessd-bounces at databaseadvisors.com
[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Arthur Fuller
Sent: Monday, August 08, 2005 6:17 PM
To: 'Access Developers discussion and problem solving'
Subject: [AccessD] Clear Debug Window Programmatically


Is there a way to clear the debug window programmatically?

TIA,
Arthur

-- 
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com