Moze, naravno. Ako kod obuhvatis tim tagovima dobices ovako nesto:
Code:
lol=msgbox ("Poštovanje i dobro došli!",25,"Važno")
dim speechobject
set speechobject=createobject("sapi.spvoice")
do
pw=inputbox("Enter your password.")
if pw="Miroslav" then
exit do
else
msgbox ("Incorrect password")
speechobject.speak ("Incorrect password")
lol=msgbox ("Nemojte ništa pamtiti (‘save’), niti instalirati, niti podešavati na ‘C disku’ - jer će sve biti poništeno nakon narednog uključivanja računara.",20,"Upozorenje broj jedan")
lol=msgbox ("Isljučite računar nakon završetka rada.",20, "Upozorenje broj šest")
lol=msgbox ("Srećan rad!",25,"Autor")
end if
loop
'nastavak ako je sifra tacna
msgbox ("Correct password.")
speechobject.speak ("Correct password")
msgbox "Molim Vas da prilikom rada s računarom imate u vidu sledeće sugestije i informacije;",25,"Važno"
a ako prvi tag napravis ovako [
code:vb] onda dobijes:
Code (vb):
lol=msgbox ("Poštovanje i dobro došli!",25,"Važno")
dim speechobject
set speechobject=createobject("sapi.spvoice")
do
pw=inputbox("Enter your password.")
if pw="Miroslav" then
exit do
else
msgbox ("Incorrect password")
speechobject.speak ("Incorrect password")
lol=msgbox ("Nemojte ništa pamtiti (‘save’), niti instalirati, niti podešavati na ‘C disku’ - jer će sve biti poništeno nakon narednog uključivanja računara.",20,"Upozorenje broj jedan")
lol=msgbox ("Isljučite računar nakon završetka rada.",20, "Upozorenje broj šest")
lol=msgbox ("Srećan rad!",25,"Autor")
end if
loop
'nastavak ako je sifra tacna
msgbox ("Correct password.")
speechobject.speak ("Correct password")
msgbox "Molim Vas da prilikom rada s računarom imate u vidu sledeće sugestije i informacije;",25,"Važno"