james 發問時間: 電腦與網際網路軟體 · 6 年前

Access 週日換算

設有一資料表,其中有欄位[年度][月份][日期][週日],今於[年度]欄輸入2014,[月份]輸入11,[日期]輸入29,則[週日]欄位自動帶入"六"。請問函數如何??

1 個解答

評分
  • Lv 5
    6 年前
    最佳解答

    首先設立一個表單

    d1為日期

    d2為文字,性質不用設即可

    在d1輸入下列程式碼

    Private Sub d1_AfterUpdate()

    Dim a As Integer

    a = Weekday(Me!d1, 2)

    Select Case a

    Case 1

    Me!d2 = "一"

    Case 2

    Me!d2 = "二"

    Case 3

    Me!d2 = "三"

    Case 4

    Me!d2 = "四"

    Case 5

    Me!d2 = "五"

    Case 6

    Me!d2 = "六"

    Case Else

    Me!d2 = "日"

    End Select

    End Sub

    你如要把三個欄位分開,還要判斷輸入數據對不對,比如2月才28天,有個29天

    你把它輸入為30,這就有問題了,這還是有程式可判斷,你先試一下上面的看看吧

    2014-11-30 22:34:01 補充:

    如果有問題,我再傳檔示範

    http://blog.xuite.net/awake.tw

    有空逛一下我的部落格,有很多範例

還有問題?馬上發問,尋求解答。