[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

【练习-050】批处理超越for命令tokens极限分割字符串

  可能有的新手还不知道在for循环中tokens(列)的极限数是31,
而且将同一行中整整31列内容来分行显示也是极为麻烦的,一般不是用
echo %%a&echo %%b...&echo %%z...的这样形式就是用call :lp+shi
ft移位来完成的。
  那么能不能突破这一tokens极限数?又能不能很方便地将一行内
数十列内容分行显示出来?这就是我们今天提出的问题了。
  已知一超长字串符:d_q 973-c_j 314+y_d 356+i_p 638-u_m 2
04+w_a 588+j_c 829-p_t 599+j_v 803-p_y 92-r_h 677+h_i 341+h_
q 705-r_f 601-m_s 822+q_q 17-w_y 720+s_d 325-d_n 559-l_s 109
+l_v 160-x_b 232-u_r 282-v_l 521+p_o 403-x_n 613+t_x 185-g_v
678+z_n 753+j_k 779-o_f 283-h_w 390-z_o 772-w_v 252-a_e 51-
m_t 945-k_q 444-r_m 233-p_w 744+k_k 136-w_k 131-s_o 163+k_i
733+w_c 733+g_l 42+o_i 515+x_h 130-n_b 200+i_u 25+z_i 730,现
在要求将这一字串符以+-符为分隔符分行显示出来,每行的显示形式应
为“字母_字母 数值”,如倒数第四行的内容为x_h 130。
  本题满分10分,视情况加分。
  注:请先将此题留给新人们思考(此贴是用批进行自动排版)。

[ 本帖最后由 batman 于 2009-8-12 11:06 编辑 ]
***共同提高***

回复 3楼 的帖子

楼上代码最大的问题在于效率上,使用逐字符不是解本题的上上之法。。。
***共同提高***

TOP

回复 8楼 的帖子

路过的就不加分了,再说你用第三方,与出题的初衷不符。。。
***共同提高***

TOP

还有种无限tokens的办法
  1. @echo off
  2. set "str=d_q 973-c_j 314+y_d 356+i_p 638-u_m 204+w_a 588+j_c 829-p_t 599+j_v 803-p_y 92-r_h 677+h_i 341+h_q 705-r_f 601-m_s 822+q_q17-w_y 720+s_d 325-d_n 559-l_s 109+l_v 160-x_b 232-u_r 282-v_l 521+p_o 403-x_n 613+t_x 185-g_v678+z_n 753+j_k 779-o_f 283-h_w 390-z_o 772-w_v 252-a_e 51-m_t 945-k_q 444-r_m 233-p_w 744+k_k 136-w_k 131-s_o 163+k_i 733+w_c 733+g_l 42+o_i 515+x_h 130-n_b 200+i_u 25+z_i 730"
  3. :lp
  4. for /f "tokens=1* delims=+-" %%a in ("%str%") do (
  5.      echo %%a
  6.      if "%%b" neq "" set "str=%%b"&goto lp
  7. )
  8. pause>nul
复制代码
3

评分人数

***共同提高***

TOP

返回列表