VBA līdzīgs operators (vienkārši piemēri) Kā lietot "Patīk" programmā Excel VBA?

Satura rādītājs

VBA Tāpat kā operators

Patīk ir operators VBA, un tas ir salīdzināšanas operators, kurš salīdzina doto virkni kā argumentu virkņu kopā un tas atbilst modelim, ja modelis ir saskaņots, tad iegūtais rezultāts ir patiess un, ja modelis neatbilst, tad iegūtais rezultāts ir nepatiess, tas ir iebūvēts operators VBA.

Neskatoties uz lielisko lietojumu, operators “LIKE” ir visvairāk nepietiekami izmantots operators. Es neesmu redzējis daudz cilvēku, kuri kodēšanā pilnībā izmantotu šo operatoru. Patiesībā es esmu viens no tiem, kurš šo operatoru neizmanto diezgan bieži. Operators “VBA LIKE” ļauj mums saskaņot virknes modeli ar pilnu virkni. Izmantojot VBA LIKE operatoru, mēs varam salīdzināt divas virknes ar doto patteru. Mēs varam pārbaudīt, vai virknē ir apakšvirkne VBA, vai arī mēs varam arī pārbaudīt, vai virkne satur kādu noteiktu formātu. Ja modelis sakrīt ar virkni, operators VBA LIKE atgriež vērtību TRUE vai arī FALSE.

Vienādojot virknes, mums ir jāizmanto aizstājējzīmes ar norādīto patteru. Zemāk ir aizstājējzīmes, kuras mēs izmantojam VBA LIKE operatorā.

  • Jautājuma zīme (?): To lieto, lai saskaņotu jebkuru virknes rakstzīmi. Piemēram, ja mums ir virkne “CAT” un modelis ir “C? T”, tad operators VBA LIKE atgriež vērtību TRUE. Ja virkne ir “CATCH un modeļi ir“ C? T ”, tad operators VBA LIKE atgriež FALSE.
  • Zvaigznīte (*): tas atbilst nullei vai vairāk rakstzīmēm. Piemēram, ja virkne ir “Good” un modelis ir “G ** d”, operators VBA LIKE atgriež vērtību TRUE.
  • Iekavas (()): tas atbilst jebkurai vienai iekavās norādītajai rakstzīmei.
  • (Char-Char): tas atbilst jebkurai atsevišķai rakstzīmei diapazonā Char-Char.
  • (! Rakstzīmes): Tas atbilst jebkurai atsevišķai rakstzīmei, kas nav sarakstā.
  • (! Char-Char): Tas atbilst jebkurai atsevišķai rakstzīmei, kas nav diapazonā Char-Char.

VBA LIKE operatora piemēri

Apskatīsim dažus VBA LIKE operatora piemērus tūlīt.

1. piemērs - ar jautājuma zīmi

Kods:

ApakšjautājumsMark_Example1 () Dim k As virkne k = "Labi", ja k Patīk "Iet? D", tad MsgBox "Jā" Vēl MsgBox "Nē" Beigas, ja Beigas Sub

Iepriekš minētajā kodā virkne ir piegādāta kā “Laba”, un modelis ir “Go? D”. Tā kā jautājuma zīme var atbilst vienai rakstzīmei, tā parādīs rezultātu kā “Jā”.

Tagad es nomainīšu virkni uz “Labrīt”.

Kods:

ApakšjautājumsMark_Example1 () Dim k As String k = "Labrīt", ja k Patīk "Go? D", tad MsgBox "Jā" Vēl MsgBox "Nē" Beigas, ja Beigas Sub

Šajā gadījumā tas parādīs “Nē”, jo virknei esam pievienojuši vēl vienu vārdu, ti, Rīts. Lai saskaņotu jebkuru rakstzīmju skaitu, mums jāizmanto zvaigznīte.

2. piemērs - ar zvaigznīti

Kods:

ApakšjautājumsMark_Example2 () Dim k As String k = "Labrīt", ja k Patīk "* Labi *" Tad MsgBox "Jā" Vēl MsgBox "Nē" Beigas, ja Beigas Sub

Iepriekš minētajā piemērā es esmu pievienojis divas zvaigznītes pirms un pēc rakstzīmes “* Labi *”. Tas sakritīs ar vārdu “Labi” virknē “Labrīt” un atgriezīsies “Jā”.

3. piemērs - ar iekavām ()

Kods:

ApakšjautājumsMark_Example3 () Dim k As String k = "Labrīt", ja k Patīk "* (M) *" Tad MsgBox "Jā" Vēl MsgBox "Nē" Beigas, ja Beigas Sub

Iepriekš minētais kods sakrīt ar vienu burtu, kas minēts iekavās “M”, un rezultātu atgriež kā “Jā”.

4. piemērs - ar iekavām un alfabētiem (AZ)

Kods:

ApakšjautājumsMark_Example4 () Dim k As String k = "Labrīt", ja k Patīk "* (AD) *" Tad MsgBox "Jā" Vēl MsgBox "Nē" Beigas, ja Beigas Sub

Iepriekš minēju rakstzīmes, kas sakrīt no A līdz D.

Tas atgriezīs “Nē”, jo virknē “Labrīt” nav rakstzīmju no A līdz D.

Tagad es mainīšu modeli uz (AH)

Kods:

ApakšjautājumsMark_Example4 () Dim k As String k = "Labrīt", ja k Patīk "* (AH) *" Tad MsgBox "Jā" Vēl MsgBox "Nē" Beigas, ja Beigas Sub

Tas atgriezīs “Jā”, jo no A līdz H mums ir raksturs “G” virknē “Labrīt”.

Šādi mēs varam izmantot VBA operatoru “LIKE”, lai jebkuru virkni no parauga saskaņotu ar aizstājējkaršu rakstzīmēm.

Interesanti raksti...