Nu cred că aţi înteles ceva dar hai să vă explic.
» Deschideţi notepad-ul şi scrieţi următorul cod
COD
StrText=("Bună I Learn !")
set ObjVoice = CreateObject("SAPI.SpVoice")
ObjVoice.Speak StrText
set ObjVoice = CreateObject("SAPI.SpVoice")
ObjVoice.Speak StrText
Închideţi şi salvaţi i-Learn.vbs ( s-au ce nume doriţi voi .. dar sa fie .vbs ) , când il deschideţi va spune " Buna I Learn " ( unde scrie StrText=("Bună I Learn !") puteţi scrie ce vreti ! )
» A doua variantă e asta :
COD
StrText = InputBox("Ce vrei să zică PC-ul tău", "i-Learn")
set ObjVoice = CreateObject("SAPI.SpVoice")
ObjVoice.Speak StrText
set ObjVoice = CreateObject("SAPI.SpVoice")
ObjVoice.Speak StrText
Aici vă va apărea o fereastră unde puteţi scrie ce vreţi şi când dai OK calculatorul va spune....acolo unde e "Ce vrei să zică Pc-ul tau" va apărea în fereastră ... încercaţi şi veţi vedea despre ce e vorba! Labels: AUDIO_Divers, SISTEM_Windows 7, SISTEM_WindowsVISTA, SISTEM_WindowsXP
Responses
0 Respones to "Invata cum sa faci ca PC-ul/Calculatorul tau sa citeasca cu voce tare ceea ce ai tastat"
Trimiteți un comentariu