CrLf

@echo off&setlocal enabledelayedexpansion
set /p input=请输入年月
for /f "skip=12 tokens=1-3* delims=月日- " %%a in ('type %~s0^&echo test %input%') do (
	set /a m=%%b+100,d=%%c+100
	if defined #!m:~-2!!d:~-2! set c=#
	set #!m:~-2!!d:~-2!!c!=%%a %%b月%%c日-%%d
)
for /f "tokens=1,2* delims== " %%a in ('set #') do (
	if %%b==test echo !xz!
	set xz=%%b %%c
)
pause&exit
摩羯座 1月1日-1月19日
水瓶座 1月20日-2月18日
双鱼座 2月19日-3月20日
白羊座 3月21日-4月19日
金牛座 4月20日-5月20日
双子座 5月21日-6月21日
巨蟹座 6月22日-7月22日
狮子座 7月23日-8月22日
处女座 8月23日-9月22日
天枰座 9月23日-10月23日
天蝎座 10月24日-11月22日
射手座 11月23日-12月21日
摩羯座 12月22日-12月31日
复制代码

以上第二次修改

CrLf

6# 随风


原先忽略了变量重名致错的可能，已修改

10# 随风


确实，这回测试无误了，顺便把输出改成了楼主要求的格式
另外说一句，plp的思路确实够简明

CrLf

12# 随风


一样的，只是我把跨年的魔蝎座分为两部分，这样可以很简单地降低工作量...

CrLf

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日
复制代码

其实是前天晚上写好的，结果昨天忘了发