主题：时间节点事件 图

先要有api的信息

比如这样：

Dim hc As New HttpClient("http://ali-*********************&nu=" & e.form.controls("Textbox1").Text)
hc.Headers.Add("Authorization","APPCODE " & "0d9c***************2349421")
Dim jo As JObject = Jobject.Parse(hc.GetData)
If jo("showapi_res_body")("data") IsNot Nothing Then
    Dim str As String = ""
    For Each jt As JToken In jo("showapi_res_body")("data")
        str &= jt("time").ToString & " | " & jt("context").ToString & vbcrlf
    Next
    msgbox(str)
End If

此主题相关图片如下：qq截图20220324083550.jpg