主题：[建议] 接入deepseek的API示例

'http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=191179
Net.ServicePointManager.SecurityProtocol = Net.SecurityProtocolType.Tls12 '选择一个协议Tls11，不行就Tls12、Tls13都试一遍

Dim hc As New HttpClient("https://api.deepseek.com/v1/chat/completions")
hc.ContentType = "application/json"
Dim API_KEY As String = "your_api_key_here"
hc.Headers.Add("Authorization", "Bearer " & API_KEY)
Dim jo As New JObject
Dim ja As New JArray
jo("model") = "deepseek-chat"
jo("messages") = ja
ja.Add(New JObject)
ja(0)("role") = "user"
ja(0)("content") = "某某prompt"
hc.Content = jo.ToString
Dim ret As String = hc.GetData()
MessageBox.Show(ret)