Az Enabled tulajdonság

A kísérletben megvizsgáljuk az űrlapelemek Enabled tulajdonságának az űrlapelemek működésére gyakorolt hatását.
A kísérlethez szükséges, hogy a Visual Basic fejlesztőkörnyezet számítógépünkre telepítve legyen.
A kísérlet előkészítése:
Hozzunk létre egy új Standard Exe projectet!
A projectben található űrlapon helyezzünk el egy szöveges mezőt és egy parancsgombot. A parancsgombra duplán kattintva hozzuk létre az alábbi eljárást:
Private Sub Command1_Click()
MsgBox "Ön a parancsgombra kattintott."
End Sub
A kísérlet lépései:
Vizsgáljuk meg az űrlap és az egyes űrlapelemek Enabled tulajdonságát! Láthatjuk, hogy alaphelyzetben minden objektum Enabled tulajdonsága True, azaz a felhasználói interakció engedélyezve van.
Futtassuk a programot és próbáljuk meg használni az űrlapelemeket! Láthatjuk, hogy az egyes elemek a Windowsban megszokott módon használhatók. A szöveges mezőbe tetszőleges szöveget gépelhetünk be, a parancsgombra kattintva megjelenik az „Ön a parancsgombra kattintott.” üzenetpanel, az űrlap pedig méretezhető, minimalizálható, maximalizálható, illetve bezárható. Zárjuk be az űrlapot.
Állítsuk a szöveges mező (Text1) és a parancsgomb (Command1) Enabled tulajdonságait False értékre. Ezzel letiltjuk az adott űrlapelemekkel való felhasználói interakciót.
Futtassuk a programot és próbáljuk meg használni az űrlapelemeket! Láthatjuk, hogy az egyes elemek használata nem lehetséges. A szöveges mezőbe nem tudunk begépelni, a parancsgombra kattintva pedig semmi sem történik. Az űrlapelemek tiltott állapotát a Windows az elemek alapértelmezettől eltérő megjelenítésével jelzi. A szöveges mező tartalma szürke, a parancsgomb felirata pedig gravírozás hatású. Az űrlap Enabled tulajdonsága továbbra is True, ezért az továbbra is a megszokott módon használható. Zárjuk be az űrlapot.
Próbáljuk ki, mi történik, ha egy űrlapelem Enabled tulajdonságát futásidőben változtatjuk meg. Ehhez állítsuk a parancsgomb (Command1) Enabled tulajdonságát True értékre, és módosítsuk a Command1_Click eljárást az alábbiak szerint:
Private Sub Command1_Click()
Text1.Enabled = Not Text1.Enabled
If Text1.Enabled Then
MsgBox "A bevitel engedélyezve"
Else
MsgBox "A bevitel letiltva"
End If
End Sub
Futtassuk a programot! Próbáljuk meg gépelni a szöveges mezőbe, majd kattintsunk a parancsgombra és próbáljunk meg ismét gépelni a szöveges mezőbe. Láthatjuk, hogy a parancsgomb segítségével a szöveges mező használata engedélyezhető és letiltható. Zárjuk be az űrlapot.
Próbáljuk ki az Enabled tulajdonság űrlapra gyakorolt hatását. Ehhez állítsuk az űrlap (Form1) Enabled tulajdonságát False értékre.
Futtassuk a programot és kíséreljük meg az űrlap használatát. Ebben az esetben azt tapasztaljuk, hogy az űrlap nem használható: az űrlap nem méretezhető, a minimális és maximális méret, és a bezárás gomb nem működik, valamint az űrlapelemek használata sem lehetséges, annak ellenére, hogy a parancsgomb Enabled tulajdonsága True értékre van állítva. A program leállításához használjuk a Visual Basic fejlesztőkörnyezet Run menüjének End parancsát vagy az eszköztár End gombját.
Következtetés:
Az Enabled tulajdonsággal megakadályozhatjuk, hogy a felhasználó valamely űrlapelemet vagy az űrlapot használja. Az űrlap Enabled tulajdonságának False értékre állítása az űrlapelemek használatát is letiltja, függetlenül azok Enabled tulajdonságának állapotától. Az Enabled tulajdonság futásidőben is módosítható.