以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  这个排名如何完成  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=121195)

--  作者:hbfnmxb
--  发布时间:2018/7/1 10:02:00
--  这个排名如何完成
年度院校提档线中的“最低分排名”列的排名来源于一分一档表的“全省排名”,如何把一分一档表中最低分的排名,按录取年度、文科理科(文理分科)对应填写到年度院校提档线表中“最低分排名”列中。谢谢老师。
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:排名问题.rar


--  作者:hbfnmxb
--  发布时间:2018/7/1 11:19:00
--  
别沉下去,自己顶一下


--  作者:hbfnmxb
--  发布时间:2018/7/1 16:40:00
--  
自己顶一下


--  作者:有点甜
--  发布时间:2018/7/1 17:03:00
--  
Dim dt1 As DataTable = DataTables("年度院校提档线")
Dim dt2 As DataTable = DataTables("一分一档")
For Each dr As DataRow In dt1.Select("")
    Dim filter As String = "文理分科 = \'" & dr("文理分科") & "\' and 录取年度 = \'" & dr("录取年度") & "\' and 最低分 = \'" & dr("最低分") & "\'"
    Dim fdr = dt2.find(filter)
    If fdr IsNot Nothing Then
        dr("最低分排名") = fdr("全省排名")
    End If
Next

--  作者:hbfnmxb
--  发布时间:2018/7/1 17:15:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:00.png
图片点击可在新窗口打开查看老师出现在这个错误,是什么原因?

--  作者:hbfnmxb
--  发布时间:2018/7/1 17:29:00
--  
在线等


--  作者:hbfnmxb
--  发布时间:2018/7/1 18:42:00
--  
老师在吗 ?这个错误是什么原因?
--  作者:有点甜
--  发布时间:2018/7/1 20:14:00
--  

在这里执行代码

 

http://www.foxtable.com/webhelp/scr/0213.htm

 


--  作者:hbfnmxb
--  发布时间:2018/7/1 20:34:00
--  
好的,谢谢。成功了!
--  作者:hbfnmxb
--  发布时间:2018/7/2 7:48:00
--  
老师可以用列公式来完成吗 ?或者用窗口按钮命令来完成?如果能实现公式怎么写呀?谢谢!