Office XP中文语音功能的开发

　　扩展TTS功能

图1

　　在Excel 2002中，有一个文本到语音的工具栏(见图1)，可以选择按行或按列朗读单元格内容，也可以在输入时朗读单元格的内容，这对于保证手工输入数据的正确性是非常有帮助的。用户可能希望在Word和PowerPoint中也使用类似的功能，此时可以利用Office所提供的开发工具Visual Basic for Applications (VBA)经过简单的编程即可完成。

　　在Word中

　　朗读选定内容既然Excel 2002提供了文本到语音的功能，要使Word能朗读选定内容，必须首先调用Excel 2002。

　　打开VBA编辑器，从工具选单中选择引用命令，选定Microsoft Excel 10.0对象库并确定(见图2)。

图2

　　声明对象变量(本例中为SP)，然后建立一个子过程(本例中名为ReadSelection)，在子过程中将对象引用赋给变量SP并隐式创建对象Excel应用程序。最后，调用Excel成员Speech的Speak方法来朗读当前活动窗口的选定内容。在Word中选定内容，并运行该宏即可。

　　在PowerPoint中进行朗读在PowerPoint中进行朗读的原理和在Word中完全相同，只是这里不是朗读选定内容，而是在放映时自动朗读幻灯片备注页的内容。因此需要PowerPoint应用程序对象事件。它的过程是：

　　在类模块中声明一个对象变量以响应事件；

　　编写特定的事件过程，本例中为EventClassModule；

　　在另一模块中初始化声明的对象，本例中为“朗读”模块。

　　运行宏InitializeApp即可启动幻灯片放映，并使PowerPoint在放映时朗读当前备注页中的内容。

　　自定义语音命令

　　为了方便用户使用宏，可以自定义工具栏和按钮，然后单击自定义的工具栏按钮即可运行指定的宏。对于Office XP内置的工具栏按钮，现在可通过相应的语音命令进行操作。同样在用户自定义的工具栏中，用中文命名按钮后，即可用通过朗读此名称以达到用声音命令执行相应的宏的功能。需要注意的是，所命名的按钮名称不要与内置的选单命令或按钮名相同，否则由于自定义的名称有较高的优先权，原有的内置命令将无法同时用语音进行操作。