Vb.net 使用API post json头登录

这是密码

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

    Dim req As System.Net.HttpWebRequest = System.Net.HttpWebRequest.Create("https://authserver.mojang.com/authenticate")
    req.Method = "POST"
    req.UserAgent = "Mozilla/5.0 (Windows NT 6.1; Win64; x64; rv:47.0) Gecko/20100101 Firefox/47.0"
    req.Headers.Add("username:" + TextUser.Text)
    req.Headers.Add("password:" + TextPass.Text)
    req.ContentType = "application/json"

    Dim response1 As System.Net.HttpWebResponse = req.GetResponse
    Dim stream As System.IO.Stream = response1.GetResponseStream
    Dim reader As New System.IO.StreamReader(stream)
    Dim contents As String = reader.ReadToEnd
    reader.Close()
    MsgBox(contents)
End Sub

我想在标题中使用用户名：（user）、密码：（pass），就像在文档中一样

和msgbox查看它是否工作，但每次我都收到400的响应（请求不正确）

---

请帮助我

HttpWebRequest.Headers.Add（）

只需添加常规HTTP头即可。文档明确指出，您应该随请求发送一个JSON字符串，但您没有。您必须构造一个包含数据的JSON字符串，并将其发送到请求体中。您有任何示例代码吗？为了帮助我bcuz，我很抱歉，堆栈溢出不是一种编码/教程服务。在这里询问之前，你应该做些什么。您已经知道如何读取响应流；在发送数据的请求中有相应的流。至于JSON：这实际上只是将几个字符串连接在一起。与当前的标题非常相似，只是时间更长。