用VBScript编程：在浏览器中输出1---999中能被3整除，且至少有一位数字是5的所有整数

两种方法： 1。 <% dim t for i=1 to 999 if i mod 3 =0 then t=cstr(i) for j=1 to len(t) m=left(t,j) m=right(m,1) if m="5" then response.write(i) response.write("") exit for end if next end if next %> 或者 2 <% dim