VBSでのIE操作（AngularJSのページ）でプルダウン選択が効かない

前提・実現したいこと

VBSでIE（11)を操作してスクレイピングするシステムを作っています。

IEで操作したいwebページが、Javascriptのフレームワークである
Angular(1.2)を利用したページでうまく動かない箇所がある為、解決策について相談させて下さい。

宜しくお願いいたします。

■スクレイピングしたいページ
プルダウンを選択して、ボタンを押すと
プルダウンで選択した値がメッセージとして表示されるページです。
（実際のページを見せるわけにはいかないので、簡易的なページで再現しています）

■サンプル
http://153.121.53.155/q/angular_test.html

発生している問題・エラーメッセージ

VBSのIE操作で、プルダウンを選択してもメッセージに反映されず
「undefinedを選択しました」と表示されてしまいます。

VBSでプルダウン選択・ボタンクリックはできているので
おそらくAngularの動きに原因があるのではと考えています。

VBSで操作したときのIEの挙動（動画）：
http://153.121.53.155/q/2017-03-17_1655.swf

該当のソースコード

<?xml version="1.0" encoding="utf-8" ?>
<package>
  <job>
    <runtime></runtime>
    <script language="VBScript">
    <![CDATA[
        Sub IEClose()
            'IEを閉じる
            Dim objProcess
            Dim objProcList
            Dim strProcName

            strProcName = "iexplore.exe"

            Set objProcList = GetObject("winmgmts:").InstancesOf("win32_process")
            For Each objProcess In objProcList
                If LCase(objProcess.Name) = strProcName Then
                    objProcess.Terminate
                    Exit For
                End If
            Next
            Set objProcList = Nothing
        End Sub

        Sub waitPage(objIE)
            'IEブラウザが開くまで待つ
            WScript.sleep (300)
            Do While objIE.busy
            Loop
            Do While objIE.Document.readyState <> "complete"
            Loop
        End Sub


        Sub getPage(objIE, strURL)
            'ページを取得する関数
            objIE.Navigate (strURL)
            Call waitPage(objIE)
        End Sub

        set objIE = WScript.CreateObject("InternetExplorer.Application")
        objIE.Visible = True

        Call getPage(objIE, "http://153.121.53.155/q/angular_test.html")
        Call waitPage(objIE)

        Set money_select  = objIE.Document.getElementsByTagName("SELECT")(0)
        money_select.selectedIndex = 2
        money_select.fireEvent("onchange")

        Call waitPage(objIE)

        Set objBtn = objIE.Document.getElementsByTagName("button")
        objBtn(0).click

        Call waitPage(objIE)
    ]]>
    </script>
  </job>
</package>

試したこと

・だめもとで、プルダウンのoption要素に対しても、fireEventをつけてみたのですが挙動は変わらずでした。

Set money_option  = objIE.Document.getElementsByTagName("OPTION")(2)
money_option.fireEvent("onchange")

補足情報(言語/FW/ツール等のバージョンなど)

VBS
・IE11を操作

スクレイピング先ページ ライブラリ
・AngularJS v1.2.26