Attribute VB_Name = "APIs"Public Declare Function ShellExecute Lib "shell32.dll" _        Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, _        ByVal lpFile As String, ByVal lpParameters As String, _        ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long