کلک های Acess

[AbbasSediqi]

و اما ترفند بسیار جالب بعدی

پیام صوتی در اکسس

Function SMSG(Message As String)

    Dim speaks, speach

    speaks = Message

    Set speach = CreateObject("sapi.spvoice")

    speach.speak speaks

End Function