Office
Pierakstīties

Funkcija Mid

Piezīme.: Mēs vēlamies sniegt jums visjaunāko palīdzības saturu jūsu valodā, cik vien ātri to varam. Šī lapa ir tulkota automatizēti, un tajā var būt gramatiskas kļūdas un neprecizitātes. Mūsu nolūks ir šo saturu padarīt jums noderīgu. Vai lapas lejasdaļā varat mums pavēstīt, vai informācija jums noderēja? Ērtai atsaucei šeit ir šis raksts angļu valodā.

Atgriež Variant (String), kurā ir norādītais rakstzīmju skaits no virknes.

Sintakse

Mid ( virkne, sākums [garums ] )

Funkcijas Mid sintaksē ir šādi argumenti:

Arguments

Apraksts

virkne

Obligāts. virknes izteiksme no kuras tiek atgriezti rakstzīmes. Ja virkne ir Null, Null tiek atgriezta.

sākt

Obligāts. Garš. Rakstzīmju virkne , kurā daļa, kas veicami sākas pozīcijā. Ja Sākt ir lielāks nekā virknesrakstzīmju skaitam, Mid atgriež nulles garuma virkni ("").

garums

Pēc izvēles. Varianta (Garš). Atgriežamo rakstzīmju skaits. Ja izlaista vai ir mazāk nekā garums rakstzīmes (ieskaitot rakstzīmi, pie Sākt) teksts, tiek atgriezta visas rakstzīmes no sākuma pozīcijas virknes beigām.


Piebildes

Lai noteiktu rakstzīmju skaitu argumentā virkne, izmantojiet funkciju Len.

Piezīme.: Izmantojiet funkciju MidB baita datiem, kas iekļauti virkni, kā iestatīt dubultbaitu rakstzīmju valodām. Tā vietā, norādot rakstzīmju skaitu, argumenti norādiet baitu skaitu. Parauga kodu, kas izmanto MidB, skatiet tēmā piemērs otrs piemērs.

Piemērs.

Piezīme.: Turpmākajos piemēros redzama šīs funkcijas izmantošana Visual Basic for Applications (VBA) modulī. Lai iegūtu papildinformāciju par darbu ar VBA, nolaižamajā sarakstā atlasiet Uzziņas materiāli izstrādātājiem blakus meklēšanas lodziņam un ievadiet šajā lodziņā vienu vai vairākus vārdus.

Pirmajā piemērā funkcija Mid , lai atgrieztu norādīto rakstzīmju skaitu no virknes.

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".

Otrs piemērs izmantošana MidB un lietotāja definētie funkciju (MidMbcs) arī atgrieztu rakstzīmes no virknes. Atšķirība šeit ir tas, ka ievades virknei izmantots ANSI un garums ir norādīts baitos.

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"
Paplašiniet savas Office prasmes
Iepazīties ar apmācību
Esiet pirmais, kas saņem jaunās iespējas
Pievienoties Office Insider programmai

Vai šī informācija bija noderīga?

Paldies par jūsu atsauksmēm!

Paldies par atsauksmēm! Šķiet, ka varētu būt noderīgi sazināties ar kādu no mūsu Office atbalsta aģentiem.

×