Funcția Mid

Important : Acest articol este tradus automat, consultați exonerarea de răspundere. Versiunea în limba engleză a acestui articol se poate găsi aici pentru referință.

Returnează o valoare variant (șir) care conține un număr specificat de caractere dintr-un șir.

Sintaxă

Mid ( șir, start [lungime ] )

Sintaxa funcției Mid are următoarele argumente:

Argument

Descriere

șir

Sunt necesare. expresie șir din care sunt returnate de caractere. Dacă șirul conține Null, nule se returnează.

început

Sunt necesare. Lungă. Caracterul poziția în șir la care să fie aplicate partea începe. Dacă începeți este mai mare decât numărul de caractere din șirul, Mid întoarce un șir de lungime zero ("").

lungime

Opțional. Variant (Lungă). Numărul caracterelor de returnat. Dacă se omite sau dacă există mai puține decât lungimea caractere în caseta text (inclusiv caracterul de la pornirea), toate caracterele din poziția începe la sfârșitul șirul sunt returnate.


Observații

Pentru a determina numărul de caractere din șir, utilizați funcția Len.

Notă : Utilizați funcția MidB cu octet datele conținute într-un șir, la fel ca în limbi setarea caractere dublu-octet. În loc de a specifica numărul de caractere, argumentele specificați un număr de octeți. Pentru exemple de cod care utilizează MidB, consultați al doilea exemplu din exemplul subiect.

Exemplu

Notă : Exemplele care urmează demonstrează utilizarea acestei funcții într-un modul Visual Basic for Applications (VBA). Pentru mai multe informații despre lucrul cu VBA, selectați Referințe pentru dezvoltatori în lista verticală de lângă Căutare și introduceți unul sau mai mulți termeni în caseta de căutare.

Primul exemplu utilizează funcția Mid pentru a returna un număr specificat de caractere dintr-un șir.

Dim MyString, FirstWord, LastWord, MidWords
MyString = "Mid Function Demo" ' Create text string.
FirstWord = Mid(MyString, 1, 3) ' Returns "Mid".
LastWord = Mid(MyString, 14, 4) ' Returns "Demo".
MidWords = Mid(MyString, 5) ' Returns "Function Demo".

Al doilea exemplu utilizați MidB și funcții definite de utilizator (MidMbcs) pentru a returna caractere din șirul. Diferența aici este că șirul de intrare este ANSI și durata este în byți.

Function MidMbcs(ByVal str as String, start, length)
MidMbcs = StrConv(MidB(StrConv(str, vbFromUnicode), _
start, length), vbUnicode)
End Function
Dim MyString
MyString = "AbCdEfG"
' Where "A", "C", "E", and "G" are DBCS and "b", "d",
' and "f" are SBCS.
MyNewString = Mid(MyString, 3, 4)
' Returns ""CdEf"
MyNewString = MidB(MyString, 3, 4)
' Returns ""bC"
MyNewString = MidMbcs(MyString, 3, 4)
' Returns "bCd"

Notă : Exonerare de răspundere pentru traducere automată: Acest articol a fost tradus de un sistem computerizat, fără intervenție umană. Microsoft oferă aceste traduceri automate pentru a ajuta utilizatorii vorbitori de alte limbi decât engleza să beneficieze de conținutul despre produsele, serviciile și tehnologiile Microsoft. Pentru că articolul a fost tradus de un computer, poate conține erori de vocabular, sintaxă sau gramatică.

Extindeți-vă competențele
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.

×