重新查詢使用字符串

我無法使用SQL字符串來重新查詢我的子窗體，在此範圍內的變量是我的代碼：重新查詢使用字符串

Dim Day As Integer 
Day = txt_Days.Value   
SQL = "SELECT [qry_Records].[Tool_ID], [qry_Records].[Cal_Date]," _ 
    & "[qry_Records].[Cal_By], [qry_Records].[As_Received], " _ 
    & "[qry_Records].[Result], [qry_Records].[Next_Due], " _ 
    & "[qry_Records].[Due] FROM [qry_Records]" _ 
    & " WHERE [qry_Records].[Due] < Day;" 

subform_View_Search_Records.Form.RecordSource = SQL

我試圖用不同的變化方案中的結尾引用了日變量SQL字符串如下，但沒有任何工作：

& " WHERE [qry_Records].[Due] < ""Day"";" 
& " WHERE [qry_Records].[Due] < '"Day"';"

您的幫助非常感謝！

來源

2016-03-02 Jason Chan

你只需要添加一對夫婦＆符號的

& " WHERE [qry_Records].[Due] < " & Day & ";"

來源

2016-03-02 14:56:03

謝謝你的作品！ –

隨時。你可以標記答案爲接受請 –

我想試試這個：

SQL = "SELECT [Tool_ID], [Cal_Date]," _ 
    & "[Cal_By], [As_Received], " _ 
    & "[Result], [Next_Due], " _ 
    & "[Due] FROM [qry_Records]" _ 
    & " WHERE [Due] < " & format$(txtDays, "\#dd\/mm\/yyyy\#") 

subform_View_Search_Records.Form.RecordSource = SQL

最後的「;」沒用。

來源

2016-03-02 14:57:22

這也可以！但我認爲理查德的答案就是我要找的那個。無論如何感謝您的幫助！ –

它們或多或少是等價的。我剛剛添加了一些額外的格式，確保它可以獨立於用戶的區域設置（例如法語或德語） –

重新查詢使用字符串

回答

相關問題