Källkoden för /anders.enges/ado/enum.asp
<!--#include file="../inc/navstuff.asp" -->
<p>Ett exempel på Enum värden i VB är vbOKCancel som finns för MsgBox.</p>
<p>En enum fungerar som en konstant men har den egenskapen att de dyker upp i "listan"
när vi skriver in kod i VB:s editor. <p>
<p>Jag har här satt några förteckningar över olika typer av Enum som vi kan behöva känna till i ADO</p>
<p>Enum är MYCKET användbara och enkla att göra själv. Prova gärna följande i ett program:</p>
<p>Skriv först in följande:</p>
<div class="code">
Enum SkolKlasser<br />
   Mulli = 1<br />
   LiteÄldre = 2<br />
   ÄnnuÄldre = 3<br />
   Äldst = 4<br />
   ÖverÅriga = 5<br />
End Enum<br />
<br />
Sub KlassVal(klass As SkolKlasser)<br />
   ' gör något<br />
End Sub<br />
<br />
Sub testarSkolKlass()<br />
   <br />
End Sub<br /><br />
</div>
<p>Gå sedan in i proceduren testarSkolKlass() och börja skriva det som är markerat med fetstil nedan:</p>
<div class="code">
Sub testarSkolKlass()<br />
   <b>KlassVal </b><br />
End Sub<br /><br />
</div>
<p>Lägger ni märke till vad som händer när ni slår ett mellanslag efter KlassVal ?</p>
<p>Resultatet blir</p>
<div class="code">
<table border="0"><tr><td valign="top"><b>KlassVal </b></td><td><img src="../images/mulli.gif" alt="Mulli" /></td></tr>
</table>
</div>
<p>Det finns mycket intressanta användningsoråden för <b>Enum</b>!</p>
<!--#include file="../inc/footer.asp" -->