I am using the following code to get the approximate location.
In LocationChanged sub, the latitude and longitude are fine, but the altitude is 0, which is not right.
I asked for PERMISSION_ACCESS_FINE_LOCATION.
But in the Fused Location Provider code, I asked for PRIORITY_BALANCED_POWER_ACCURACY. Is this the reason?
myFLoc.Connect
Sub myFLoc_ConnectionSuccess
Dim LocationRequest1 As LocationRequest
LocationRequest1.Initialize
LocationRequest1.SetInterval(1000)
LocationRequest1.SetPriority(LocationRequest1.Priority.PRIORITY_BALANCED_POWER_ACCURACY)
LocationRequest1.SetSmallestDisplacement(0)
myFLoc.RequestLocationUpdates(LocationRequest1)
End Sub