以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  求助：如何根据日期列自动生成星期？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=42344)
--  作者：zbsdkq012890
--  发布时间：2013/11/8 17:36:00
--  求助：如何根据日期列自动生成星期？
求助：如何根据日期列自动生成星期？
Dim dr As DataRow = e.DataRow
Select Case e.DataCol.Name
    Case "日期"
        If dr("日期") Is Nothing Then
            dr("年") = Nothing
            dr("月") = Nothing
            dr("日") = Nothing
            dr("周次") = Nothing
        Else
            dr("年") = dr("日期").Year
            dr("月") = dr("日期").Month
            dr("日") = dr("日期").day
            dr("周次") = dr("日期").？该填写什么？我写入了week但是不行。
        End If
End Select
--  作者：狐狸爸爸
--  发布时间：2013/11/8 17:37:00
--  

http://www.foxtable.com/help/topics/1337.htm

 
--  作者：zbsdkq012890
--  发布时间：2013/11/8 18:05:00
--  
如何让显示为汉字呢，显示的是英文星期？
--  作者：有点甜
--  发布时间：2013/11/8 19:13:00
--  
 如下帖子
--  作者：逛逛
--  发布时间：2013/11/8 21:10:00
--  

 

Dim t As Date = "2013-11-7"

方法 1 （.net的）


MessageBox.show(t.ToString("dddd",new System.Globalization.CultureInfo("zh-cn")))

 

方法 2 （狐表自身的）

MessageBox.show(Format(t, "dddd"))

[此贴子已经被作者于2013-11-9 7:58:59编辑过]
--  作者：有点甜
--  发布时间：2013/11/8 21:25:00
--  
顶一下……