关于ihtmlinputelement的问题

Question

相关HTML代码
<p id="p_name">
<label for="name">帐号：</label><input type="text" name="name" tabindex="1" value="" onblur="checkUsername();" onfocus="showRegMsg('name');" id="name" class="inputtext" />
<select name="stage" size="4" tabindex="2" onchange="regSelect()" id="stage" style="height:auto" class="select">
<option value="20">选项一</option>
<option value="30">选项二</option>
<option value="10">选项三</option>
<option value="90">选项四</option></select>
相关程序代码
uses MSHTML;
procedure TForm2.Button1Click(Sender: TObject);
var
Doc:IHTMLDocument2;
input:OleVariant;
userinputelement,stageinputelement:ihtmlinputelement;
doc:=webbrowser1.document as ihtmldocument2;
nameinputelement:=(doc.all.item('name',0) as ihtmlinputelement);
nameinputelement.value:=edit1.text;
stageinputelement:=(doc.all.item('stage',0) as ihtmlinputelement);
stageinputelement.value:='30';
end;nameinputelement实现了.
为什么stageinputelement不能实现?一运行程序就提示错误.
如果去掉stageinputelement的相关代码就可以运行.
不是给stage一个30的值就能达到选择'选项四'的效果吗
为什么不行阿.
我查找了MSDN.还是没找到资料.谁能帮我阿