Vende en String

VBA indeholder nogle meget stærke kommandoer og funktioner til at manipulere strenge. En sådan funktion kan du nemt vende indholdet af en streng: den StrReverse funktion. Alt du skal gøre er at give det en strengværdi, og det returnerer omvendt version af streng:

Dim MyString As String
Dim BackString As String

MyString = "ABCD1234"
BackString = StrReverse (MyString)

Når kodestykket er gennem udførelse, er værdien af ​​BackString indstillet til 4321DCBA, hvilket er det modsatte af den oprindelige værdi af MyString.

Den StrReverse funktion blev tilføjet til VBA begynder med Office 2000. Hvis du bruger Word 97, så kan du oprette din egen funktion til at vende strenge:

Funktion StrReverse (sRAW As String) As String
Dim Swork As String
Dim sTarget As String
Dim J As Integer

Swork = sRAW
sTarget = ""
For j = 1 til Len (Swork)
sTarget = Mid (Swork, J, 1) & sTarget
Næste J
StrReverse = sTarget
End Function

Det virker ved at trække den oprindelige streng fra hinanden og sætte det sammen igen i den nye orden. Funktionen returnerer en omvendt version af, hvad streng du sender den.

WordTips er din kilde til omkostningseffektiv Microsoft Word træning. (Microsoft Word er det mest populære tekstbehandlingsprogram i verden.) Dette tip (767) gælder for Microsoft Word 97, 2000, 2002, og 2003. Du kan finde en version af dette tip til menufaner Word (Word 2007 og nyere) her: Vende en String.


© 2020 Zajacperrone.com | Contact us: webmaster# zajacperrone.com