<%@ page language="vb" %>

使用Choose函数简化SelectCase语句

<% Dim intA as integer=2, strTemps as string strTemps=Choose(intA,"一","二","三","四","五") response.write("intA的值是" & intA & "时,结果为"&strTemps) %>

Choose函数语法: Choose(数值变量,返回值1,返回值2,返回值3,……) 注意intA一定要是数值变量!

response.write()里面如果是字符串或html语句,要加上””,是变量则加上&, 句中strTemps在右侧则只需加一个&