比如我输入 af 就显示
a
b
c
d
e
f
每个字母占一行啊``不知能不能实现..
a
b
c
d
e
f
每个字母占一行啊``不知能不能实现..
中国DOS联盟
联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！
中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 批处理显示连序字母?
楼 主
批处理显示连序字母?
发表于 2007-01-09 17:32 · 中国 湖南 长沙 电信
第 2 楼
发表于 2007-01-09 17:38 · 中国 广东 湛江 电信
我看，应该不行的了，除非可以把字符转换成数字来运行，运行后再由数字转换成字母，这和我之前发的ASSCII码和字母数字之间转换贴就是这个道理。
第 3 楼
可以实现~~~~ 论坛搜索先~~~~~~
发表于 2007-01-09 18:12 · 美国 弗吉尼亚州 华盛顿县 Microsoft
第 4 楼
发表于 2007-01-10 00:18 · 中国 广东 电信
演示代码如下(没有做容错检测)：
@echo off
set 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
:begin
cls
set flag=0
set var=
set input=
set /p input= 请输入字母范围(如af)：
for %%i in (%str%) do call :pickup %%i
:end
pause
goto begin
:pickup
if /i "%1"=="%input:~0,1%" set flag=1
if /i "%1"=="%input:~-1%" set flag=2
if %flag% equ 1 echo %1
if %flag% equ 2 echo %1&goto end
goto :eof
本帖最近评分记录
（共 4 条）
点击查看详情
尺有所短，寸有所长，学好CMD没商量。
考虑问题复杂化，解决问题简洁化。
考虑问题复杂化，解决问题简洁化。
第 5 楼
发表于 2007-01-10 02:09 · 中国 广东 清远 联通
也来玩^_^
@echo off
setlocal enabledelayedexpansion
set 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
for %%i in (%str%) do set/a dec+=1 & set %%i=!dec! & set str!dec!=%%i
set en=
set /p en=请输入字母范围(如af)：
set/a num1=!%en:~0,1%!,num2=!%en:~-1%!
for /l %%i in (%num1%,1,%num2%) do echo !str%%i!
pause>nul
第 6 楼
发表于 2007-01-10 02:21 · 中国 广东 清远 联通
还有一个好理解一点的：
@echo off
setlocal enabledelayedexpansion
set 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
set en=
set /p en=请输入字母范围(如af)：
set str1=%en:~0,1%
set str2=%en:~-1%
for %%i in (%str%) do if %%i geq !str1! if %%i leq !str2! echo %%i
pause>nul
第 7 楼
发表于 2007-01-10 07:55 · 中国 湖南 长沙 电信
谢谢两位了.. ^_^
第 8 楼
我还没玩呢 ^.^#
发表于 2007-01-10 09:05 · 美国 弗吉尼亚州 华盛顿县 Microsoft
@echo off
:begin
set /p a="老规矩 嘻嘻 :"
set 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
for %%i in (%str%) do echo %%i|findstr [%a:~0,1%-%a:~-1%]
goto:begin
:begin
set /p a="老规矩 嘻嘻 :"
set 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
for %%i in (%str%) do echo %%i|findstr [%a:~0,1%-%a:~-1%]
goto:begin
第 9 楼
发表于 2007-01-10 09:31 · 中国 广东 电信
那我再来一段：
再精简一下。
[ Last edited by namejm on 2007-1-9 at 08:35 PM ]
@echo off
:begin
cls
set 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
set input=
set /p input= 请输入字母范围(如af)：
call set str=%%str:%input:~0,1%=-☆%input:~0,1%%%
call set str=%%str:%input:~-1%=%input:~-1%☆%%
for /f "tokens=2 delims=☆" %%i in ("%str%") do set str=%%i
for %%i in (%str%) do echo %%i
pause
goto begin
再精简一下。
[ Last edited by namejm on 2007-1-9 at 08:35 PM ]
尺有所短，寸有所长，学好CMD没商量。
考虑问题复杂化，解决问题简洁化。
考虑问题复杂化，解决问题简洁化。
第 10 楼
发表于 2007-01-10 22:38 · 中国 辽宁 联通
揍个热闹
m="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"
s=split(m,";")
b=inputbox("请输入字母范围(如af):","系统提示")
l=0
for i=0 to 25
if s(i)=left(b,1) then
l=1
end if
if l=1 then
h=h&vbcrlf&s(i)
end if
if s(i)=right(b,1) then exit for
next
msgbox h
第 11 楼
发表于 2007-01-11 02:26 · 中国 广东 清远 联通
Originally posted by jmz573515 at 2007-1-10 10:38 PM:
揍个热闹
m="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"
s=split(m,";")
b=inputbox("请输入字母范围(如af):","系统提示")
l= ...
如果是vbs的话，就不用这么麻烦拉！用一个简单的for循环就搞定拉
第 12 楼
发表于 2007-01-11 02:57 · 中国 辽宁 联通
还望11楼的朋友指教，我是刚学VBS也不是很了解。谢谢！
第 13 楼
发表于 2007-02-04 08:52 · 中国 安徽 芜湖 电信
今天我终于看懂了老大 5 楼的代码.
江湖远
碧空长
路茫茫
一个人漫无目的的奔跑,风,刺骨的冷....
碧空长
路茫茫
一个人漫无目的的奔跑,风,刺骨的冷....
第 14 楼
发表于 2007-02-04 10:41 · 中国 甘肃 兰州 城关区 电信
ascii 码不知道可以用的上吗？
第 15 楼
发表于 2007-02-04 10:57 · 中国 广东 电信
用来处理ASCII码？
尺有所短，寸有所长，学好CMD没商量。
考虑问题复杂化，解决问题简洁化。
考虑问题复杂化，解决问题简洁化。
论坛跳转: