Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
variant premenná sa používa na ukladanie rôznych typov hodnôt , a to má vnútornú reprezentáciu hodnoty uložia . Variabilný variant vždy platí 16 bajtov pre ľubovoľnú hodnotu uloženú . VB automaticky spracováva prevody pri priradenie hodnoty k variante , čo eliminuje potrebu prevádzať akékoľvek prevody sami . Použite varianty premenné pre zachytenie hodnoty vrátené , keď neviete , čo tie funkcie riadenia sa vráti .
Ukladanie číselných hodnôt
VB bude používať najviac kompaktný reprezentáciu možné keď priradíte celé čísla pre variantné premenné . Pre malý počet , bude VB priradiť " Integer " zastúpenie pre danú hodnotu . VB bude automaticky priradiť " Long " typ dát pre veľké hodnoty uložené vo variante . VB vráti chybu , ak sa pokúsite vykonávať výpočty na variante , ktorá neobsahuje číslo . Je vhodné použiť funkciu " IsNumeric " , aby ste zistili , či premenná variant obsahuje čísla , než ju použijete vo výpočte .
Ukladanie reťazcové hodnoty
ukladanie reťazcové hodnoty na variantné premennej môže spôsobiť problémy , ak si nedáte pozor na to , ako ich budete používať vo vašom programe . Môžete si uložiť reťazec k variante , a to bude ukladať hodnotu bez problémov . Uložíte Ak reťazec čísel variant a neskôr ho použiť s " + " operátor na inú variantu , potom VB bude ho previesť na čísla , aby sa pokúsili vykonať sčítanie . Aby sa ubezpečil , nemusíte mať chybu pri práci s reťazcové hodnoty vo variantoch , používajú " & " operátor , keď potrebujete zreťazenie reťazcov varianty .
Ukladanie dát /čas Hodnoty
Môžete tiež použiť varianty premennej na uloženie hodnoty dátumu /času v rozmedzí od 1. januára 2010 do 31. decembra 9999 . Okrem toho môžete vykonávať matematické operácie na varianty , ktoré obsahujú dátum /časovej hodnoty . Podobne ako pri funkcii " IsNumeric " môžete tiež použiť funkciu " isda " , aby ste zistili , či variant premenná obsahuje hodnotu dáta . Nasledujúci je príkladom toho , ako možno použiť funkciu " isda " na varianty :
Dim Someday , daysleftIf isda ( Text1.Text ) ThenSomeDate = CDATA ( Text1.Text ) daysleft = DateSerial ( Year ( Someday ) + _1 , 1 , 1 ) - SomeDateText2.Text = daysleft & " . dní, ktoré zostávajú v roku " ElseMsgBox Text1.Text & " nie je platný dátum . " End If