Funcția StrComp

Notă: Dorim să vă oferim cel mai recent conținut de ajutor, cât mai rapid posibil, în limba dvs. Această pagină a fost tradusă automatizat și poate conține erori gramaticale sau inexactități. Scopul nostru este ca acest conținut să vă fie util. Vă rugăm să ne spuneți dacă informațiile v-au fost utile, în partea de jos a acestei pagini. Aici se află articolul în limba engleză, ca să îl puteți consulta cu ușurință.

Returnează o Variant (număr întreg) care indică rezultatul unei expresie șir.

Sintaxă

StrComp ( șir1, șir2 [compară ] )

Sintaxa funcției StrComp are următoarele argumente:

Argument

Descriere

șir1

Sunt necesare. Orice expresie șir validă.

șir2

Sunt necesare. Orice expresie șir validă.

comparație între

Opțional. Specifică tipul de comparații șir. Dacă comparaargument este Null, apare o eroare. Dacă Comparați este omis, setarea Opțiunea Comparați determină tipul de comparație.


Setări

Comparație între argumentul setările sunt:

Constantă

Valoare

Descriere

vbBinaryCompare

0

Efectuează o comparație binar.

vbTextCompare

1

Efectuează o comparație textuale.

vbDatabaseCompare

2

Microsoft Office Access 2007 doar. Efectuează o comparație pe baza informațiilor din baza de date.


Returna valori

Funcția StrComp are următoarele valori de returnare:

Dacă

StrComp returnează

șir1 este mai mic decât șir2

-1

șir1 este egal cu șir2

0

șir1 este mai mare decât șir2

1

șir1 sau șir2 este Null

Null


Exemplu

Notă: Exemplele următoare demonstrează utilizarea acestei funcții într-un Visual Basic pentru modul Applications (VBA).

Acest exemplu utilizează funcția StrComp pentru a returna rezultatele unei comparații șir. Dacă al treilea argument este 1, efectuându o comparație textuale; Dacă al treilea argument este 0 sau omis, se efectuează o comparație binar.

Dim MyStr1, MyStr2, MyComp
MyStr1 = "ABCD": MyStr2 = "abcd" ' Define variables.
MyComp = StrComp(MyStr1, MyStr2, 1) ' Returns 0.
MyComp = StrComp(MyStr1, MyStr2, 0) ' Returns -1.
MyComp = StrComp(MyStr2, MyStr1) ' Returns 1.
Extindeți-vă competențele Office
Explorați instruirea
Fiți primul care obține noile caracteristici
Alăturați-vă utilizatorilor Office Insider

Au fost utile aceste informații?

Vă mulțumim pentru feedback!

Vă mulțumim pentru feedback! Se pare că ar fi util să luați legătura cu unul dintre agenții noștri de asistență Office.

×