2008-10-31 73 views

回答

10

注意:確認與Access 2003,不知道早期版本。

對於MDB中的查詢,您可以右鍵單擊查詢設計器(表中空白處的任何位置),從上下文菜單中選擇屬性,然後在描述屬性中輸入文本。

您僅限於256個字符,但總比沒有好。

您可以在描述得到編程像這樣的東西:

Dim db As Database 
Dim qry As QueryDef 

Set db = Application.CurrentDb 
Set qry = db.QueryDefs("myQuery") 

Debug.Print qry.Properties("Description") 
+3

在我看來,就像代碼評論。但是,我可以理解提出的答案。這是一種方式,但幾乎沒有人在閱讀時期望的答案。 – 2015-10-13 15:27:45

12

無法向'普通'Access查詢添加註釋,即在mdb中的QueryDef,這就是爲什麼許多人建議在表中存儲查詢的SQL的原因。

+0

這不是事實。看到接受的答案。 – 2008-11-03 15:31:59

+23

這是通常意義上的評論嗎?對我而言,這是一個自定義屬性,而不是評論。 – Fionnuala 2008-11-03 19:27:04

+2

我會同意@Remou。儘管這是對整個查詢進行「評論」的一種方式,但它並不是您通常想要的,也就是說,查詢查詢各部分的方式以及格式化佈局(兩者都不可能)。 – 2011-01-22 02:16:19

3

您可以添加評論的MSACCESS查詢,如下所示:在查詢中創建一個虛擬場。不優雅,但是自我記錄幷包含在查詢中,這使得它更容易進入源代碼控制!傑爾就是一個例子。進入SQL視圖,並添加虛擬場(你可以從設計視圖做太多):

SELECT "2011-01-21;JTR;Added FIELD02;;2011-01-20;JTR;Added qryHISTORY;;" as qryHISTORY, ...rest of query here... 

運行查詢:

qryHISTORY       FIELD01 FIELD02 ... 
2011-01-21;JTR;Added FIELD02;;2011-01-20;JTR;Added qryHISTORY;;" 0000001 ABCDEF ... 

注意使用「;」作爲qryHISTORY字段中的字段分隔符,以及「;;」作爲評論的結尾,並使用ISO日期格式和intials,以及評論。已經在qryHISTORY字段中測試了多達646個字符。

+1

爲了清晰起見,可以編輯它嗎?我很難閱讀/理解它。代碼中的更多格式,間距等可能會有所幫助。 – 2015-02-07 00:19:43

+0

我不確定大多數安裝都希望每個查詢調用都返回歷史記錄,並且傾向於使用@ Dan的答案 – cmroanirgo 2015-02-12 08:32:11

4

我知道這個問題是很老了,但是我想補充幾點,奇怪的省略:

  1. 在容器中,你可以用鼠標右鍵單擊查詢,然後單擊屬性,並填寫與你的描述。您輸入的文本也可以在設計視圖中訪問,在Descrption屬性中。
  2. 也可以記錄每個字段。只要確保屬性窗口是打開的,然後單擊想要文檔的查詢字段,然後填充說明(僅在太少已知的格式屬性上方)

有點難過,沒有產品(我知道)記錄這些查詢字段的描述和表達式。

2

第一個答案提到如何以編程方式獲取description屬性。如果您打算繼續使用程序,因爲查詢中的註釋非常糟糕,而不是試圖將註釋放在查詢中,也許最好將它們放入程序並使用該程序進行所有查詢

Dim dbs As DAO.Database 
Dim qry As DAO.QueryDef 

Set dbs = CurrentDb 
'put your comments wherever in your program makes the most sense 
dbs.QueryDefs("qryName").SQL = "SELECT whatever.fields FROM whatever_table;" 
DoCmd.OpenQuery "qryname" 
1

如果您有一個查詢有很多標準,記住每個標準的作用可能會非常棘手。 我在原始表格中添加一個文本字段 - 將其稱爲「註釋」或「文檔」。 然後,我將它包含在查詢中,併爲每個條件提供評論。

評論需要像這樣寫,以便返回所有相關的行。 不幸的是,由於我是新的海報,我無法添加屏幕截圖!

所以在這裏不用

Field: | Comment    |ContractStatus  | ProblemDealtWith | ...... | 

Table: | ElecContracts  |ElecContracts  | ElecContracts | ...... | 

Sort: 

Show: 

Criteria | <> "all problems are | "objection" Or | 

     | picked up with this | "rejected" Or | 

     | criteria" OR Is Null | "rolled"  | 

     | OR "" 

<>告訴查詢選擇那些不等於您輸入的文本行,否則只會拿起有文字等於您的評論即無場!

「」用引號括起來

您的意見或爲空或「」告訴你的查詢,包括那些在意見欄內沒有任何數據行,否則它不會返回任何東西!

26

我決定在Where子句中添加一個條件,該條件始終評估爲真,但允許編碼人員查找您的評論。

Select 
    ... 
From 
    ... 
Where 
    .... 
    And "Comment: FYI, Access doesn't support normal comments!"<>"" 

最後一行結果始終爲true,因此不會影響返回的數據,但可以讓你離開的下一個傢伙評論。

0

如果你想一般的註釋添加到整體的對象(查詢或表等)

訪問2016 去導航窗格中,高亮對象,右鍵單擊,選擇對象/表屬性,添加在說明窗口即庫存記「表最後最後更新17年5月31日」

0

在查詢設計:

  • 添加一列
  • 輸入您的評論(引號)在外地
  • 取消選中顯示
  • 排序在assending。

注:

如果不進行排序,本場將被接入去除。所以,請確保您沒有選中顯示並對列進行排序。