本帖最后由 zm900612 于 2011-5-28 12:20 编辑
findstr版:- @echo off&setlocal enabledelayedexpansion
- set /p input=请输入年月
- for /f "tokens=1,2 delims=-" %%a in ("%input%") do (
- for /f "tokens=1-3* delims=月日 " %%c in ('
- findstr /rc:"[^'-Z].*[ \-]%%a月" %~s0') do (
- if defined next set xz=%%c %%d月%%e日%%f
- if not defined xz (
- if %%b lss %%e (
- set next=.
- ) else set xz=%%c %%d月%%e日-%%f
- )
- )
- )
- echo %xz%
- pause&exit
- 水瓶座 1月20日-2月18日
- 摩羯座 12月22日-1月19日
- 射手座 11月23日-12月21日
- 天蝎座 10月24日-11月22日
- 天枰座 9月23日-10月23日
- 处女座 8月23日-9月22日
- 狮子座 7月23日-8月22日
- 巨蟹座 6月22日-7月22日
- 双子座 5月21日-6月21日
- 金牛座 4月20日-5月20日
- 白羊座 3月21日-4月19日
- 双鱼座 2月19日-3月20日
- 水瓶座 1月20日-2月18日
复制代码 其实是前天晚上写好的,结果昨天忘了发 |