Using Windows XP with all updates applied and Visual Studio 2.0.

I am trying to develop some common error-handling of Windows API
invocations that fail and am using MessageBeep as the API to test with.

Given 1) the following Imports statement:

  Imports System.Runtime.InteropServices

2) the following declaration of MessageBeep:

  <DllImport("user32.dll", _
             EntryPoint:="MessageBeep", _
             SetLastError:=True, _
             CallingConvention:=CallingConvention.StdCall)> _
  Public Function MessageBeep(ByVal wType As Int32) As Boolean
  End Function

3) the following code to test passing an invalid value to MessageBeep

        Dim MBResult As Boolean
        Dim MBErrorCode As Integer

        MBResult = MessageBeep(-2)

        If MBResult Then
           MBErrorCode = Marshal.GetLastWin32Error
        End If

When I set a break-point after the assignment to MBErrorCode, I see
that it has a value of 127 -- "The specified procedure could not be
found". I was expecting a value of 87 -- "The parameter is incorrect".

Note that when I pass MessageBeep a value of 0 -- a presumably valid
value -- I get the same result.

--
// Lee Silver
// Information Concepts Inc.
//
// Converting data into information since 1981