VBA felhasználói űrlapok létrehozása

VBA Userforms

A Userform a VBA programozásának nagyon fontos része. Lehetővé teszi professzionális megjelenésű felhasználói felület létrehozását a VBA -alkalmazás felhasználóival való kommunikációhoz. Ezenkívül lehetővé teszi, hogy teljes mértékben irányítsa a felhasználót abban, hogy mit csinál a munkafüzetével.

Természetesen a munkalap celláival is elfogadhatja a felhasználó paramétereit, de a userform sokkal jobb felhasználói élményt nyújt.

Ha kiterjeszti a felhasználói űrlap magasságát és szélességét az Excel ablak méretére, úgy teheti úgy az alkalmazást, mint egy normál Windows -alkalmazást, és a felhasználó egyáltalán nem tudja, hogy az Excel -t használja gazdagépként.

Az összes normál Windows -vezérlő, például a legördülő listák, a listamezők, a jelölőnégyzetek elérhetők. A felhasználói élmény fokozása érdekében számos módszert, eseményt és tulajdonságot használhat.

Fontos szempont, hogy amikor egy beépített vagy modális felhasználói űrlapot jelenít meg, akkor nem tudja szerkeszteni a kódot a VBE -ben, és nem fér hozzá semmilyen Excel -funkcióhoz. A kurzor csak az űrlap bezárása után jelenik meg a kódban.

Beépített VBA Userforms

Az Excel VBA több beépített űrlapként használható a felhasználóval való kommunikációhoz.

Üzenetdoboz

Ez a leggyakrabban használt forma a VBA -ban. Egyszerűen szöveges üzenetet jelenít meg, esetleg tájékoztatva a felhasználót, hogy érvénytelen bevitelt adott meg, vagy hogy a VBA folyamat befejeződött. A legegyszerűbb formában szöveges karakterláncot jelenítenek meg, de hozzáadhat egy ikont, például kérdőívet vagy felkiáltójelet, és más címet adhat az üzenetmezőnek.

Ez egy alapvető példa. Csak egy gombra kell kattintani, és a címsorban a „Microsoft Excel” felirat olvasható

Ennek előállításához szükséges kód nagyon egyszerű:

123 Sub TestMsgBox ()MsgBox "Ez a folyamat befejeződött"End Sub

Különböző paramétereket használhat gombok, ikonok hozzáadásához és a címsor megváltoztatásához

123456789 Sub TestMsgBox ()Dim Ret mint változatRet = MsgBox ("Biztos vagy benne?", VbYesNo Vagy vbQuestion, "Saját alkalmazás")Ha Ret = vbIgen Akkor- Itt a te folyamatodMásKilépés a SubbólVége HaEnd Sub

Ez a kód hozzáad egy „Igen” és „Nem” gombot és egy kérdőjel ikont, és beállítja a címsort. Ne feledje, hogy az üzenetmező stílusait az „Vagy” operátorral kombinálhatja

Ezenkívül, amikor értéket ad vissza egy üzenetablakból, a visszatérési változót változatként vagy vbMsgBoxResult -ként kell meghatározni, és az üzenetdoboz utasításának zárójeleket kell használnia,

Bemeneti doboz

Van egy nagyon egyszerű beviteli mező a VBA -ba, bár meglehetősen korlátozó abban, hogy mit tehet vele. Ha teheti, jobb egyéni felhasználói űrlapot tervezni

12345 Sub TestInputBox ()Dim Ret mint karakterláncRet = InputBox ("Kérjük, írja be a nevét", "Írja be a nevet")MsgBox RetEnd Sub

A paraméterekhez hozzáadhat egy alapértelmezett értéket is.

Nyissa meg a megnyitott fájlnevet

Ez lehetővé teszi, hogy kihasználja a Windows fájl párbeszédpanelt a VBA -kódban. Nagyon lenyűgözőnek tűnik a felhasználó számára futás közben, de nagyon egyszerű beépíteni, és automatikusan megkapja a fájl párbeszédpanel összes funkcióját.

