VB如何用webbrowser赋页面Input和Select混合类型的值？？

****************************页面上的部分代码*************************************
<td class="formtilte">

<font
color="red">*</font> 接收单位：

</td>

 <input

type="text"

name="hospitalCodeName"

id="hospitalCodeName" style="width:330px;background-image:url('../images/ico07.gif');background-repeat:no-repeat;background-position:right;"

onfocus="showDivStation(this,
true,'rdanwei')"

onclick="removeNull(this)"

onkeyup="similarFind(this,'rdanwei')"

value="">



<select size="20"
name="rdanwei" id="rdanwei"

style="display: none;
position:absolute; width: 330px;"

onchange="check_rdanwei(this.value)"

onclick="selectStation(this,'rdanwei')">

<option value="030000"
name="山东shandongxxzxys">山东</option>
****************************************************************************



如果直接把值写到”请选择”这个text框里面，数值就会被清空，点击小放大镜的时候，就会出现select类型的下拉菜单，我感觉好像是SELECT后的值会自动赋值到text框中，而直接写进去的值就会被removeNull(this)干掉，怎样通过VB webbrowser把值赋进去？ 发不了新帖，这里求助：

两个WebBrowser，如何写代码才能使得WebBrowser1的弹出窗口在WebBrowser1显示，并且WebBrowser2的弹出窗口在WebBrowser1显示？

补充：VB ,  网络编程