<<< 返回 access911.net 编程静态资料库索引页

access朗读任意文本/使Access真人发声

 

作者:  摘自:  录入:cg1  时间:2003-3-30  浏览人次:1065


专题地址:http://access911.net/fixhtm/73FAB01E17DC.htm 如果需要更详细的评论或说明,请点击该地址。

 

简述:

 


语音

Option Compare Database
Dim xl As object
'dim xl as new execl.application

Private Sub Command0_Click()
'需要引用excel object
xl.Speech.Speak (文本0.Value)
End Sub

Private Sub Form_Open(Cancel As Integer)
Set xl = New Excel.Application

End Sub

Private Sub 文本0_KeyDown(KeyCode As Integer, Shift As Integer)
xl......................
...........

资料库随时有更新,欲查看最新详情请单击专题地址http://access911.net/fixhtm/73FAB01E17DC.htm

 


上一篇:Access播放wav音频

下一篇:确定当前记录为新增状态

2017年2月22日生成静态资料