主题：JAVA代码转VB代码

        static void Main(string[] args)

        {

            Dictionary<string, string> dict = new Dictionary<string, string>();

            string result = Send("SCM_IHS_TransportOrderService", "1.0.0", dict);

            Console.WriteLine("\n\n处理结果:\n{0}", result);

            Console.ReadKey();

        }

        /// <param name="apiName">服务名称</param>

        /// <param name="apiVersion">服务版本号</param>

        /// <param name="dict">传送数据键值对</param>

        static String Send(String apiName, String apiVersion, Dictionary<String, String> dict)

        {

            HttpWebRequest request = WebRequest.Create(URL) as HttpWebRequest;

            request.Method = "POST";

            request.ContentType = "application/json";

            // 设置请求参数

      string timestamp = (DateTime.Now.ToUniversalTime().Ticks - 621355968000000000) + "";

            dict.Add("_api_access_key", AK);

            dict.Add("_api_name", apiName);

            dict.Add("_api_version", apiVersion);

            dict.Add("_api_timestamp", timestamp);

public static void main(String[] args) {

        //构造ContentBody对象

        Map<String,Object> params = new HashMap<String, Object>();

        params.put("orderNo", "");

        ContentBody cb = new ContentBody(String.valueOf(new JSONObject(params)));

        //ContentBody传递，要求使用post方式进行调用

        //如果需要传递请求参数 可以拼接到请求URL中，或者设置paramsMap参数由SDK内部进行拼接

        HttpParameters.Builder builder = HttpParameters.newBuilder();

        builder.requestURL(url) // 设置请求的URL,可以拼接URL请求参数

                .api(apiName) // 设置服务名

                .version(version) // 设置版本号

                .method("post") // 设置调用方式, 必须为 post

                .accessKey(ak).secretKey(sk); // 设置accessKey 和 设置secretKey

        builder.contentBody(cb);