如何用FOR循环打星，打出K子型

大脑秀逗了?

<%
dim k ,m ,n

n=0
for k=1 to 30
response.write "*"
n=n+1
if n<5 then
response.write "<br>"
end if
if n>=5 and n<=15 then
for m=14 to n step -1
response.write " "
next
elseif n>=17 and n<=30 then
for m=1 to n-15
response.write " "
next
elseif n=16 then
response.write " "
end if
if n>=5 then
response.write "*<br>"
end if
next

%>