ltmmPlayCtrl.SaveStillDIB Example for Visual Basic

Private Sub Save (Filename As String) 
   play.SaveStillDIB "c:\\dib.bmp", -1
End Sub