A kód korlátozza a felhasználót, hogy csak Excel fájlokat lásson. Sajnos be tudtak írni egy nem Excel fájlnevet a Fájlnév mezőbe, és rákattintottak a Megnyitás gombra, így szüksége lesz egy kódra annak biztosítása érdekében, hogy az Excel fájl ki legyen választva.

A „ChDir” paranccsal módosítsa az alapértelmezett könyvtárat a saját igényeihez, mielőtt megjelenne a fájl párbeszédpanel

Jegyezze meg a helyettesítő karakterek használatát a FileFilter paraméterben. A megjelenítendő Excel fájlok 2007 előttiek lehetnek, makrókkal vagy binárisak lehetnek, így a szűrő „.xls*”.

123456 Sub TestFileDialog ()Saját fájl törlése karakterlánckéntChDir "C: \ temp"MyFile = Application.GetOpenFilename ("Excel fájlok (*.xls*),*. Xls*", "Fájl kiválasztása")MsgBox MyFileEnd Sub

Ha szükséges, engedélyezheti a felhasználó számára, hogy egyszerre több fájlt válasszon ki a MultiSelect paraméter használatával. Az alapértelmezett False (csak egyszeri kiválasztás)

12345678 Sub TestFileDialog ()Dim MyFile mint változatChDir "C: \ temp"MyFile = Application.GetOpenFilename ("Excel fájlok (*.xls*),*. Xls*", "Fájl kiválasztása",, Igaz)Minden f A MyFile -banMsgBox fKövetkező fEnd Sub

Több fájl kijelöléséhez a felhasználó lenyomva tartja a Shift billentyűt a fájl párbeszédpanelen.

A Minden egyes ciklus megjeleníti a kiválasztott fájl teljes elérési útját és nevét

Excel alapértelmezett párbeszédpanelei

Az Excel VBA -n belül van egy Dialogs gyűjtemény, amellyel bármilyen szabványos Excel párbeszédpanelt megjeleníthet. A hátránya, hogy nem férhet hozzá a felhasználó által kiválasztott paraméterekhez, vagy nem változtathatja meg a párbeszédpanel megjelenését, de ezek a párbeszédpanelek hasznosak lehetnek, ha a felhasználót egy szabványos Excel -funkcióra irányítják, és lehetővé teszik számára, hogy a párbeszédpanelen belül meghatározott paramétereket válasszon.

Jó példa erre a VBA „Nyomtatás” párbeszédpanelének megjelenítése:

123 Sub TestPrintDialog ()Application.Dialogs (xlDialogPrint). MegjelenítésEnd Sub

Amikor megnyitja a zárójeleket a Párbeszédpanelek gyűjteményben, megjelenik a beépített párbeszédablakok hatalmas számú konstansának listája. Érdemes kísérletezni ezekkel a lehetőségekkel a kódon belül

Új felhasználói űrlap beszúrása

Saját egyéni felhasználói űrlapokat tervezhet úgy, hogy behelyez egy felhasználói űrlapot a Visual Basic Editorba (VBE)

Ezt a Beszúrás | UserForm a VBE menüsorban.

Kattintson a „UserForm” gombra, és megjelenik egy új üres űrlap, amely készen áll a fejlesztésre

Maga a tényleges űrlap („UserForm1” néven jelenik meg) meglehetősen kicsi, de a körülötte lévő fogantyúk segítségével nagyíthatja vagy még kisebbre teheti a fogantyúkat a kurzorral.

A képernyő bal alsó sarkában van egy tulajdonságok ablak. Mivel a hangsúly közvetlenül az űrlapon van, ez tartalmazza az adott űrlapra jellemző tulajdonságokat.

