以文本方式查看主题 -  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp) --  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2) ----  [求助]sheet1(i,x).value.IndexOf(/) = True Then报错说应为表达式？  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=108073)

--  作者：zgjmost --  发布时间：2017/10/15 23:04:00 --  [求助]sheet1(i,x).value.IndexOf(/) = True Then报错说应为表达式？    If sheet1(i,x).value.IndexOf(/) = True Then                             Dim sts7() As String = sheet1(i,x).Text.Split("/")                             If sts7(0) IsNot null Then                                 ksds("分数") = sts7(0)                             Else                                 ksds("分数") = sts7(1)                             End If                         End If

--  作者：zgjmost --  发布时间：2017/10/15 23:06:00 --   判断sheet1(i,x)是否含有/，如果有用/打断，又判断sts7(0)是否为空，如果不为空，那么将sts7(0)写入ksds("分数")，如果为空将sts7(1)写入ksds("分数")

--  作者：有点甜 --  发布时间：2017/10/15 23:16:00 --   If sheet1(i,x).text.IndexOf("/") >= 0 Then     Dim sts7() As String = sheet1(i,x).Text.Split("/")     If sts7(0) <> nothing Then         ksds("分数") = sts7(0)     Else         ksds("分数") = sts7(1)     End If End If