Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Vytvoriť nový PropertyBag o dimenzovaní a konkretizáciu to ako je ukázané v nasledujúcom kóde :
Dim objMyPropertyBag As New PropertyBag
2
Pridať majetok do svojho PropertyBag metódou WriteProperty . Táto metóda má dva povinné parametre a jeden voliteľný parameter . Tieto parametre sú názov pre vlastnosť , hodnota a predvolená hodnota v prípade potreby . Nižšie sú uvedené dva príklady pridávanie hodnoty . Prvý ukazuje štandardný prídavok na majetku a druhá ukazuje sčítanie s východiskovou hodnotou .
ObjMyPropertyBag.WriteProperty ( " MyNumber " , 74 ) objMyPropertyBag.WriteProperty ( " myString " , " hodnota reťazca " , " NULL " )
3
Načítať nehnuteľnosti z PropertyBag s metódou ReadProperty . Táto metóda má jeden povinný parameter pre názov vlastnosti a jeden voliteľný parameter pre predvolenú hodnotu . V tomto prípade , bude predvolená hodnota je vrátená len vtedy , ak neexistuje skutočná hodnota . ClipArt
Dim strRetrievedValue Ako StringstrRetrievedValue = objMyPropertyBag.ReadProperty ( " myString " )
Dim intFakeValue Ako IntegerintFakeValue = objMyPropertyBag . ReadProperty ( " MyNumber " , 0 )
4
Uvoľnite pamäť držanie vášho PropertyBag , keď sa prestanete používať ho nastavením na hodnotu Nothing .
Set objMyPropertyBag = Nothing