Microsoft MVP성태의 닷넷 이야기
글쓴 사람
정성태 (techsharer at outlook.com)
홈페이지
첨부 파일
 


오늘은, Active Script를 호스팅하고 있는 응용 프로그램을 테스트하던 동료 한 분이, VBScript에 노출된 개체에 새로운 메서드를 추가했는데, 디버그 모드에서 Break Point도 안 걸린 체 전혀 실행이 안된다고... 현상을 설명해 주셨습니다.

오호... 정말입니다. ^^;

문제가 되는 코드는 다음과 같습니다.

=== C# ====
public void SetMyValue(string name, object value)
{
  System.Windows.Forms.MessageBox.Show(name + value.ToString());
}
    
=== VBScript ====    
myObj.SetMyValue( "param1", "param2" )

에러 메시지:
"Sub를 호출할 때는 괄호를 사용할 수 없습니다." 
Cannot use parentheses when calling a Sub

뭐... 이미 Visual Basic을 잘 하시는 분들은, '이걸 지금 알았어?' 하시는 분들이 계실 테지요?
좋습니다. ^^ 그럼, 그런 분들에게 제가 질문 하나 드리겠습니다.

  • "그렇다면, 왜 VBScript/VB 6.0에서는 다음과 같은 구문은 허용이 될까요?"

=== C# ====
public void SetMyValueParam1(object objValue)
{
  MessageBox.Show(objValue.ToString());
}
    
=== VBScript ====    
myObj.SetMyValueParam1( "param1" ) ' 정상적으로 실행됨.




모르시겠죠? ^^ 저를 포함해서 ^^ 아마 많은 분들이 모르셨을 거라고 생각됩니다. (구글에서 한국어 웹을 대상으로 아무리 뒤져봐도, 이에 대해 명확하게 설명하시는 분은 없더군요.)

어쨌든... 답은 찾았습니다. ^^ 아래의 글에서 (Microsoft 직원이니 당연한 거겠지요! ^^) 그 이유를 명확하게 설명해 주고 있습니다.

Fabulous Adventures In Coding
; https://docs.microsoft.com/en-us/archive/blogs/ericlippert/fabulous-adventures

이유인 즉, 함수 호출에 있어 괄호를 쳐주는 것이 byval로 넘기는 식으로도 해석이 되기 때문이랍니다.

myObj.SetMyValueParam1( "test" )
==> myObj.SetMyValueParam1 byval "test"


즉, 원래는 인자를 하나만 가진 Sub의 호출이 실패해야겠지만, Sub 함수라는 가정으로 byval로 전달하도록 수정이 되기 때문에 가능한 것입니다. 이것을 응용해서 적용해 보면, 다음과 같은 이상한 구문의 경우에는 오히려 에러가 발생하지 않는 것을 확인할 수 있습니다.

오류: myObj.SetMyValue( "param1", "param2" )

정상: myObj.SetMyValue ("param1"), ("param2")
==> myObj.SetMyValue byval "param1", byval "param2"

참고로, VB.NET부터는 이런 애매한 해석을 없애고, 무조건 Function은 괄호를 쳐주고, Sub는 빼도록 했다는군요. 그로 인해, VB.NET에서는 참조형 인자에 대해서 명시적으로 ByVal 형식의 인자로는 넘길 수 없다고 합니다.




제 사이트에 자주 오시는 분들 중에... 혹시 위의 내용을 읽고, 뭐... 좀 생각나시는 것이 없으신가요? ^^ 저 같은 경우에는 (홈 주인이다 보니), 위의 글을 읽고 나서 예전에 "송원석" 님이 보내주신 예제가 생각이 났습니다.

[답변]: [답변]: ASP의 ByVal과 ByRef 특성
; https://www.sysnet.pe.kr/3/0/647

위의 질문에 보면, 다음과 같은 예제가 있습니다.

01: Set objRS = CreateObject("ADODB.RecordSet")
02: MsgBox "1 : " & (objRS is Nothing)
03: 
04: TestA(objRS)
05: MsgBox "2 : " & (objRS is Nothing)
06: 
07: TestB(objRS)
08: MsgBox "3 : " & (objRS is Nothing)
09: 
10: Set objRS = Nothing
11: MsgBox "4 : " & (objRS is Nothing)
12: 
13: 
14: Sub TestA(ByVal objArg)
15:   Set objArg = Nothing
16: End Sub
17: 
18: Sub TestB(ByRef objArg)
19:   Set objArg = Nothing
20: End Sub

송원석 님은 8번 라인의 출력 결과가 왜 False가 나오는지 모른다고 했습니다. 물론, ^^ 저도 몰랐고 그 당시에는 송원석 님의 댓글대로 "Call" 만으로 해결이 되는 것으로 만족해야 했습니다.

그런데, 이제서야 그 이유를 알 것 같군요.
결국, 7번 라인의 TestB 호출 결과가 다음과 같이 되었기 때문이었습니다.

