asp中如何循环输出26个英文字母


<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>Untitled Document</title>
</head>
<body>
asp中如何循环输出26个英文字母
<br />
1.
<%
Dim i : For i=Asc("a") To Asc("z") : Response.Write Chr(i) : Next
%>
<br />
2.
<%
str="a|b|c|d|e|f|g|h|i|j|k|l|m|n|o|p|q|r|s|t|u|v|w|x|y|z"
str=Split(str,"|")
For i=0 to Ubound(str)
Response.Write(str(i)&"<br>")
Next
%>
<br />
3.
<%
'大写字母
for i=65 to 90
response.Write chr(i)
next
'小写字母
for i=97 to 122
response.Write chr(i)
next
%>
<br />
4.
<%
str="a|b|c|d|e|f|g|h|i|j|k|l|m|n|o|p|q|r|s|t|u|v|w|x|y|z"
str=replace(str,"|","<br>")
Response.Write(str)
%>
<br />
5.
<%
str="abcdefghijklmnopqrstuvwxyz"
for n=1 to 26
response.write(mid(str,n,1))
next
%>
</body>
</html>



转自:http://www.cnblogs.com/cnaspnet/articles/451188.html
  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值