以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何获得今天是今年的第几周?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=58601)

--  作者:雁过不留痕8
--  发布时间:2014/10/20 16:22:00
--  如何获得今天是今年的第几周?
date成员中只有year month day成员,没有week成员,如果获得今天是今年的多少周,求帮忙
--  作者:有点甜
--  发布时间:2014/10/20 16:25:00
--  

Dim d As Date = Date.Today

msgbox(DatePart("ww" , d))
msgbox(WeekDayName(weekday(d)))


--  作者:雁过不留痕8
--  发布时间:2014/10/21 11:40:00
--  
Dim d As Date = Date.Today
Dim t5 As WinForm.TextBox = e.Form.Controls("TextBox5")
t5.text=DatePart("ww",d))

甜老师,为什么这样不行?


--  作者:有点甜
--  发布时间:2014/10/21 11:44:00
--  
Dim d As Date = Date.Today
Dim t5 As WinForm.TextBox = e.Form.Controls("TextBox5")
t5.text=DatePart("ww",d)

--  作者:zsslly
--  发布时间:2016/4/19 0:01:00
--  
看看