Skip to content

Instantly share code, notes, and snippets.

Created May 11, 2015
What would you like to do?
Dim client = New VisionServiceClient("**key**")
Dim result = Await client.AnalyzeImageAsync("画像 URL") ' 画像の Stream も指定可能
If result.Categories IsNot Nothing AndAlso result.Categories.Any AndAlso
result.Categories.First.Name.StartsWith("food_") Then
' (画像のカテゴリーが食べ物の場合)
End If
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment