|
|
|
|
|
Ustvarimo bralnik besedila
V tej kratki in lahki lekciji bomo v programskem jeziku Visal Basic izdelali program, ki bo prebral poljubno besedilo iz vnosnega polja.
|
|
 |
|
|
|
|
|
|
|
|
|
|
 |
1.
|
|
|
Najprej ustvarimo nov projekt in ga poljubno poimenujemo.
|
|
| |
2.
|
|
|
Na formo, ki se nam ustvari, dodamo en gumb in textbox.
Textboxu v nastavitvah določimo Multiline na True in ga razpotegnemo po formi.
Gumbu pa za tekst določimo tekst Beri.
|
|
| |
3.
|
|
|
Sedaj dvakrat kliknemo na gumb in prilepimo naslednjo kodo:
Dim SAPI
SAPI = CreateObject("sapi.spvoice") SAPI.Speak(textbox1.text) |
|
| |
4.
|
|
|
Program še zaženemo in preverimo če deluje.
V vnosno polje vpišemo poljuben tekst in po kliku na gumb Beri bo program prebral naš tekst.
Na žalost pa program dobro prebere samo angleške besede in ima bolj robotski glas.
|
|
|
 |
|
|
|
|
|
