这样的表不知道该如何生成??

wusihan

wusihan

有人做过这样的表吗??前面的日期是如何生成的??

tmtony

使用format及日期函数．这是标准的考勤报表．

wusihan

能给我讲解一下吗??用什么日期函数??

wusihan

没人给讲一下吗???

cocoz

format(date(),"dddd")得到的是英文的星期几要不你自己这样转换吧'取星期

Public Function GetDay()

    Dim strDay As String

   

    strDay = Weekday(Now())

   

    Select Case strDay

        Case 1

            GetDay = "星期日"

        Case 2

            GetDay = "星期一"

        Case 3

            GetDay = "星期二"

        Case 4

            GetDay = "星期三"

        Case 5

            GetDay = "星期四"

        Case 6

            GetDay = "星期五"

        Case 7

            GetDay = "星期六"

    End Select

End Function

wusihan

那怎么生成一个月的日期表呢??

hi-wzj

每天的考勤记录总得往电脑上存吧？记录总有日期和时间的字段吧。它不是什么自动生成的。

wusihan

旷工的时候不就没有记录了吗??考勤管理我没做过,不知道怎么做呢!

wusihan

可能我没说清楚,考勤记录是从考勤机下载的,不是手工输入的!