TestB(objRS)
==> TestB byval objRS

이렇게... ^^ 하나로 연결이 쭈~~~욱 되는군요.



[이 토픽에 대해서 여러분들과 의견을 공유하고 싶습니다. 틀리거나 미흡한 부분 또는 의문 사항이 있으시면 언제든 댓글 남겨주십시오.]







[최초 등록일: ]
[최종 수정일: 7/5/2021]

Creative Commons License
이 저작물은 크리에이티브 커먼즈 코리아 저작자표시-비영리-변경금지 2.0 대한민국 라이센스에 따라 이용하실 수 있습니다.
by SeongTae Jeong, mailto:techsharer at outlook.com

비밀번호

댓글 작성자
 



2007-10-11 07시53분
거 참... VBScript 는 뭔가 참 미묘한것 같습니다. ^_^;;;
songgun
2007-10-11 08시41분
^^
kevin25

... [136]  137  138  139  140  141  142  143  144  145  146  147  148  149  150  ...
NoWriterDateCnt.TitleFile(s)
1654정성태3/19/201425222개발 환경 구성: 219. SOS.dll 확장 모듈을 버전 별로 구하는 방법 [4]
1653정성태3/13/201420098.NET Framework: 428. .NET Reflection으로 다차원/Jagged 배열을 구분하는 방법
1652정성태3/12/201421160VC++: 76. Direct Show를 사용하는 다른 프로그램의 필터 그래프를 graphedt.exe에서 확인하는 방법파일 다운로드1
1651정성태3/11/201424779.NET Framework: 427. C# 컴파일러는 변수를 초기화시키지 않을까요?
1650정성태3/6/201425543VC++: 75. Visual C++ 컴파일 오류 - Cannot use __try in functions that require object unwinding [1]파일 다운로드1
1649정성태3/5/201420228기타: 44. BTN 스토어 앱 개인정보 보호 정책 안내
1648정성태3/5/201420597개발 환경 구성: 218. 스토어 앱 인증 실패 - no privacy statement
1647정성태3/3/201421819오류 유형: 224. 스카이드라이브 비정상 종료 - Error 0x80040A41: No error description available
1646정성태3/3/201431087오류 유형: 223. Microsoft-Windows-DistributedCOM 10016 이벤트 로그 에러 [1]
1645정성태3/1/201420865기타: 43. 마이크로소프트 MVP들이 모여 전국 세미나를 엽니다.
1644정성태2/26/201427831.NET Framework: 426. m3u8 스트리밍 파일을 윈도우 8.1 Store App에서 재생하는 방법파일 다운로드1
1643정성태2/25/201423654오류 유형: 222. 윈도우 8 Store App - APPX1204 SignTool Error: An unexpected internal error has occurred [1]
1642정성태2/25/201428236Windows: 91. 한글이 포함된 사용자 프로파일 경로 변경 [2]
1641정성태2/24/201425092기타: 42. 클래스 설명 [5]
1640정성태2/24/201446042.NET Framework: 425. C# - VLC(ActiveX) 컨트롤을 레지스트리 등록 없이 사용하는 방법 [15]
1639정성태2/23/201421786기타: 41. BBS 스토어 앱 개인정보 보호 정책 안내
1638정성태2/18/201444431Windows: 90. 실행 파일로부터 관리자 요구 권한을 제거하는 방법(부제: 크랙 버전을 보다 안전하게 실행하는 방법) [8]
1637정성태2/14/201425595Windows: 89. 컴퓨터를 껐는데도 어느 순간 자동으로 켜진다면? - 두 번째 이야기
1636정성태2/14/201421456Windows: 88. Hyper-V가 설치된 컴퓨터의 윈도우 백업 설정
1635정성태2/14/201422388오류 유형: 221. SharePoint - System.InvalidOperationException: The farm is unavailable.
1634정성태2/14/201422523.NET Framework: 424. C# - CSharpCodeProvider로 컴파일한 메서드의 실행이 일반 메서드보다 더 빠르다? [1]파일 다운로드1
1633정성태2/13/201425462오류 유형: 220. 2014년 2월 13일 이후로 Visual Studio 2010 Macro가 동작하지 않는다면? [3]
1632정성태2/12/201443385.NET Framework: 423. C#에서 DirectShow를 이용한 미디어 재생 [2]파일 다운로드1
1631정성태2/11/201422395개발 환경 구성: 217. Realtek 사운드 장치에서 재생되는 오디오를 GraphEditor로 녹음하는 방법
1630정성태2/5/201422730개발 환경 구성: 216. Hyper-V에 올려진 윈도우 XP VM에서 24bit 컬러 및 ClearType 활성화하는 방법
1629정성태2/5/201432551개발 환경 구성: 215. DOS batch - 하나의 .bat 파일에서 다중 .bat 파일을 (비동기로) 실행하는 방법 [1]
... [136]  137  138  139  140  141  142  143  144  145  146  147  148  149  150  ...