Получить размер видеокадра не загружая сам файл

Public Class Form1
 
    Dim nmd As String
 
    Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click
        TextBox1.Text = ""
        If nmd = "" Then nmd = "*"
        With OpenFileDialog1
            .InitialDirectory = nmd
            .RestoreDirectory = True
            .FileName = ""
            .Filter = "Text Files|*.avi|Rich files (*.mp4*)|*.mp4|HTML files (*.mkv)|*.mkv|HTM files (*.htm)|*.htm"
            .FilterIndex = 1
            .CheckFileExists = True
            .Title = "Select Open Video Files"
        End With
        If OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
            Dim To_Display As String = String.Empty
            Dim MI As New MediaInfo
            Dim fName As String = OpenFileDialog1.FileName   '  "sample-5s.mp4"
            MI.Open(fName)
            MI.Option_("Inform", "FileSize=%FileSize%")
            To_Display &= MI.Get_(StreamKind.Visual, 0, "Width") & "x" & MI.Get_(StreamKind.Visual, 0, "Height")
            MI.Close()
            TextBox1.Text = To_Display
        End If
    End Sub
End Class