Ne feledje, hogy amikor elkezdi hozzáadni a vezérlőket, például a kombinált mezőket és a parancsgombokat, ezeknek a vezérlők mindegyikének megvan a saját tulajdonsága, és nagyon eltérő lehet, hogy mit tehet mindegyikkel.

A jelenleg látható tulajdonságok csak magára az űrlapra vonatkoznak.

A „Név” tulajdonság az űrlapobjektum definiálására használt név a VBA -kódon belül. Érdemes valami értelmesebbet használni az objektumnévhez, hogy a kód felülvizsgálatakor nyilvánvaló legyen, hogy melyik űrlapot használja.

A „Név” tulajdonság a képernyő bal felső sarkában található „Projekt-felfedező” ablakba is megjelenik

Az űrlap címsorát másra szeretné módosítani, mint a „UserForm1”, és ezt úgy teheti meg, hogy beírja az új szöveget a „Felirat” tulajdonságba

Hatalmas számú változtatást hajthat végre azon, hogyan látja az űrlapot a felhasználó. Módosíthatja a színeket, hozzáadhat képeket, pl. vállalati logó, módosítsa a pozíciót a „Bal” és „Felső” gombokkal, módosítsa a méretet a „Magasság” és a „Szélesség” használatával, módosítsa az egérmutatót és még sok más

Mindezek a tulajdonságok programozhatóan is módosíthatók az űrlaphoz hozzáadott vezérlők esetén. Például egy felhasználó választhat a listamező vezérlőjéből, és a felhasználó választása alapján letilthatja vagy elrejtheti a többi vezérlőt

Az Eszköztár használata

Észre fogja venni, hogy amikor magára az űrlapra kattint, megjelenik egy eszköztár előugró ablak. Ha bárhol máshol rákattint pl. a tulajdonságok ablaktáblán, eltűnik, de újra megjelenik, amikor rákattint az űrlapra.

Az eszköztár biztosítja az űrlaptervezés valódi mechanikáját. Ez lehetővé teszi a felhasználók által jól ismert normál Windows -vezérlők hozzáadását az űrlaphoz.

Észre fogja venni, hogy az űrlapon pontok hálózata található. Ez egy „snapgrid”, így amikor vezérlőt ad hozzá az űrlaphoz, az automatikusan hozzáigazítja a pozíciót a pontok soraihoz és oszlopaihoz. Ez óriási segítséget nyújt a kezelőszervek összehangolásában, nehogy a kezelőszervek rongyos megjelenést kapjanak

Ha rákattint egy vezérlőre, és úgy dönt, hogy nem használja, akkor az eszköztár bal felső sarkában található „Nyíl” ikonra kattintva a kurzor visszaáll normál állapotba.

További eszközöket adhat hozzá az eszköztárhoz az Eszközök | További vezérlők a VBE menüben. Ezek közül rengeteg elérhető, de a Windows és az Excel verziótól függően nem mindig működnek, ezért gyakran kísérletezni kell.

Továbbá előfordulhat, hogy a felhasználók nem férnek hozzá ezekhez a kiegészítő vezérlőkhöz, vagy a Windows és az Excel régebbi verzióit futtatják, ami problémákat okozhat. Nagy szervezetekben, különösen, ha globálisak, nincs olyan, mint egy szabványos felépítésű PC, amelyre támaszkodhat!

Kilépés gomb hozzáadása az űrlaphoz

A Parancs gomb egyszerűen hozzáadható az űrlaphoz. Ez ugyanúgy néz ki, mint a gombok, amelyeket más Windows űrlapokban lát, általában „OK” vagy „Mégse” gombként.

Kattintson az eszköztárban a Parancsgomb ikonra. Ez a második ikon balról az alsó sorban. Lásd a fenti képet. Az „ab” betűk vannak rajta.

Vagy tartsa lenyomva az egérgombot, és húzza a vezérlőt az űrlapra, vagy vigye a kurzort az űrlapra, ahol az „kereszt” kurzorra változik, és beállíthatja a gomb helyzetét és méretét

