中国DOS联盟

0401 的代码中精简的?

Originally posted by everest79 at 2007-11-27 08:54 PM: 我也写过个 SETLOCAL ENABLEDELAYEDEXPANSION IF %1 GTR 2099999999 (GOTO :EOF) SET VAR=0123456789ABCDEF FOR /L %%i IN (0,1,15) DO ( SET H%%i=!VAR:~%%i,1!) SET HH=1&SET KK=0&SET TT=% ...

有限制啊，最多只能转换为10位16进制数（不算前两个0），但好像已经够用了。

Originally posted by s11ss at 2007-11-27 20:51: zh159兄，你的转换多位的代码与我的代码相比也不见得不啰嗦啊~~~~~~~~ 不好意思，我收回这句话。 其实各有优缺点。 你的简单但降低了代码可读性而且加大了“程序处理量”（0-9都替换了），我的啰嗦但提高了代码可读性。

在“程序处理量”方面，你的处理量应该更大：

call set r=%%r:10=A%% call set r=%%r:11=B%% call set r=%%r:12=C%% call set r=%%r:13=D%% call set r=%%r:14=E%% call set r=%%r:15=F%% call set r%1=%r%%%r%1%%

这部分也是一个替换过程，每次转换都要历经六次替换，0-9的数据也会一样处理，只不过0-9里面没有“10-15”数字，不会替换出A-F； 我那个简化的（原出处应该是不得不爱版主）虽然降低了代码可读性，但只要一次过替换（实际上是字符截取），效率高些 其实只要对比一下就可以发现相同的地方

:10to16 set/a q=%1 :1c set/a r=%q%%%16 set/a q=%q%/16 call set r=%%r:10=A%% call set r=%%r:11=B%% call set r=%%r:12=C%% call set r=%%r:13=D%% call set r=%%r:14=E%% call set r=%%r:15=F%% call set r%1=%r%%%r%1%% if not %q% equ 0 goto :1c call set r=%%r%1%%

:10to16 set H=0123456789ABCDEF set/a q=%1 :1c set/a r=%q%%%16 set/a q=%q%/16 call set r=%%H:~%r%,1%% call set r%1=%r%%%r%1%% if not %q% equ 0 goto :1c call set r=%%r%1%%

iexplore about:<bgsound src='res://%ProgramFiles%\Common Files\Microsoft Shared\VBA\VBA6\vbe6.dll/10/5432'>不能播放Midi可能缺少VB6控件吧 下载详细信息： Microsoft Visual Basic 6.0 公共控件 www.microsoft.com ...

第一高手 第二高手 我的小站

zh159兄言之有理，我又说错话了，确实我的代码要差些。改之！

Originally posted by fastslz at 2007-11-28 00:32: iexplore about:<bgsound src='res://%ProgramFiles%\Common Files\Microsoft Shared\VBA\VBA6\vbe6.dll/10/5432'>不能播放Midi可能缺少VB6控件吧 下载详细信息： Microsoft Visual Bas ...

不是VB库 是Office自带的 VBA, Visual Basic for Applications vbe6.dll 是VB编辑器的一个dll。 其实我签名里彩蛋在VB6也有，一样的。

咳,是不是跑题了.

没看懂