title: Playing Windows system sounds from VB6
body: <p>I want to play Windows system sounds like those for <em>Error</em> and <em>Information</em> dialog boxes. </p>
  
  <p>I tried <a href="http://msdn.microsoft.com/en-us/library/windows/desktop/ms679277%28v=vs.85%29.aspx" rel="nofollow">Beep</a> API:</p>
  
  <pre><code>Public Declare Function Beep Lib "kernel32" _
      (ByVal dwFreq As Long, ByVal dwDuration As Long) As Long
  Beep 200, 2000
  </code></pre>
  
  <p>The problem is that it works in XP/2000 only, but not in Win 7. Also I want to be able to play <em>different</em> sounds.</p>