bat字符串操作函数(1)--len函数:求字符串的长度

 

::#################################################################################################
::1.2.1 求字符串的长度
::call :_job_str_Len_fun _job_var_str _job_var_Len
::#################################################################################################
goto :eof
:_job_str_Len_fun
Setlocal EnableDelayedExpansion
::长度变量名	
	set _job_var_Len=%2
::长度变量值
	set _job_val_Len=0
::字符串
	if "%1"=="" goto _job_str_Len_end
	set _job_tmp_var=%%%1%%
	call set _job_val_str=#%_job_tmp_var%
	
	for %%i in (1024 512 256 128 64 32 16 8 4 2 1) do (
	  if not "!_job_val_str:~%%i,1!"=="" (
		set /a "_job_val_Len+=%%i"
		set "_job_val_str=!_job_val_str:~%%i!"
	  )
	)

:_job_str_Len_end
Endlocal&if "%_job_var_Len%" NEQ "" (set %_job_var_Len%=%_job_val_Len%) else echo %_job_val_Len%
goto :eof