VB.NET 如何进行调用HTTP外部接口

直接上干货 

Private Function POST(ByVal URL$, ByVal data$)
        Dim http
        On Error Resume Next
        http = CreateObject("WinHttp.WinHttpRequest.5.1")
        With http
            .Open("POST", URL, True)
            .setRequestHeader("Accept-Language", "zh-CN")
            .setRequestHeader("Cache-Control", "no-cache")
            .setRequestHeader("User-Agent", "Mozilla/4.0")
            .setRequestHeader("Connection", "Keep-Alive")
            .setRequestHeader("Content-Length", data.Length)
            .setRequestHeader("Content-Type", "application/x-www-form-urlencoded")
            .Send(data)
            .WaitForResponse()
            POST = .getallresponseheaders
            Dim request = http.responseText 
        End With
        http = Nothing
    End Function      

• 感谢你的阅读。如果你觉得这篇文章对你有帮助或者有启发，就请推荐一下吧～你的精神支持是博主强大的写作动力。欢迎转载！
• 博主的文章没有高度、深度和广度，只是凑字数。由于博主的水平不高（其实是个菜B），不足和错误之处在所难免，希望大家能够批评指出。
• 欢迎加入.NET 从入门到精通技术讨论群→523490820 期待你的加入
• 不舍得打乱，就永远学不会复原。被人嘲笑的梦想，才更有实现的价值。
• 我的博客： http://www.cnblogs.com/zhangxiaoyong/