当前位置：DOS资源站 → 资料中心 → VBS脚本 → vbs读英语

vbs读英语

减小字体 增大字体 作者：佚名  来源：本站整理  发布时间：2008-4-15 22:23:53

将下面这句代码保存为一个VBS文件，然后在要用时，直接就E文的文本文件拖到VBS脚本文件上就工作了。

CreateObject("SAPI.SpVoice").Speak CreateObject("Scripting.FileSystemObject").OpenTextFile(WScript.Arguments(0)).ReadAll

==========================================

SzBuf = InputBox( "输入英文单词，用空格分隔：", "输入", "I LOVE YOU" )
set tack=CreateObject("SAPI.SpVoice")
tack.Speak(SzBuf)


 

[] [返回上一页] [打 印]
  • ·上一篇文章：vbs搜索代理
  • ·下一篇文章：批量文件查找替换vbs
  • ·百度中搜索更多的关于“vbs读英语”相关内容
  • ·谷歌中搜索更多的关于“vbs读英语”相关内容
  • ******申明******
  • 本站文章内容有部分为收录网络中其他网友内容，DOS资源站不保证所有的代码都适合你使用。
  • 由于编辑匆忙，有可能造成某些脚本文件出现丢失代码或代码无法运行的情况，请网友根据情况自行修改。
  • 如果能将出错部分反馈给我，那就更好了。

文章评论评论内容只代表网友观点，与本站立场无关！

频道栏目导航

本类热门阅览

相关文章