以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  总是提示不能为空s  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=192955)

--  作者：ycs5801 --  发布时间：2024/8/5 12:07:00 --  总是提示不能为空s Dim e As RequestEventArgs = args(0) Dim wb As New weui \'Dim sb As New StringBuilder wb.AppendHTML("<link rel=\'stylesheet\' href=\'./weui/exweui.css\'/>", True)  wb.AppendHTML("<script src=\'./weui/exweui.js\' ></script>", True) Dim jo As JObject = JObject.Parse(e.PlainText) \'解析JSON数据 Dim openid As String = jo("openid").ToString() Dim kcmc As String = jo("kcmc").ToString() Dim kclb As String = jo("kclb").ToString() Dim skls As String = jo("skls").ToString() Dim sksd As String = jo("sksd").ToString() Dim skrq As String = jo("skrq").ToString() 。。。 。。。 某个函数的开头是这样，总是会偶尔跳出错误，提示不能为空，请问应该怎样加一个判断语句，避免传值过来为空？

--  作者：有点蓝 --  发布时间：2024/8/5 13:47:00 --   if e.PlainText > ""     Dim jo As JObject = JObject.Parse(e.PlainText) \'解析JSON数据