Private sd As FileDialog
sd.FilePath=File.DirRootExternal
sd.TextColor=Colors.Black
sd.FileFilter=".myFileExtension"
Private sf As Object=sd.ShowAsync("Choose file","OK","Cancel","",Null,False)
wait for (sf) dialog_result (rt As Int)
If rt=DialogResponse.POSITIVE Then
end if