' For complete examples and data files, please go to https://github.com/groupdocs-metadata/GroupDocs.Metadata-for-.NET
'string directoryPath = @"C:\\download files";
Dim files As String() = Directory.GetFiles(directoryPath)
For Each path__1 As String In files
Dim metadata As Global.GroupDocs.Metadata.Metadata = MetadataUtility.ExtractSpecificMetadata(path__1, MetadataType.Document)
' check if file has document format
If metadata Is Nothing Then
Continue For
End If
Console.WriteLine("File: {0}" & vbLf, Path.GetFileName(path__1))
Dim values As IEnumerable(Of KeyValuePair(Of [String], PropertyValue)) = DirectCast(metadata, IEnumerable(Of KeyValuePair(Of [String], PropertyValue)))
For Each keyValuePair As KeyValuePair(Of String, PropertyValue) In values
Console.WriteLine("Metadata: {0}, value: {1}", keyValuePair.Key, keyValuePair.Value)
Next
Console.WriteLine(vbLf & "**************************************************" & vbLf)
Next