Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim MediaEl As New Windows.Controls.MediaElement
        ElementHost1.Child = MediaEl
        MediaEl.Source = New Uri("http://vpiter.com/web-camera-isaak/")
    End Sub