Not Defteri Kullanarak Metni Sese Dönüştürme

Bugün öğreticimizde sizlere not defterini kullanarak metni veya yazıyı sese dönüştürmeyi göstereceğim.

Başlangıç ​​menünüze gidin ve not defterini açın

1. Adım : Not Defteri'ni açın.
2. Adım : Aşağıdaki verdiğim kodu kopyalayıp yapıştırın.
3. Adım : Dosyayı kaydedin.
4. Dosyayı audio.vbs veya .vbs ile başka bir uzantı olarak kaydedin

Dim msg, sapi
msg=InputBox("Enter your text for conversion–By tech talk","Teknoroid.net Text-To-Audio Converter")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak msg

İşte bu, artık metniniz ses dönüştürücü olarak kullanıma hazır. şimdi kaydettiğiniz ve kullandığınız klasöre gidin.

Not Defteri Uygulamasının Ses Uygulamasına Dönüştüğü Bir Basit Bir Kod ile yaptık.