Bir Kaç Kod Yazarak Bilgisayarınızı Konuşturmak İstermisiniz

Bilgisayarcı veya yazılımcı olmanıza gerek yok, not defterine bir kaç kod yazarak bilgisayarınızı konuşturabilirsiniz.

Yapmanız gereken şey masaüstünde boş bir yere sağ tıklayıp Yeni>Metin Belgesi ni tıklamanız sonra dosyayı çift tıklayarak açın, içine aşağıdaki satırları kopyala yapıştır ile ekleyin.

Bilgisayrınızı Konuşturun

İşin en önemli kısmı dosyayı kaydetme şeklidir. Onun için dosyayı Farklı Kaydet Diyoruz, Dosya Adı olarak speak.vbs diyoruz hemen altında bulunan Dosya Türünü ise Tüm Dosyalar olarak seciyoruz, ve dosyayı masaüstüne kaydedin.

Konuşma Programı

Şimdi herşeyi kapatın ve masaüstünde bulunana speak.vbs dosyasını çift tıklayın aşağıdaki şekilde karşına bir pencere açılacak metin kutusuna okumasını istediğiniz yazıyı yazın ve tamam tuşuna bazın bilgisayr yazıdığınızı sesli olarak okuyacaktır.

Konuşan Program

Not: Yazıları küçük harfle yazın daha net okuyor.

Dim Mesaj, Speak
Mesaj=InputBox("Okumasını İstediğiniz Metni Giriniz","http://www.korkmazadem.com")
Set Speak=CreateObject("sapi.spvoice")
Speak.Speak Mesaj

29 Mart 2016 Salı



Etiketler: konuşma programı , biligisayar konuşturma programı , bilgisayarınızı konuşturun , yazılımcı olmanıza gerek yok , ,

Yorumlar

hocam herşey iyi güzelde benim yazdığım yazıyı ingilizce okuyur

  • 22.11.2016

Yorum Yap

     

Kategoriler

Son Konular

Galeri

Hayat yaşadığın andan ibarettir, anın tadını çıkar ;)