Foxtable(狐表)用户栏目专家坐堂 → 代码报错,不知原因?请专家指导


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

主题:代码报错,不知原因?请专家指导

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


加好友 发短信
等级:一尾狐 帖子:498 积分:4611 威望:0 精华:0 注册:2013/4/25 8:02:00
代码报错,不知原因?请专家指导  发帖心情 Post By:2015/6/14 19:25:00 [只看该作者]


For Each rs As Row In Tables("选课数据表").rows
        Dim dr11 As DataRow = DataTables("湖北省开课总表").find("试卷号 = '" & rs("试卷号") & "'")
        If dr11 IsNot Nothing And dr11("日期")  = "*前" Then
            rs("论文类安排") = "论文类安排"
        End If
    Next

 


 

 


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20150614192716.png
图片点击可在新窗口打开查看

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/6/14 19:31:00 [只看该作者]

    For Each rs As Row In Tables("选课数据表").rows
        Dim dr11 As DataRow = DataTables("湖北省开课总表").find("试卷号 = '" & rs("试卷号") & "'")
        If dr11 IsNot Nothing AndAlso dr11("日期")  = "*前" Then
            rs("论文类安排") = "论文类安排"
        End If
    Next

 


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


加好友 发短信
等级:一尾狐 帖子:498 积分:4611 威望:0 精华:0 注册:2013/4/25 8:02:00
  发帖心情 Post By:2015/6/14 19:53:00 [只看该作者]

错是没报,但没执行

 

我是想在国开课程总表中,如果时间类似安排成**前字样,就是要写论文了,我想在选课数据表和考试数据表上标注一下,在列“论文类安排”中写入论文类安排

 

实例如下:

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:国家开放大学考务系统.rar


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/6/14 20:03:00 [只看该作者]

For Each rs As Row In Tables("选课数据表").rows
    Dim dr11 As DataRow = DataTables("湖北省开课总表").find("试卷号 = '" & rs("试卷号") & "'")
    If dr11 IsNot Nothing AndAlso dr11("日期")  Like "*前" Then
        rs("论文类安排") = "论文类安排"
    End If
Next

 回到顶部