1

こんにちは、私はアクセス データベースを作成していますが、特定のことを行う方法がわかりません。

MovieID と CustomerID の 2 つのテキスト ボックスを含むフォームがあります。また、MovieList、CustomerInfo、および HireHistory という 3 つの個別のテーブルもあります。必要なのは、指定されたボックスに MovieID と CustomerID を入力してボタン HireButton を押すと、その特定の MovieID の LastHireDate を Today() に編集し、その特定の CustomerID の LastHireDate を Today() に編集し、次に HireForm (最初の行に CustomerID があります)、次の形式で CustomerID の下に新しいレコードを追加します。MovieID " on " Today()

また、その MovieID のジャンルをチェックし、R16 または R18 の場合、顧客が今日 16 歳または 18 歳以上かどうかをチェックし、そうでない場合はエラー ボックスが表示されるようにする必要があります。16 歳か 18 歳かをチェックする方法は知っていますが、エラー ボックスは知りません。

私はそれがたくさんのテキストであることを知っているので、私がやりたいことをより簡単に理解できるように、頭の中にあるもの (コードがどうあるべきか) を書きます。

IF MovieID.Rating = 'R16' OR 'R18'
   THEN IF CustomerID.[Date(Year(DOB)+16,Month(DOB),(Day(DOB))] > Today()
           THEN DISPLAY Msgbox = "Sorry, too young"

           ELSE SET CustomerID.LastHireDate = Today() 
                SET MovieID.LastHireDate = Today()
                ADDRECORD in HireHistory for that CustomerID to (MovieID & " on " & Today())

   ELSE SET CustomerID.LastHireDate = Today() 
        SET MovieID.LastHireDate = Today()
        ADDRECORD in HireHistory for that CustomerID to (MovieID & " on " & Today())

それはそれをもう少しよく説明していますか？よろしくお願いします。:)

4

1 に答える 1

0

だからここで私はこれを行う方法。まず、これらのテーブルごとにレコードセットを作成する必要があります。

年齢的には、この機能を使用します。: http://www.fmsinc.com/MicrosoftAccess/modules/examples/AgeCalculation.asp

customerBirth = yourCode to get the date

If MovieID.Rating = 'R16' OR 'R18' then

    If AgeYears(customerBirth) < 16 then 
        msgbox("Sorry, too young")
    else
        MyCustomerRecordSet("LastHireDate") = now
        MyMovieRecordSet("LastHireDate") = now

        MyHireRecorset.AddNew
            MyHireRecorset("I don't know what your trying to do here")
        MyHireRecorset.Update

    end if

Else
        MyCustomerRecordSet("LastHireDate") = now
        MyMovieRecordSet("LastHireDate") = now
        MyHireRecorset.AddNew
        MyHireRecorset("I don't know what your trying to do here")

End if

ご不明な点がございましたら、お気軽にお尋ねください。

于 2013-04-11T13:53:37.497 に答える