2014-06-12 93 views
0

我想分配一個SQL查詢的結果使用Access中的VBA變量。查詢返回一個值,但分配給它的變量的值爲Nothing。這裏是代碼片段:SQL查詢返回值後記錄集=沒有什麼

Dim queryReturnID As String 
queryReturnID = "select dbo_tbl_SupplierReturn.ReturnID from dbo_tbl_SupplierReturn" & _ 
    " where SupplierID = " & lstPOHdr.Column(1) 
Debug.Print queryReturnID 
Dim RecordSet1 As DAO.RecordSet 
Set RecordSet1 = CurrentDb.OpenRecordset(queryReturnID) 
+0

queryReturnID返回什麼? – Brad

回答

0

不確定你的Nothing記錄集是怎麼回事;即使是不返回任何記錄的查詢也不會將該對象設置爲空。然而,作爲替代方案,您可以對這一行代碼執行相同的操作:

DLookup("ReturnID", "dbo_tbl_SupplierReturn", "SupplierID = " & lstPOHdr.Column(1)) 
+0

有很多理由不使用各種域功能。 OP的表名稱表明它是一個鏈接表,dlookups可能非常低效 – Brad

+0

真實,公平。我也認爲它會返回一個值,這很可能不會。 – VBlades