<%
myArrayValue = Array("1","2","3","4")
myArrayName = Array("男孩","女孩","宝宝","母婴")
%>
<label>用户分类：
<select name="bTypeId" style="padding:5px; margin-bottom:10px;">
<option value="0">未分组</option>
<%
for i=0 to ubound(myArrayValue)
%>
<option value="<%=myArrayValue(i)%>" <%if rs.fields("bTypeId")=myArrayValue(i) then
response.Write("selected='selected'")
end if %>><%=myArrayName(i)%></option>
<%
next
%>
</select>
</label>
来源：https://blog.csdn.net/weixin_33842328/article/details/92924515