Variabilele obiectului universal (variabilele declarate ca Object) conțin obiecte din orice clasă. Când se utilizează variabile de tip Object, este posibil să fie nevoie să luați diferite acțiuni în funcție de clasa obiectului; de exemplu, unele obiecte pot să nu accepte o proprietate sau o anumită metodă. Visual Basic oferă două instrumente pentru determinarea tipului de obiect stocat în variabila obiect: funcția TypeName și operatorul TypeOf. Este.
Funcția TypeName returnează un șir. Această funcție este cea mai convenabilă dacă doriți să salvați sau să afișați numele clasei de obiecte, așa cum se arată în următorul fragment de cod:
Operatorul TypeOf. Este mai convenabil la verificarea tipului de obiect, deoarece funcționează mult mai repede decât operația de comparare a șirurilor echivalente cu TypeName. Următorul fragment de cod utilizează TypeOf. Este în interiorul instrucțiunii If. Apoi. Altfel.
Și acum câteva cuvinte de prudență. Operatorul TypeOf. Se întoarce Adevărat. dacă obiectul este de un anumit tip sau este derivat dintr-un anumit tip. Aproape totul din Visual Basic se face folosind obiecte care conțin anumite elemente care nu sunt în mod normal considerate obiecte, cum ar fi șiruri de caractere și numere întregi. Aceste obiecte sunt derivate și moștenite de la Object. Când trimiteți Integer și calculați cu Object operatorul TypeOf. Se întoarce Adevărat. Următorul exemplu raportează că parametrul InParam este de asemenea un obiect. și Integer.
Exemplul următor utilizează, de asemenea, TypeOf. Este. și TypeName pentru a determina tipul obiectului trecut în argumentul Ctrl. Procedura TestObject solicită ShowType cu trei tipuri diferite de controale.
Pentru a executa eșantionul
Creați un nou proiect de aplicație Windows și adăugați comenzi Buton. CheckBox și RadioButton pe formular.
Utilizați butonul din formular pentru a apela procedura TestObject.
Adăugați în formular următorul cod:
Concepte de bază
Adăugări la nivel comunitar
Afișare: Mijlocit protejat
Această pagină a fost utila? Da, nu
Au rămas 1500 de caractere
Mulțumesc! Vă mulțumim pentru feedbackul dvs. Opinia dvs. este foarte importantă pentru noi.