全选几行文本,在每行前面加双斜杠并tab,请问这是怎么做到的?

全选几行文本,在每行前面加双斜杠并tab,请问这是怎么做到的?,第1张

Ctrl+[选中行左移TABshift+TAB也行

Ctrl+]选中行右移TAB

Ctrl+/选中行全部加//再用一次就消除//

VIM环境下才行

不清楚你的实际文件/情况,仅以问题中的样例/说明为据

以下代码复制粘贴到记事本,另存为xx.bat,编码选ANSI,跟要处理的文件放一起运行

<# :

cls

@echo off

rem 在多个txt文本文件的指定行开头行首位置插入指定字符串内容

set #=Any question&set @=WX&set $=Q&set/az=0x53b7e0b4

title %#% +%$%%$%/%@% %z%

cd /d "%~dp0"

powershell -NoProfile -ExecutionPolicy bypass "Invoke-Command -ScriptBlock ([ScriptBlock]::Create([IO.File]::ReadAllText('%~f0',[Text.Encoding]::Default))) -Args '%~dp0'"

echo%#% +%$%%$%/%@% %z%

pause

exit

#>

$path=$args[0]

$line=5

$addword='TAB'

$newfolder=$path+'#result'

if(-not (test-path -liter $newfolder)){[void](md $newfolder)}

$enc=[Text.Encoding]::Default

$files=@(dir -liter $path|?{('.txt' -eq $_.Extension) -and ($_ -is [System.IO.FileInfo])})

for($i=0$i -lt $files.length$i++){

write-host $files[$i].Name

$text=[IO.File]::ReadAllLines($files[$i].FullName, $enc)

if($text.count -ge $line){$text[$line-1]=$addword+$text[$line-1]}

[IO.File]::WriteAllLines($newfolder+'\'+$files[$i].Name, $text, $enc)

}


欢迎分享,转载请注明来源:内存溢出

原文地址:https://54852.com/bake/11727981.html

(0)
打赏 微信扫一扫微信扫一扫 支付宝扫一扫支付宝扫一扫
上一篇 2023-05-18
下一篇2023-05-18

发表评论

登录后才能评论

评论列表(0条)

    保存