@echo off      
这里是你帮我弄的代码
echo 该文件大小为： MB
pause
复制代码

@echo off      
set "testPath=%windir%\system32\ntoskrnl.exe"
call:test1 "%testPath%"
goto next
:test1 xx
echo   %%1  = %1
echo   %%~1  = %~1            - 删除任何引号(")，扩充 %%1
echo   %%~f1 = %~f1           - 将 %%1 扩充到一个完全合格的路径名
echo   %%~d1 = %~d1           - 仅将 %%1 扩充到一个驱动器号
echo   %%~p1 = %~p1           - 仅将 %%1 扩充到一个路径
echo   %%~n1 = %~n1           - 仅将 %%1 扩充到一个文件名
echo   %%~x1 = %~x1           - 仅将 %%1 扩充到一个文件扩展名
echo   %%~s1 = %~s1           - 扩充的路径只含有短名
echo   %%~a1 = %~a1           - 将 %%1 扩充到文件的文件属性
echo   %%~t1 = %~t1           - 将 %%1 扩充到文件的日期/时间
echo   %%~z1 = %~z1           - 将 %%1 扩充到文件的大小
echo   %%~$PATH:1 = %~$PATH:1   - 查找列在路径环境变量的目录，并将 %%1 扩充
echo                   到找到的第一个完全合格的名称。如果环境变量名
echo                   未被定义，或者没有找到文件，此组合键会扩充到
echo                   空字符串

echo   %%~dp1 = %~dp1                - 仅将 %%1 扩充到一个驱动器号和路径
echo   %%~nx1 = %~nx1                - 仅将 %%1 扩充到一个文件名和扩展名
echo   %%~fs1 = %~fs1      - 仅将 %%1 扩充到一个带有短名的完整路径名
echo   %%~dp$PATH:1 = %~dp$PATH:1 - 查找列在路径环境变量的目录，并将 %%1 扩充
echo                   到找到的第一个驱动器号和路径。 
echo   %%~ftza1 = %~ftza1      - 将 %%1 扩充到类似输出线路的 D0R
echo   %%~a1 = %~a1
echo\&goto:eof
:next
pause
exit
复制代码

@echo off&setlocal enabledelayedexpansion
for /l %%a in (1,1,30) do set "kg=!kg! "
for /r %%a in (*) do (
     set "str=%%~nxa%kg%"
     echo !str:~,20!%%~za
)
pause>nul
复制代码

For i = 1 To 30 
  kg = kg & " "
next
Set fso = CreateObject("scripting.filesystemobject")
Set ws = CreateObject("wscript.shell")
For Each file In fso.GetFolder(ws.CurrentDirectory & "\").Files
  vbstr = vbstr & Left(file.Name & kg, 20) & file.Size & vbCrLf
Next 
Set ws = Nothing
Set fso = Nothing 
MsgBox vbstr
复制代码