Помогите разобраться с Pattern в VBS

Формулировка задачи:

Господа, помогите пожалуйста разобраться, необходимо проверить переменную на то чтобы она было только из цифр, была не больше и не меньше пяти знаков и к тому же первые цифры (из пяти) должны быть 11, 38, 54, 87 или 94
Вот что я пытался, но все равно не получается.

Set objRegExp = CreateObject("VBScript.RegExp")
objRegExp.Pattern = "11|38|54|87|94\d{5}"
Str = "113444"
MsgBox objRegExp.Test(Str)
Str = "87eryte"
MsgBox objRegExp.Test(Str)

Прошу простить если где то туплю т.к. с VBS только начал разбираться

Решение задачи: «Помогите разобраться с Pattern в VBS»

textual
                            Листинг программы 
                        
                            objRegExp.Pattern = "^(11|38|54|87|94)\d{3}$"