Ha a vezérlőt az űrlapra húzza, akkor a gomb alapértelmezett méretét kapja. Ha a kurzort az űrlapra helyezi, módosíthatja a gomb méretét a „kereszt” kurzor áthúzásával az űrlapon

Az űrlap most így fog kinézni:

A gomb alapértelmezett szövege lesz a felirat, de módosítani kell a saját igényei szerint. A gombra kattintva rákattinthat a szövegre (‘CommandButton1’), és ezzel közvetlenül szerkesztheti a feliratot.

A tulajdonságok ablakban (a képernyő bal alsó sarkában) is módosíthatja. Látni fogja a „Felirat” nevű tulajdonságot, és szerkesztheti ennek értékét. Változtassa ezt „Kilépésre”

Az űrlaptulajdonságokhoz hasonlóan a „Név” tulajdonság határozza meg a VBA -kódban használt nevet. Érdemes olyan nevet használni, amely értelmesebb és nyilvánvalóbb a kódban. Ezt beírhatja a „Név” tulajdonságba.

A gombot áthelyezheti az űrlapon húzva, és átméretezheti, ha rákattint a gombok fogantyúira (fehér négyzet alakú dobozok), és húzza a fogantyúkat, hogy nagyobb vagy kisebb legyen

A gomb átméretezhető a Magasság és Szélesség értékek megváltoztatásával a tulajdonságok ablakban

Az űrlapot megtekintheti az Excelben, ha rákattint a zöld háromszögre a VBE eszköztáron, vagy megnyomja az F5 billentyűt

Az űrlapot a modulon belüli VBA -kódból hívhatja a „Show” módszer használatával

123 Sub ShowForm ()UserForm1.ShowEnd Sub

A felhasználói űrlap gyakorlatilag globális objektum, és a kódon belül bárhonnan meghívható

Jelenleg a parancsgombja nem tesz semmit, mert nincs mögötte VBA kód. Ezt magadnak kell megírnod! Jelenleg csak annyi történhet, hogy rákattint az űrlap jobb felső sarkában található „Bezárás” X-re.

A VBA kód hozzáadásához kattintson duplán az űrlapon található gombra

Ez a normál VBA -kód ablakhoz vezet, és megjeleníti az alapértelmezett kattintási eseményt.

Az „Elrejtés” módszert használja az űrlap bezárásához, és bármilyen más kódot is hozzáadhat, például egy üzenetdobozt, amely megerősíti a felhasználó számára, hogy mi történt.

Ne feledje, hogy a kódablak tetején két legördülő menü található. Az első lehetővé teszi az űrlapvezérlők kiválasztását, a második pedig a kód hozzáadásához rendelkezésre álló összes eseményt mutatja. A gombok számára nyilvánvaló a „Kattintás” esemény, de vannak olyanok is, mint a „Kettős kattintás” vagy az „Egérmozgatás”

Amikor most futtatja az űrlapot, a gomb valóban tesz valamit. Az űrlap eltűnik, és megjelenik egy üzenetmező, amely megerősíti az űrlap bezárását

Természetesen növelheti a kilépési kódot. Előfordulhat, hogy másik űrlapot szeretne megjeleníteni, vagy intézkedni szeretne a felhasználó által az űrlapon megadott paraméterekről

Címkevezérlő hozzáadása az űrlaphoz

A címkevezérlők arra ösztönzik a felhasználót, hogy milyen adatokat kell bevinnie egy vezérlőhöz az űrlapon, pl. szövegmező, legördülő menü stb. A címkék alapértelmezés szerint nem rendelkeznek szegéllyel, de szükség esetén a tulajdonságok ablakon keresztül hozzáadhatók.

Vezérlőként csak a felhasználó számára olvashatók, és egyszerűen egy módja annak, hogy szöveget tegyenek az űrlapra, legyen az félkövér címsor, vagy utasítás, hogy mit kell beírni vagy választani.

