快活林资源网 Design By www.csstdc.com
复制代码 代码如下:
ECHO OFF
REM QBFC Project Options Begin
REM HasVersionInfo: No
REM Companyname:
REM Productname:
REM Filedescription:
REM Copyrights:
REM Trademarks:
REM Originalname:
REM Comments:
REM Productversion: 0. 0. 0. 0
REM Fileversion: 0. 0. 0. 0
REM Internalname:
REM Appicon:
REM QBFC Project Options End
ECHO ON
@echo off
title 读单词和句子的软件 By:Leeleeon QQ:646568194
echo ------------------------------------------------------------------
echo 欢迎使用本软件
echo ------------------------------------------------------------------
echo By:Leeleeon QQ:646568194
echo ------------------------------------------------------------------
echo %date% %time:~0,8%
echo ------------------------------------------------------------------
:main
echo.
set /p word=输入单词或句子:
:read
mshta vbscript:CreateObject("SAPI.SpVoice").speak("%word%")(Window.close)
:choice
echo.
echo 1.重新读一遍
echo 2.输入新单词读
echo 3.清空屏幕
echo 4.退出
set /p ch=选择你要做的事:
If "%ch%"=="1" goto read
If "%ch%"=="2" goto main
If "%ch%"=="3" (
cls
goto choice
)
If "%ch%"=="4" goto end
echo.
echo 你输入的信息有误
goto choice
:end
echo.
echo 感谢你使用本软件
echo QQ:646568194
pause >nul
快活林资源网 Design By www.csstdc.com
广告合作:本站广告合作请联系QQ:858582 申请时备注:广告合作(否则不回)
免责声明:本站资源来自互联网收集,仅供用于学习和交流,请遵循相关法律法规,本站一切资源不代表本站立场,如有侵权、后门、不妥请联系本站删除!
快活林资源网 Design By www.csstdc.com