free webpage counters
ETUSIVU materiaalit

12 VBScript: tapahtumakäsittelijät

VBScript-kieli mahdollistaa myös aliohjelmakutsujen kytkemisen erillisiin tapahtumiin. Tämä mahdollistaa Windows-ohjelmoinnista tuttuun tapahtumaohjatun ohjelmoinnin. Tässä kaksi esimerkkiä a la Jukka Selin. (Selin 2000.)


<HTML>
<HEAD>
<TITLE>VBScript-kokeilu</TITLE>
<SCRIPT LANGUAGE="VBScript">
<!--
Sub Otsikko1_onclick()
msgbox "Nyt klikkasit minua hiirellä!"
End sub
Sub Otsikko2_onmouseover()
msgbox "Hiiri toisen otsikon päällä!"
End sub
Sub Otsikko3_onmouseover()
msgbox "Hiiri kolmannen otsikon päällä!"
End sub

-->
</SCRIPT>
</HEAD>
<H1 ID="Otsikko1">Klikkaa mua</H1>
<H1 ID="Otsikko2">Vedä hiiri mun päälle</H1>
<H1 ID="Otsikko3">Vedä hiiri mun päälle</H1>

</BODY>
<HTML>



<HTML>
<HEAD>
<TITLE>VBScript-kokeilu</TITLE>
<SCRIPT LANGUAGE="VBScript">
<!--
Sub Otsikko1_onmouseover()
document.bgcolor = "#FF0000"
End sub
Sub Otsikko2_onmouseover()
document.bgcolor = "#00FF00"
End sub
Sub Otsikko3_onmouseover()
document.bgcolor = "#0000FF"
End sub

-->
</SCRIPT>
</HEAD>
<H1 ID="Otsikko1">Punainen</H1>
<H1 ID="Otsikko2">Vihreä</H1>
<H1 ID="Otsikko3">Sininen</H1>

</BODY>
<HTML>