vbs实现的下拉框对应键入值

80酷酷网    80kuku.com

  下拉|下拉<TITLE>select center</TITLE>
<link rel="stylesheet" type="text/css" CONTENT="">
<head>
<SCRIPT LANGUAGE="vbScript">
<!--
function keypress()
tname=mainform.tname.value
'alert(mainform.tname.value)
for each tn in mainform.tablename

allvalue=tn.value
if left(allvalue,len(tname))=tname then
'alert(allvalue)
mainform.tablename.value=allvalue
exit for
end if

next
end function
//-->
</SCRIPT>
<style>
body{text-align:left;font:12px #000080 ;}
#main{float:left;width:750px;border:#dddddd 1px solid;margin:5px 10px;padding:10px 5px;}
#maintable{width:700; padding:1px; border:1px solid #dddddd;font:12px;color:#000080; }
#maintable td{ border: 0px solid #008000; padding-left: 4px; padding-right: 4px;
padding-top: 1px; padding-bottom: 1px;background:#dddddd }
#search{float:left;width:600px;border-bottom:#0000ff 1px solid;margin:0px;padding:2px 10px;}
#result{float:left;width:600px;border:#dddddd 0px solid;margin:2px 1px;padding:2px 10px;}
#test{float:left;width:750px;border:#dddddd 1px solid;margin:5px 10px;padding:10px 100px;}
#main p{}
</style>
<BODY>
<div id="test">
<A topnum:<input type=text name=topnum size=5><INPUT TYPE=submit name=action value=submit>     <INPUT TYPE=reset value=reset></FORM>the time used 0.203125
</div>
</body>
</html>




分享到
  • 微信分享
  • 新浪微博
  • QQ好友
  • QQ空间
点击: