求救！！（在线等）关于返回列表框的值

怎么不用js呢？vbs的话就只有在ie上面了<head>
<script language="vbscript">
<!--
sub slt_onchange()
msgbox slt.options(slt.selectedIndex).text
end sub
-->
</script></head>
<body>
<select name="slt" size="1" class="select" id="border">
  <option value="" selected="selected">院系选择</option>
  <option value='马克思主义学院'>马克思主义学院</option>
  <option value='历史文化学院'>历史文化学院</option>
  <option value='=商学院'>商学院</option>
  <option value='管理学院'>管理学院</option>
</select></body>
</html>