2011-04-29 5 views
1

각 레코드에서 세 개의 별도 필드를 선택하는 쿼리를 실행하는 경우. 세 개의 별도 문자열 (각 필드 당 하나씩)로 반환 된 결과를 얻을 수 있으므로 VBA 코드에서 순환시킬 수 있습니까?쿼리 결과를 문자열로 가져 오기

답변

4

예, 레코드 세트를 열고 컬렉션과 같은 필드 값에 액세스 할 수 있습니다.

Dim d As DAO.Database 
Dim r As DAO.Recordset 
Set d = CurrentDb() 
Set r = d.OpenRecordset("SQL or TableName") 
While Not r.EOF 
    Debug.Print r!Field1, r!Field2, r!Field3 
    r.MoveNext 
Wend 
r.Close 
Set r = Nothing 
Set d = Nothing 
+0

은 r! Field1입니다. 조작 할 수있는 텍스트 객체 또는 화면에 인쇄하는 것입니까? – Zack

+0

r! Field1을 사용하여 액세스하십시오. 테이블의 필드 값을 직접 수정하려면 다음과 같이 입력하십시오. 'r.Edit : \t r! Field1 = r! Field1 & "hello world!": r.Update ' 일괄 업데이트를 수행하려면 SQL UPDATE 문을 사용하십시오. SQL 문을 사용하면 레코드 세트를 사용하는 것보다 빠릅니다. – Bobort

+0

다음과 같은 쿼리를 작성하는 데 값을 사용하는 경우 선택 * 표에서 TableField = r! Field1 제대로 작성 되었습니까? – Zack

관련 문제