在VB中如何取得WebBrowser网页的javascript生成的变量值

[lhzxymd2011]

下面是网页中的javascript
<script language="javascript" type="text/javascript" onkeydown="keyEvent(event)">
var codevalue ; //在全局 定义
function createCode()
{
codevalue = "";
var codeLength = 4;//长度
var checkCode = document.getElementById("checkCode");
var selectChar = new Array(0,1,2,3,4,5,6,7,8,9,'A','B','C','D','E','F','G','H','I','J','K','L','M','N','O','P','Q','R','S','T','U','V','W','X','Y','Z');// 所有候选的字符

for(var i=0;i<codeLength;i++)
{


var charIndex = Math.floor(Math.random()*36);
codevalue +=selectChar[charIndex];


}
// alert(code);
if(checkCode)
{
checkCode.className="code";
checkCode.value = codevalue;
}

}

</script>

下页是html代码
<INPUT id=yzm name=mycode type=text size=10><input type="text" class="unchanged" id="checkCode" style="width: 80px" onclick="createCode()" size="15" readonly="readonly" />

问题：如何在获取input框中生成的代码？

敬请各位朋友指点一下，最好有详细代码。

[lhzxymd2011]

请热心的朋友来看下啊。