메시지 상자에서 vbs의 단추 캡션을 변경하는 중

Question

Option Explicit 
Const conForReading = 1 
Dim objFSO, objReadFile, objFile, contents, result, shell 
Set objFSO = CreateObject("Scripting.FileSystemObject") 
Set objFile = objFSO.GetFile("C:\read.txt") 

If objFile.Size Then 
Set objReadFile = objFSO.OpenTextFile("C:\read.txt", 1, False) 
contents = objReadFile.ReadAll 
result = MsgBox ("text2" & contents & "text1",vbYesNo+vbExclamation,"TITLE") 
Select Case result 
Case vbYes 
Set shell = wscript.CreateObject("Shell.Application") 
shell.Open "D:\folder" 
Case vbNo 
End Select 
objReadFile.close 

Else 
End If 

Set objFSO = Nothing 
Set objReadFile = Nothing 
WScript.Quit() 

이 vbs 파일을 가지고 있는데 vbYesNo 캡션을 변경하고 싶습니다. 예 : 폴더 열기 및 종료 없음. 그러나 나는 그것을 어떻게하는지 모른다. 그리고 나는 이것을 할 길을 찾을 수 없었다. 프로그래밍에 익숙하지 않아서 쉬운 일이 없을 수도 있습니다. 그러나 나는 그것을 배우고 싶다.

Answer 1

불가능합니다. MessageBox 함수를 사용하는 옵션은 없습니다. 옵션은 다음과 같습니다

OK 
OK, Cancel 
Abort, Retry, Ignore 
Yes, No, Cancel 
Yes, No 
Retry, Cancel 

참조 : "폴더 열기"를 http://msdn.microsoft.com/en-us/library/sfw6660x(v=vs.84).aspx

나는 말한다 메시지 상자의 제목을 사용하는 것이 좋습니다 것입니다