Foxtable(狐表)用户栏目专家坐堂 → [求助]contains报错


  共有5068人关注过本帖树形打印复制链接

主题:[求助]contains报错

帅哥哟,离线,有人找我吗?
chnfo
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2243 积分:18477 威望:0 精华:0 注册:2011/11/26 20:21:00
[求助]contains报错  发帖心情 Post By:2022/4/21 17:05:00 [只看该作者]

自己设置了一个DropDownForm类型的窗口
DropDownOpened事件中:

Dim r As Row = Tables("年级课程").Current
Dim t As Table = e.Form.Controls("Table1").Table
If r IsNot Nothing Then
    t.filter = "年级 = '" & r("年级") & "'"
Else
    t.Filter = "false"
End If

Dim y As Row = Tables("年级课程.学生").Current
If y IsNot Nothing AndAlso y.IsNull("选修课") = False Then
    Dim a As String() = y("选修课").split(",")
    For Each x As Row In t.Rows
        x.Checked = a.Contains(x("课程"))
    Next
End If


保存的时候提示
编译错误:“Contains”不是“System.Array”的成员。
错误代码:x.Checked = a.Contains(x("课程"))


 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110758 积分:563716 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/4/21 17:09:00 [只看该作者]

数组不能使用Contains。要使用IndexOf

x.Checked =Array.Indexof(a, x("课程")) > -1

 回到顶部