Foxtable(狐表)用户栏目专家坐堂 → 这段填充数据的代码错在何处?


  共有8462人关注过本帖平板打印复制链接

主题:这段填充数据的代码错在何处?

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


加好友 发短信
等级:三尾狐 帖子:645 积分:4583 威望:0 精华:0 注册:2012/11/12 14:27:00
这段填充数据的代码错在何处?  发帖心情 Post By:2012/12/17 12:40:00 [只看该作者]

从“临时报名表”向“报名表”填充《区》、《学校》,不重复的数据,就是说:如果某区某校已经报名,就不能够再次报名。下面代码报错,请指教!!!

 

 

Dim dt As DataTable = DataTables("临时报名表")
Dim qus As List(Of String)= dt.GetUniqueValues("", "区")
Dim xxs As List(Of String)= dt.GetUniqueValues("", "学校")

 

For Each qu As String In qus
    For Each xx As String In xxs
       
        If DataTables("报名表").Find("区 = '" & qu.Text & "' And 学校 = '" & xx.Text & "'") Is Nothing Then
            )
            Dim f As New Filler
            f.SourceTable = dt '指定数据来源
            f.DataTable = DataTables("报名表") '指定数据接收表
            f.Fill() '填充数据
        End If
Next
Next


 回到顶部