以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何能让系统每天打开显示的内容不一样  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=154610)

--  作者:yfy13338431925
--  发布时间:2020/9/20 12:27:00
--  如何能让系统每天打开显示的内容不一样
兰老师:下面的代码是第一次打开,显示表“日积月累”的第一条数据,第二次打开显示表“日积月累”的第二条数据,
如何把下面的代码,改成今天打开一次,显示的内容和第二天打开,显示的内容不一样。
也就是第一天打开系统,只显示第一条数据,第二天打开显示第二条数据

Dim t As Table = Tables("日积月累")
If t.Rows.Count = t.position+1 Then
    t.Position = 0
Else
    t.Position += 1
End If
[此贴子已经被作者于2020/9/20 12:28:08编辑过]

--  作者:有点蓝
--  发布时间:2020/9/20 20:55:00
--  
参考:http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=154017&skin=0