결론부터 말씀드리면, "예. 올바른 동작이 맞습니다."
이것은, 스택에 전달되는 인자의 주소 구조를 보면 알 수 있습니다.
RecordSet 같은 경우에는, ByVal 로 넘긴다고 하더라도 내부적인 연결 개체까지 완전히 clone 되어 전달되는 것이 아니기 때문입니다.
쉽게 예를 들어, int 의 경우라면.
int a = 6;
TestA(ref a);
TestB(a);
와 같이 전달하는 경우, TestA 함수에서는 전달되는 a 로컬 변수의 메모리 주소가 스택에 전달되었다고 보시면 되고, TestB 의 경우에는 a 변수의 내용인 6 이라는 값 자체가 스택에 전달된 경우입니다.
자... 그럼, 이를 Recordset 에 옮겨 볼까요?
Recordset localRs;
TestA(ref localRs);
TestB(localRs);
마찬가지로, TestA 의 경우에는 localRs 변수의 메모리 주소가 전달되었습니다. 반면에 TestB 의 경우에는 localRs 가 담고 있는 인터페이스 포인터의 값이 넘어간 것입니다.
결국, TestA 와 TestB 함수안에서 rs.Close 를 해버리면 결국 같은 객체를 가리키는 것이기 때문에 동작은 동일하게 발생합니다.
단지 다른 점이 있다면. 아래와 같은 식으로 하는 경우에만 그 차이를 발견할 수 있습니다.
TestA(ref rs)
{
rs = null; // localRs == null 이 되어버림
}
TestB( rs )
{
rs = null; // localRs 는 변하지 않음.
}
TestA 함수의 경우에는, localRs 변수의 주소값이 스택에 넘어와서 참조하게 되는 것이기 때문에, rs = null 을 해버리면, 인자로 전달되었던 localRs 변수 자체가 null 값으로 되어버리는 반면, TestB 는 ByVal 로써, localRs 변수의 값이 스택에 전달되어 해당 스택 변수 4byte(32bit 시스템) 만을 null 로 초기화하는 것입니다.
인자가 전달되는 스택을 그려가면서 답변을 드리면 이해가 더 빨리 되실 것 같은데... ^^; 그림 실력이 워낙 딸려서 그냥 말로만 적고 넘어가 봅니다. 혹시나 실험하시면서 더 궁금한 것이 있다면 댓글 남겨 주십시오. ^^ 같이 확인을 해드리겠습니다.
(위의 내용은 VB 6.0 에서도 동일하게 적용될 거라고 확신합니다.)