Címke hozzáadásához kattintson az „A” ikonra az eszköztárban (felső sor, balról második), és kattintson duplán rá, vagy vigye a kurzort az űrlapra, és válassza ki a pozíciót és a méretet.

A tulajdonságok ablak „Felirat” tulajdonságával vagy a címkevezérlőre kattintva megadhatja a címkevezérlő szövegét.

Ne feledje, hogy a szöveg a címkevezérlő méretének megfelelően csomagolódik, és ha a szövegsor túl hosszú, akkor nem jelenik meg teljesen az űrlapon, ezért ügyelni kell a címkevezérlő méretezésére.

A tulajdonságok ablak segítségével megváltoztathatja a címkevezérlő megjelenését, különböző színekkel, betűtípusokkal, hátsó stílusú pl. ha átfedi a képet, és azt szeretné, hogy átlátszó legyen

A címkevezérléshez nem kell kódot létrehozni. A fő cél az, hogy szöveget adjon hozzá az űrlaphoz, hogy a felhasználó láthassa, hogyan működik az összes többi vezérlő

Szövegvezérlő hozzáadása az űrlaphoz

A szövegvezérlő segítségével a felhasználó szöveget írhat be, például nevet vagy megjegyzéseket írhat be

A szövegvezérlőt az eszköztárból adhatja hozzá, ha rákattint a szövegvezérlő ikonra (felső sor, balról a harmadik), majd duplán kattint vagy húzza a vezérlőt az űrlapon.

A szövegvezérlőt gyakran összetévesztik a címkevezérlővel, de a szövegbevitel a felhasználói beviteli mód

Az „Írja be a nevét” szöveg egy címkevezérlő, amint azt korábban leírtuk, és most egy fehér szövegdoboz áll a felhasználó rendelkezésére, hogy beírjon valamit

A Tulajdonságok ablakban módosíthatja a színeket, a betűtípusokat, a speciális effektusokat, vagy jelszókaraktereket használhat a szövegdobozban. Hatalmas rugalmasság áll rendelkezésre

A szövegmezők egyik nagyon fontos tulajdonsága a „MultiLine” tulajdonság. Ha azt szeretné, hogy a felhasználó nagy mennyiségű szöveget írjon be a szövegvezérlőbe pl. megjegyzéseket, akkor a „MultiLine” tulajdonságot True értékre kell állítani.

Ez az alapértelmezett érték a Hamis, ami azt jelenti, hogy bármekkora legyen is a szövegdoboz, a bevitt szöveg egy folyamatos sorban marad, és kilép a szövegmezőből. Nem fog körültekeredni a dobozon belül.

Nem jelenik meg előugró ablak, amikor jobb gombbal kattint a szövegmezőre futás közben, de a CTRL+V a Beillesztésnél, a CTRL+C pedig a Kivágásnál fog működni, ha a felhasználó ki akarja vágni és beilleszteni a szöveget alkalmazások

Ismét saját kódot kell írnia a felhasználó által beírt szöveg kezelésére. Érdemes átvinni azt egy munkalap cellájába

Ezt a kódot hozzáadhatja a szövegmező „Módosítás” eseményéhez

123 Privát alszövegBox1_Change ()Táblázatok ("Sheet1"). Tartomány ("A1"). Érték = TextBox1.ValueEnd Sub

Érdemes néhány ellenőrző kódot is beírni annak ellenőrzésére, hogy a felhasználó nem ad -e be szemetet, ami katasztrofális hatással lesz az alkalmazására

A változási esemény nem jó erre, mert minden alkalommal meghívják, amikor a felhasználó új karaktert ír be. A felhasználó elkezdhet gépelni egy szövegsort, és azonnal megállapíthatja, hogy megsértette az érvényesítési szabályokat, mielőtt befejezte az érvényes szöveget.

