вопрос такой:

Private Sub OpenFile()
OFile.Filter = "Видео файлы|*.avi; *.mpg"
With OFile
If .ShowDialog(Me) = DialogResult.OK Then
If CBool(mobjVideo Is Nothing) = False Then
mobjVideo.Dispose()
mobjVideo = Nothing
End If
Try
mobjVideo = New AudioVideoPlayback.Video(.FileName)
Catch ex As Exception
MsgBox(ex.ToString)
End Try
End If
End With
End Sub

после этого:

Private Sub btnPlay_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnPlay.Click
Try
mobjVideo.SeekCurrentPosition(0, AudioVideoPlayback.SeekPositionFlags.AbsolutePosit ioning)
mobjVideo.Play()
Catch ex As Exception
MsgBox(ex.ToString)
End Try
End Sub

работает но в непонятном окне, а хотелось бы, чтоб в Form1

полагаю, что нужно както указать хэндл окна но как? [Ответ]