Dim hVideoDevice As VideoDevice hVideoDevice = New VideoDevice ( Device As String [ , Mode As Integer ] )