A „Kilépés” eseményt használja. Ez akkor aktiválódik, amikor a felhasználó az űrlap másik vezérlőjére helyezi a fókuszt, ami azt jelenti, hogy a felhasználó már nem ad meg adatokat.

123456 Privát alszövegBox1_Exit (ByVal Mégse mint MSForms.ReturnBoolean)Ha IsNull (TextBox1.Value) Vagy Len (TextBox1.Value) <4 AkkorMsgBox "A név érvénytelen", vbCriticalTextBox1.SetFocusVége HaEnd Sub

Amikor a felhasználó rákattint egy másik vezérlőelemre az űrlapon, ez a kód vagy a szövegmezőben lévő null értéket, vagy kevesebb, mint 4 karaktert tesztel. Ha a teszt igaz, akkor megjelenik egy kritikus ikonnal ellátott üzenetdoboz, amely tájékoztatja a felhasználót arról, hogy a név érvénytelen, és a fókusz visszakerül a sértő szövegdobozba, hogy a felhasználó kijavítsa.

Ne feledje, hogy még ha a felhasználó a Kilépés gombra is kattint, a szövegmezőből való kilépési esemény kerül végrehajtásra először, így ez megakadályozza, hogy a felhasználó kilépjen a bevitel javítása nélkül

Események inicializálása és aktiválása egy űrlapon

Amikor a VBA először létrehoz és felépít egy űrlapot, egy „Initialize” eseményt vált ki. Mivel azonban az űrlap ezen a ponton is megjelenik, aktivál egy eseményt is. Ettől kezdve minden alkalommal, amikor az űrlap megjelenik a „Show” módszerrel, vagy az űrlapok hierarchiájának részeként jelenik meg, akkor az „Activate” esemény aktiválódik, de nem az „Initialize” esemény

Az „Inicializálás” esemény csak egyszer történik meg, de az „Aktiválás” esemény sokszor előfordulhat

Az űrlapon érdemes beállítani az alapértelmezett értékeket a munkalapon a beviteli vezérlőkben, pl. szövegmezőket, hogy ezek megjelenjenek az űrlap első használatakor, de a felhasználó felülírhatja az alapértelmezett értékeket, és ezek az új értékek a kód futása közben is a helyükön maradnak

12345678 Privát alfelhasználóForm_Initialize ()TextBox1.Value = Táblázatok ("Sheet1"). Tartomány ("A1"). ÉrtékHa TextBox1.Value = ”” AkkorTextBox1.Visible = HamisMásTextBox1.Visible = IgazVége HaEnd Sub

Az „Initialize” esemény a kódablak második legördülő menüjében, a userform név pedig az első legördülő menüben található.

Ez a kód a „Sheet1” A1 cellájának értékét használja alapértelmezett értékként a cikkben korábban létrehozott szövegmezőben. Az űrlap első megjelenésekor megjelenik az alapértelmezett érték. A felhasználó ezután felülírhatja az alapértelmezett értéket, és ez megmarad. Ha a CellA1 üres, a szövegmező el lesz rejtve, különben látható lesz

Az alapértelmezett érték is kódolható:

1 TextBox1.Value = "John Smith"

Azt is meg kell győződnie arról, hogy a felhasználó által megadott értékek újra megjelennek, amikor a felhasználó az adott űrlapot az adott Excel-munkamenet során aktiválja. A VBA-kód könnyen visszaírhatja az értékeket a munkafüzet celláiba a vezérlőelem „Kilépés” eseménye segítségével, és újra beillesztheti őket az űrlap „Aktiválás” eseményével

123 Privát alszövegBox1_Exit (ByVal Mégse mint MSForms.ReturnBoolean)Táblázatok ("Sheet1"). Tartomány ("A10"). Érték = TextBox1.ValueEnd Sub
123 Privát alfelhasználóForm_Activate ()TextBox1.Value = Táblázatok ("Sheet1"). Tartomány ("A10"). ÉrtékEnd Sub

