以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  自动根据时间,来判断相应的结果,这个如何做?  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=144531)

--  作者:liuyh121
--  发布时间:2019/12/23 17:26:00
--  自动根据时间,来判断相应的结果,这个如何做?
自动根据入学时间,来判断现在的年级,比如:现在时间—入学时间<365,显示为初一年级,这个应该用什么函数?如何实现?
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20191223172255.png
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2019/12/23 17:37:00
--  
datacolchanged事件

If e.DataCol.name = "入学年份"
    If e.DataRow.Isnull("入学年份") Then
        e.DataRow("年级") = Nothing
    Else
        Dim y,m,d As Integer
        Dim dt1 As Date = e.DataRow("入学年份")
        DateYMD(dt1,Date.Today,y,m,d)
        e.DataRow("年级") = "" & (y+1) & "年级"
    End If
End If

--  作者:liuyh121
--  发布时间:2019/12/23 17:49:00
--  
我是小白,不知道这个代码放在哪图片点击可在新窗口打开查看
--  作者:WELOVEFOX
--  发布时间:2019/12/23 18:05:00
--  
如果个别调拨鬼有留级的图片点击可在新窗口打开查看
--  作者:有点蓝
--  发布时间:2019/12/23 20:22:00
--  
表事件:http://www.foxtable.com/webhelp/topics/1445.htm

留级的想怎么处理?