VBA和Microsoft Access

這是我第一次發佈問題。我是新手，正在使用Access 2016.我已經創建了幾封用作信函的報告，並且我正在研究IIf語句，以儘量減少我必須創建的報告數量。所以基本上我找不到錯誤，或者可能是正確的方式來編寫下面粘貼的下面的語句，我只發佈了我有困難的部分。VBA和Microsoft Access

="We, " & [Forms]![frmClaimDataEntry]![Client_First] & " " & [Forms]![frmClaimDataEntry]![Client_Last] & " & " & [Forms]![frmClaimDataEntry]![Client2_First] & " " & [Forms]![frmClaimDataEntry]![Client2_Last] & ", as owners of " & [Forms]![frmClaimDataEntry]![subfrmRisk]![RiskAddress] & ", " & [Forms]![frmClaimDataEntry]![subfrmRisk]![RiskCounty] &", having already agreed to pay Murphy Loss Assessors」 & IIf([Forms]![frmClaimDataEntry]![subfrmSettlement]![Fees_Discounted]>0,」a discounted fee upon settlement of our home insurance claim now confirm that we will discharge this payment of €"&[Forms]![frmClaimDataEntry]![subfrmSettlement]![Fees_Discounted], 「10% plus VAT upon settlement of our home insurance claim now confirm that we will discharge this payment of €"& [Forms]![frmClaimDataEntry]![subfrmSettlement]![Fees_LA]) & " upon receipt of settlement cheque now expected in the amount of €" & Format([Forms]![frmClaimDataEntry]![subfrmSettlement]![DueNow],"Standard") & "."

來源

2016-02-04 Elizabeth

您顯示的代碼不可讀。顯示整個模塊，並使其可讀，在第一段後面跳過2行，然後縮進代碼。它會以我們可以閱讀的方式出現。另外，你有什麼錯誤？ – PKatona

你現在可以讀嗎？此外，錯誤是「您輸入的表達式包含無效語法，或者您需要將文本數據放在引號中」 – Elizabeth

您只顯示整行的一部分。你得到的錯誤可能來自缺少的報價，或者可能缺少一個paren，或者其他任何數量的東西。沒有整條線，我無法確定錯誤發生在哪裏。 – PKatona

你必須有一些」「印刷報價 - 如果這些也都是在你的代碼，你必須用引號標準取代" "他們。

提示：使用文本編輯器來編輯SQL（或堆棧溢出問題），而不是Word。

和：

this payment of €"&[Forms]![frmClaimDataEntry]!

始終把一個空間之前和&後：

this payment of €" & [Forms]![frmClaimDataEntry]!

來源

2016-02-04 16:40:34 Andre

謝謝，我做了更正，我不再收到一條錯誤消息，但它沒有做我想做的事 – Elizabeth

@伊麗莎白：請**編輯**你的問題，添加它做的事情和它應該做的事情。 – Andre

也許你有一些空值，其中的Nz將正確的位置：

="We, " & [Forms]![frmClaimDataEntry]![Client_First] & " " & [Forms]![frmClaimDataEntry]![Client_Last] & " & " & [Forms]![frmClaimDataEntry]![Client2_First] & " " & [Forms]![frmClaimDataEntry]![Client2_Last] & ", as owners of " & [Forms]![frmClaimDataEntry]![subfrmRisk]![RiskAddress] & ", " & [Forms]![frmClaimDataEntry]![subfrmRisk]![RiskCounty] & ", having already agreed to pay Murphy Loss Assessors " & IIf(Nz([Forms]![frmClaimDataEntry]![subfrmSettlement]![Fees_Discounted],0)>0,"a discounted fee upon settlement of our home insurance claim now confirm that we will discharge this payment of €" &[Forms]![frmClaimDataEntry]![subfrmSettlement]![Fees_Discounted], "10% plus VAT upon settlement of our home insurance claim now confirm that we will discharge this payment of €" & [Forms]![frmClaimDataEntry]![subfrmSettlement]![Fees_LA]) & " upon receipt of settlement cheque now expected in the amount of €" & Format([Forms]![frmClaimDataEntry]![subfrmSettlement]![DueNow],"Standard") & "."

另外，您可能拼錯了控件名稱。

來源

2016-02-05 10:01:43 Gustav

VBA和Microsoft Access

回答

相關問題