Ez a kód kitartóvá teszi a felhasználó értékeit, és biztosítja, hogy azok a munkafüzet többi részével együtt el legyenek mentve

A jelentkezés és az űrlapok mentése

Amikor elmenti az űrlapokat tartalmazó Excel -munkafüzetét, az összes űrlap és azok VBA -kódja is mentésre kerül. Mindazonáltal az űrlapok megjelenítésük során megőrzött értékei elvesznek.

Fontos, hogy írjon kódot, hogy amikor a felhasználó kilép a munkafüzetből vagy az űrlapból, az értékek vissza legyenek írva a munkafüzet celláiba, és így megmaradjanak.

Modális és nem modális formák

Az űrlapnak van egy „Show Modal” tulajdonsága. Ez alapértelmezés szerint Igaz, de megváltoztatható Hamis (nem modális) értékre

Ha egy űrlap modális, az azt jelenti, hogy az Excel egyik funkciója sem érhető el az űrlap megjelenítése közben. Ez magában foglalja a kódot a VBE ablakban. Megtekintheti a kódot, de a kurzor és a billentyűzet le van tiltva.

Nem modális formában az űrlap megjelenítése közben elérheti az összes Excel funkciót, beleértve a VBE ablakot is.

Ez a felhasználói viselkedés szabályozásának szempontjából fontos

Űrlap bezárása

Bármennyire jól is írja be a kódot, hogy kényszerítse a felhasználót egy bizonyos útvonalon, könnyen megkerülheti azt, ha rákattint a „Bezárás” X gombra az űrlap jobb felső sarkában

Ezt megakadályozhatja az űrlap „QueryClose” eseményének módosításával

1234 Privát alfelhasználóForm_QueryClose (Mégsem egészként, Bezárás mód egészként)Mégse = IgazMsgBox "Ez a művelet le van tiltva"End Sub

A „QueryClose” esemény akkor aktiválódik, amikor a felhasználó az űrlap „Bezárása” X -re kattint. Ez a kód törli a műveletet, így a felhasználó kénytelen használni a „Kilépés” gombot és a mögötte lévő kódot.

Vezérlők engedélyezése és letiltása

Az űrlap összes vezérlőjének van egy „Engedélyezett” nevű tulajdonsága, amely Igaz vagy Hamis értékre van állítva. Ha hamis, akkor a vezérlő szürkén jelenik meg. Látható, de nem használható.

Van egy „Visible” nevű tulajdonság is, amely ismét igaz vagy hamis értékre van állítva.

Írhat kódot, hogy vagy használhatatlanná tegyen egy bizonyos vezérlőt, vagy teljesen láthatatlanná tegye a felhasználó számára. A „Ha” utasítás használatával kiválaszthatja azokat a körülményeket, amikor ezt meg kell tennie

Például először letilthatja a „Kilépés” gombot, amíg a felhasználó be nem ír egy értéket a TextBox1 -be (név)

123 Privát alfelhasználóForm_Initialize ()CommandButton1.Enabled = HamisEnd Sub
1234567 Privát alszövegBox1_Change ()Ha Len (TextBox1.Value)> 0 AkkorCommandButton1.Enabled = IgazMásCommandButton1.Enabled = HamisVége HaEnd Sub

Ez a kód az „Inicializálás” eseményformát használja a kilépés gomb (1. parancsgomb) letiltásához, amikor az űrlap először megjelenik, majd a „Módosítás” esemény használatával a TextBox1 -en (név) engedélyezi a Kilépés gombot, ha valamit beírt vagy letiltott ha a doboz üres.

A „Módosítás” esemény minden alkalommal aktiválódik, amikor új karaktert ír be vagy törli a szövegmezőből. Ha a felhasználó szöveget szeretne beírni, hogy engedélyezze a gombot, majd törli az összes szöveget, a gomb azonnal letiltásra kerül

Segít a fejlesztés a helyszínen, megosztva az oldalt a barátaiddal

wave wave wave wave wave