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

[其他] [已解决]批处理怎么做一个可以上下移动的选择框?

[复制链接]
发表于 2022-4-5 14:38:43 | 显示全部楼层
回复 15# 5i365


    运行的代码看一下
发表于 2022-4-5 14:55:55 | 显示全部楼层
回复 11# idwma


   我在ISE中试的好像是死循环, 报下面的错
>Exception calling "SetCursorPosition" with "2" argument(s): "句柄无效。
"
At line:16 char:5
+     [Console]::SetCursorPosition(0,$mod)
+     ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    + CategoryInfo          : NotSpecified: ( [], MethodInvocationException
    + FullyQualifiedErrorId : IOException

Exception calling "ReadKey" with "1" argument(s): "Cannot read keys when either application does not have a console or when console input has been redirected from a file
. Try Console.Read."
At line:9 char:5
+     $i=[int][Console]::ReadKey(1).key
+     ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    + CategoryInfo          : NotSpecified: (:) [], MethodInvocationException
    + FullyQualifiedErrorId : InvalidOperationException

Exception calling "SetCursorPosition" with "2" argument(s): "句柄无效。
"
At line:14 char:5
+     [Console]::SetCursorPosition(0,$mod)
+     ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    + CategoryInfo          : NotSpecified: (:) [], MethodInvocationException
    + FullyQualifiedErrorId : IOException

>Exception calling "SetCursorPosition" with "2" argument(s): "句柄无效。
"
At line:16 char:5
+     [Console]::SetCursorPosition(0,$mod)
+     ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    + CategoryInfo          : NotSpecified: (:) [], MethodInvocationException
    + FullyQualifiedErrorId : IOException
发表于 2022-4-5 15:09:28 | 显示全部楼层
回复 17# 5i365


    不太清楚在ise里可能不适用吧
 楼主| 发表于 2022-4-5 15:34:42 | 显示全部楼层
回复 14# idwma
  1. @echo off&setlocal enabledelayedexpansion
  2. set i=0
  3. :l
  4. cls
  5. if %i%==1 set /p "=>" <nul
  6. echo [%_s1%]a
  7. if %i%==2 set /p "=>" <nul
  8. echo [%_s2%]b
  9. if %i%==3 set /p "=>" <nul
  10. echo [%_s3%]c

  11. for /f %%i in ('powershell "[int][Console]::ReadKey(1).key"') do (
  12.     if not %%i==13 (
  13.         if %%i==38 if not %i%==1 set /a i-=1
  14.         if %%i==40 if not %i%==3 set /a i+=1
  15.         if %%i==32 if defined _s!i! (set _s!i!=) else (set _s!i!=x)
  16.         goto :l
  17.     )
  18. )
  19. echo %i%
  20. for /f "delims==" %%i in ('set _s') do (
  21. set f=1
  22. if %%i==_s1 (1.bat) else if %%i==_s2 (2.bat) else if %%i==_s3 (3.bat)
  23. )
  24. if not defined f echo 空
复制代码
发表于 2022-4-5 16:05:49 | 显示全部楼层
回复 19# ANSL


    123bat里的代码是什么样的
 楼主| 发表于 2022-4-5 18:42:03 | 显示全部楼层
本帖最后由 ANSL 于 2022-4-5 18:43 编辑

回复 20# idwma
1.bat

  1. @ echo off
  2. echo running 1.bat
  3. pause
  4. exit
复制代码


2.bat
  1. @ echo off
  2. echo running 2.bat
  3. pause
  4. exit
复制代码

3.bat
  1. @ echo off
  2. echo running 3.bat
  3. pause
  4. exit
复制代码
发表于 2022-4-5 20:06:35 | 显示全部楼层
回复 21# ANSL
  1. @echo off&setlocal enabledelayedexpansion
  2. set i=0
  3. :l
  4. cls
  5. if %i%==1 set /p "=>" <nul
  6. echo [%_s1%]a
  7. if %i%==2 set /p "=>" <nul
  8. echo [%_s2%]b
  9. if %i%==3 set /p "=>" <nul
  10. echo [%_s3%]c

  11. for /f %%i in ('powershell "[int][Console]::ReadKey(1).key"') do (
  12.     if not %%i==13 (
  13.         if %%i==38 if not %i%==1 set /a i-=1
  14.         if %%i==40 if not %i%==3 set /a i+=1
  15.         if %%i==32 if defined _s!i! (set _s!i!=) else (set _s!i!=x)
  16.         goto :l
  17.     )
  18. )
  19. echo %i%
  20. for /f "delims==" %%i in ('set _s') do (
  21. set f=1
  22. if %%i==_s1 (start 1.bat) else if %%i==_s2 (start 2.bat) else if %%i==_s3 (start 3.bat)
  23. )
  24. if not defined f echo 空
  25. pause
复制代码

评分

参与人数 1技术 +1 收起 理由
ANSL + 1 谢谢!

查看全部评分

您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|批处理之家 ( 渝ICP备10000708号 )

GMT+8, 2026-3-20 07:16 , Processed in 0.011474 second(s), 8 queries , File On.

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表