1
ห้อง MS Access / : access สามารถทำให้อ่านตัวหนังสือออกเสียงได้หรือไม่ครับ
« เมื่อ: 07 พ.ย. 62 , 09:53:11 »ผมอยากทราบว่าaccess สามารถเขียนให้โปรแกรมอ่านตัวหนังสือที่อยู่ในฐานข้อมูลออกเป็นเสียงพูดได้หรือไม่ครับ
หากได้มีวิธีการหรือขั้นตอนในการทำอย่างไรครับ ขอคำชี้แนะหน่อยนะขอรับ ขอบพระคุณมากๆขอรับ
เป็นภาษาไทย หรืออังกฤษ ครับ
ถ้าภาษาอังกฤษลองดูตัวอย่างนี้ครับ
ที่ Module ใส่โค้ดนี้เข้าไป
Option Compare Database
Option Explicit
Function MySpeak(str As String)
Dim objVo As Object
Set objVo = CreateObject("SAPI.SpVoice")
objVo.Speak str
End Function
ที่ฟอร์ม สร้าง textbox ชื่อ txtSpeak กรอกข้อความภาษาอังกฤษ แล้ว สร้างปุ่มขึ้นมา 1 ปุ่มใส่โค้ดนี้เข้าไป
Private Sub CmbVoice_Click()
Call MySpeak(txtSpeak)
End Sub
ตัวอย่างด้านล่าง
โพสต์นี้ได้รับคำขอบคุณจาก: panomsin