想在vb.net的程序中有一个语音提示,该怎么写首先添加一个系统的语音COM组件的引用microsoft speech object library然后在程序中声明一个语音类dim RC As SpeechLib.SpSharedRecoContext这个类有一些事件,如果你要处理它的一些事件,可以用withevent来声明然后在窗体LOAD事件或你需要的地方先创建一个实例RC = New SpeechLib.SpSharedRecoContext当一个RC被实例化后,系统就会运行语音识别程序.前提是你的系统已经正确安装这个功能.一般默认就已经安装好的.其次提醒一下,WIN7的语音识别比XP的好N倍.从阅读到侦听都好很多.然后就可以在你需要阅读的地方使用RC.Voice.Speak("hello 我", 11)11那里是一些枚举,用来标识系统用前台还是后台或其他方式来阅读文字,简单的来说就是阅读的时候不会卡住你的程序.你可以选其他的枚举来试试作用.以上为阅读部分.如果需要程序听你说话,则需要声明一个侦听类dim RG As SpeechLib.ISpeechRecoGrammar在初始化时将之与上面的RC建立关系,此时则必须要用withevent来声明上面的RC,因为涉及电脑听到你的语音后,会触发一个事件,并将听到的内容传递到该事件.其次,要让系统听到的解析为命令,就必须准备一个XML结构的文件来保存那些固定的命令.如果电脑在XML文件中找不到那些固定命令或同时不属于系统命令,电脑将会将其解释为听写.RG = RC.CreateGrammar '(0)
RG.CmdLoadFromFile("听到.xml", SpeechLib.SpeechLoadOption.SLODynamic)
RG.CmdSetRuleIdState(0, SpeechLib.SpeechRuleState.SGDSActive)然后写一个过程来处理听到的事件Private Sub 听到命令(ByVal StreamNumber As Integer, ByVal StreamPosition As Object, ByVal RecognitionType As SpeechLib.SpeechRecognitionType, ByVal 话语 As SpeechLib.ISpeechRecoResult) Handles RC.Recognition RC.Voice.Speak("我听到了"话语.PhraseInfo.GetText, 11)End Sub以上为侦听部分.下面列一个XML的例文?xml version="1.0" encoding="gb2312"?
GRAMMAR LANGID="804"
RULE NAME="命令" TOPLEVEL="ACTIVE"
L
P打开播放器
P上我的QQ
P关闭你自己 /L
/RULE
/GRAMMAR要让系统正确地侦听到你说的话,前提你必须运行语音识别程序并让其激活到"正在聆听"状态.并且你必须有一个能正常使用的话筒而且保证话筒已经打开.(废话-_-|||)以上就是用VB.NET语音识别的最基本的一些操作.希望对你有帮助.更深入的内容有兴趣的话可以和我一起研究.
vb.net 朗读Interop.SpeechLib.dll 引用后,朗读不限制
Me.Cursor = Cursors.WaitCursor
Dim oVoice As New SpeechLib.SpVoice
Dim cpFileStream As New SpeechLib.SpFileStream
oVoice.Voice = oVoice.GetVoices.Item(cmbVoices.SelectedIndex)
oVoice.Volume = trVolume.Value
oVoice.Speak(txtSpeach.Text, SpeechLib.SpeechVoiceSpeakFlags.SVSFDefault)
oVoice = Nothing
Me.Cursor = Cursors.Arrow
vb.net 中 如何实现 播放mp3文件在.NET里,没有托管的音乐播放器,用API只能播放WAV格式,对于MP3等形式的音频文件,就要依赖于其他控件了,常用的就是
MediaPlayer 。使用方法:
在工具箱上点右键,选择“选择项目(Choose Items)”,切到COM选项卡,找到 Windows Media Player , 勾选,确定
在t工具箱上,把刚才加入的MediaPlayer控件,拖放到窗体上
代码:
WindowsMediaPlayer1.URL = "mp3文件路径,支持网络路径"
WindowsMediaPlayer1.Ctlcontrols.play
基本就OK了 , 至于其他的操作诸如下一曲上一曲暂停停止,直接看 WindowsMediaPlayer1.Ctlcontrols. 里面的方法吧 。
帮忙翻译关于vb.net进程的英文中一个最显着的新功能在vb.net是有能力创造线程在您的申请 。Visual C开发已能写的多线程代码多年,但达到同样的效果在VB6的是困难重重 。
虽然这次演习使用vb.net的程式码,所以没有理由你不能得到相同的结果,使用C #。
什么是线程?
第一个问题我们需要的答案是“什么是线程” ?那么,简而言之 , 一个线程是想运行两个程序在同一进程中 。每一件软件您的书面因此,到目前为止,至少包含一个线程-主要应用程序线程 。
对于经验缺乏者,一个过程,是有效的一个实例正在运行的程序在您的计算机上 。说您正在运行均Microsoft Word和Microsoft Excel。双方Word和Excel都运行在一个单独的进程,孤立对方的经验 。与Windows 2000 , 也有收集的其他程序在后台运行,提供的东西一样 , 支持USB ,网络连接,等等 。这些都是所谓的“服务”,和每一个那些运行在其自己的服务 。
一个典型的例子多线程使用的是Microsoft Word的拼写检查 。一个线程(主应用程序线程)让您输入文字到您的文件,另一个线程运行,不断和手表什么您输入的同时,检查错误,因为你去和疲弱的问题与拼写 。
原因是使用线程很简单-它提高的表现,您的申请,或者更确切地说,它改善了用户体验 。现代计算机系统的设计做很多事情,一次,并使用我们的Microsoft Word的例子再次,与时俱进,与无论您打字并不困难 。事实上,在Word中有很多的备件加工能力 , 因为它可以工作,使很多次,速度比你或我可以键入 。通过引入线程可以做其他的东西在背景中, Word可以利用的备用容量 , 在您的电脑,并让您的用户体验,多一点愉快 。
另一个例子是Internet Explorer。每当IE浏览器,以获得资源 , 如网页或图片 , 从互联网上 , 它这样做是在一个单独的线程 。的结果,这是您不须等候,即得到一整页之前 , 它会显示该网页给你 。例如,它可以下载的HTML弥补的文本网页,在一击中,使用主要的应用程序线程,以显示你是什么,迄今已和那么它可以启动多个线程自动消失,并下载每个形象的参照在该网页上 。您仍然可以滚动向上和向下的网页,尽管事实上它仍然忙碌获得其余的数据 。
vb 编个小程序 怎样使在text1和text2输入阿拉伯数字时自动人声报号 , 我有数字0--9的 .wav文件给你个TTS有关的东西 , 就是文字转换语音的,不知道适合你不,不用wav文件了 。
____________________________________________________________________
在VB中使用文字朗读引擎(TTS)技术
现今市面上流行的一些英语学习软件,在广告词上经常说自己使用了国际顶尖的全程语音TTS技术,能进行整段英文的流利朗读,并能自由调节朗读的速度与频率等 。那么 , 这个神奇的TTS究竟是什么东西呢?
其实,TTS是微软出品的一套文字朗读引擎(Text-To-SpeechEngine),这些英语软件就是调用它来进行英文朗读的 。我们在英语学习软件的编程开发中也可使用TTS技术,下面笔者将利用VisualBasic5.0来揭开TTS神秘的面纱 。
一、安装TTS引擎
TTS引擎所需的MicrosoftText-to-SpeechEngine与MicrosoftSpeechAPI软件都可到微软的站点去下载,也可以在“金山词霸2000”或“金山词霸.net”的安装光盘上找到(文件名为MSTTS.EXE与SPCHAPI.EXE) 。安装了TTS引擎后,在Windows所在目录下会生成一个SPEECH目录,其中有一个Vtxtauto.tlb文件,在编程时我们需要调用它 。
二、在VB中引入Vtxtauto.tlb文件
进入VB5.0,执行选单命令“文件/新建工程/标准EXE”并确定 , 然后执行选单“工程”中的“引用”,单击“浏览”按钮到Windows目录下的SPEECH子目录,打开Vtxtauto.tlb文件 , 将“VoiceText1.0TypeLibrary”添加到引用列表中,选中它并单击确定 。将库Vtxtauto引入VB后,我们可以通过选单“视图”中的“对象浏览器”来了解它所封装的类 , 以及各类成员函数的属性的意义、使用格式等信息 。一些主要的方法与属性意义,笔者在下面的源程序中将给出注释,在这里就不详细列出,请参见附图1 。
三、设置控件及属性
在FORM1上添加三个Label控件、一个TextBox控件、一个HScrollBar控件和六个CommandButton控件 。窗体及各控件的主要属性设置如下:
FORM1:Caption=“英文朗读”
LABEL1:Caption=“请输入英文文档”
LABEL2:Caption=“朗读速度”
LABEL3:Caption=“”
(LABEL3标签用来显示朗读速度值)
TEXT1:Text=“Pleaseinputenglishtext”;ToolTiptext=“请输入或粘贴英文文档”;MultiLine=True;ScrollBars=3-Both
HSCROLL1:名称=SpeedChange;Min=90;Max=300(Min与Max属性值分别用来限定可调节的语速的最小与最大值)
COMMAND1:名称=read;Caption=“朗读”
COMMAND2:名称=pause;Caption=“暂停”
COMMAND3:名称=stop;Caption=“停止”
COMMAND4:名称=prev;Caption=“上一句”
COMMAND5:名称=next;Caption=“下一句”
COMMAND6:名称=quit;Caption=“退出”
四、编写代码
下面我们就可以一步步地编写代码,具体代码如下:
'在窗体装载时调用Register方法注册,括号内的两个参数是字符串
PrivateSubForm_Load()
CallVTxtAuto.VTxtAuto.Register(Space(8),Space(8))
'因为语速的默认值为170 , 故水平滚动条的初值也设为170
SpeedChange.Value=https://www.04ip.com/post/170
EndSub
'设置朗读速度调节代码,当水平滚动条的值Value发生变化时将其赋给控制语速的Speed属性
PrivateSubSpeedChange_Change()
VTxtAuto.VTxtAuto.Speed=SpeedChange.Value
Label3.Caption=SpeedChange.Value
EndSub
'设置“朗读”按钮代码
PrivateSubread_Click()
'如果朗读出错,则转到出错处理标记模块ErrorHandler
OnErrorGoToErrorHandler
'调用方法Speak进行朗读,第一个参数是要朗读的文本,第二个参数是设置朗读风格
CallVTxtAuto.VTxtAuto.speak(Trim(Text1.Text),vtxtsp_VERYHIGHvtxtst_READING)
ExitSub
ErrorHandler:
MsgBox"只能朗读英文文档,不能朗读汉字字符!",,"出错信息"
EndSub
'设置“暂停”按钮代码
PrivateSubpause_Click()
IfVTxtAuto.VTxtAuto.IsSpeakingThen
'如果属性IsSpeaking为真,则表示正在朗读 , 调用AudioPause方法暂停朗读
CallVTxtAuto.VTxtAuto.AudioPause
pause.Caption="恢复"
Else
'如果已经处于暂停状态则调用AudioResume方法恢复朗读
CallVTxtAuto.VTxtAuto.AudioResume
pause.Caption="暂停"
EndIf
EndSub
'设置“停止”按钮代码,调用StopSpeaking方法停止当前朗读
PrivateSubstop_Click()
CallVTxtAuto.VTxtAuto.StopSpeaking
EndSub
'设置“上一句”按钮代码,调用AudioRewind方法往后跳过一句
PrivateSubprev_Click()
CallVTxtAuto.VTxtAuto.AudioRewind
EndSub
'设置“下一句”按钮代码,调用AudioFastForward方法向前跳过一句
PrivateSubnext_Click()
CallVTxtAuto.VTxtAuto.AudioFastForward
EndSub
'设置“退出”按钮代码
PrivateSubquit_Click()
UnloadMe
EndSub
本程序在中文Windows95/98、VB5.0环境下运行通过 。运行时在文本编辑框中输入或粘贴英文文档,然后单击“朗读”按钮就可播放读音,运行界面如图2 。
五、程序改进思路
本文对在VB编程中使用TTS技术只是起个抛砖引玉的作用,熟悉VB编程的电脑爱好者来可以对本程序作一些改进 , 例如增加对声卡和TTS引擎是否安装的检测、增加从文本文件或数据库中读取文档的功能、增加让用户选择朗读的优先级和发声音量调节等功能 。这些功能实现起来较为复杂,感兴趣的读者可进行深入研究 。
vb.net中如何播放声音,是要什么控件嘛?My.Computer.Audio.Play("SoundFile.wav")
SoundFile.wav是你要播放的声音文件的路径
【vb.net英文朗读 双击语音代码vbs朗读文件】关于vb.net英文朗读和双击语音代码vbs朗读文件的介绍到此就结束了,不知道你从中找到你需要的信息了吗 ?如果你还想了解更多这方面的信息,记得收藏关注本站 。
推荐阅读
- 集中采购电视机怎么付款,购买电视会计分录怎么做
- 掌阅科技是华为鸿蒙概念的,掌阅科技是龙头吗
- postgresql安装问题的简单介绍
- 秀米微信公众号注册码,秀米授权公众号不成功
- mysql怎么关闭自启动 mysqld怎么关闭
- 苹果手机ios10气泡,苹果手机的气泡不见了咋调出来
- 快手新手如何看别人直播,快手新手如何看别人直播记录
- mysql中主键怎么写 mysql主键的作用
- 包含不做直播电商如何存活的词条