asp做网站中如何循环输出26个英文字母|长沙建站|长沙企业做网站|长沙SEO优化推广|长沙私人做网站|斌网网络-www.pk0731.com

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

信息来源：长沙做网站发布时间：2014-2-12 浏览:1356次

网站建设asp中如何循环输出26个英文字母西安网站建设asp中如何循环输出26个英文字母

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<head>

<title>Untitled Document</title>

</head>

<body>

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

Dim i : For i=Asc("a") To Asc("z") : Response.Write Chr(i) : Next

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)&" ")

'大写字母

for i=65 to 90

response.Write chr(i)

'小写字母

for i=97 to 122

response.Write chr(i)

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,"|"," ")

Response.Write(str)

str="abcdefghijklmnopqrstuvwxyz"

for n=1 to 26

response.write(mid(str,n,1))

</body>

</html>

识别扫一扫二维码咨询，斌网网络做网站