Visual Basic 2005 – 如何播放剪贴簿中的音效数据 - 立民讲堂

Visual Basic 2005 – 如何播放剪贴簿中的音效数据

我们可以将音效数据复制到剪贴簿吗？当然可以。我们可以播放剪贴簿中的音效数据吗？当然可以。问题是，如何作呢？

以下的程序代码示范如何播放先前已复制到剪贴簿中的音效数据：

Try
   ' 将剪贴簿中的数据以一个实作IDataObject接口的对象传回。
   Dim oDataObj As IDataObject = Clipboard.GetDataObject()

   If oDataObj IsNot Nothing Then
      ' 检测从剪贴簿所传回的数据是否存在Wav Audio的格式。
      If oDataObj.GetDataPresent(DataFormats.WaveAudio) Then

         ' 以Wave Audio格式取得音效数据并加以播放。
         My.Computer.Audio.Play( _
          CType(oDataObj.GetData( _
           DataFormats.WaveAudio, True), System.IO.Stream), _
           AudioPlayMode.Background)

      End If
   End If
   …
End Try