#if java
import java.io.IOException;
import java.util.ArrayList;
import java.util.List;
import java.util.Locale;
import android.location.Address;
import android.location.Geocoder;

public List getinfo(double MyLat,double MyLong) throws IOException{
      Geocoder geocoder = new Geocoder(this, Locale.getDefault());
       List<Address> addresses = geocoder.getFromLocation(MyLat, MyLong, 1);
       String cityName = addresses.get(0).getAddressLine(0);
       String stateName = addresses.get(0).getAddressLine(1);
       String countryName = addresses.get(0).getAddressLine(2);
       List<String> l = new ArrayList<String>();
       l.add(cityName);
       l.add(stateName);
       l.add(countryName);
       return l;
    }
#End If

Dim j As JavaObject
  j.InitializeContext
  Dim list1 As List=j.RunMethod("getinfo",Array(37.2213871,49.2916187))
  Log(list1.Get(0)) 'شهر
  Log(list1.Get(1)) 'استان
  Log(list1.Get(2)) 'کشور