以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  提取不重复的日期代码怎么写?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=127830)

--  作者:hc-mall
--  发布时间:2018/11/22 21:00:00
--  提取不重复的日期代码怎么写?
Dim kssj As Date
Dim kssjs As new List(of Date)
MessageBox.show(1)
kssjs = DataTables("成绩总表").GetValues("考试时间")
MessageBox.SHOW(2)
For Each kssj In kssjs
MessageBox.SHOW(kssj)
next
--------------
以上代码,执行到1可以,然后就出错了!错误信息如下

图片点击可在新窗口打开查看此主题相关图片如下:微信图片_20181122205927.png
图片点击可在新窗口打开查看



--  作者:有点甜
--  发布时间:2018/11/22 21:23:00
--  

Dim kssjs As new List(of Date)

 

改成

 

Dim kssjs As new List(of String)