Keskustelu: Ohjelmointikysymykset: VB6: Merkkijonofunktiot

Onko (VB).Netissä seuraavanlaisia merkkijonometodeita:

(Esimerkkinimet ovat keksityitä.)

"GetBetween()" Hakee merkkijonosta kahden syötetyn merkkijonon välissä olevan osan.

"Knife()" Hakee merkkijonosta ennen syötettyä merkkijonoa olevan osan. Merkkijonoon jää vain syötetyn merkkijonon jäljessä oleva osa.

"ReplaceOnce()" Korvaa kaiken vain kerran. Ei siis kasvattaa merkkijonoa äärettömästi.

GetBetWeeniä ei ole, mutta tässä sitä vastaava. https://www.ohjelmointiputka.net/koodivinkit/24825-vb6-erottelija

Tai

Public Function TextBetween(ByVal Text As String, ByVal Keyword1 As String, ByVal Keyword2 As String, Optional ByVal StartPos As Long = 1, Optional ByVal Compare As VbCompareMethod = vbBinaryCompare) As String
    Dim lngA As Long, lngB As Long
    lngA = InStr(StartPos, Text, Keyword1, Compare)
    If lngA < 1 Then Exit Function
    lngB = InStr(lngA, Text, Keyword2, Compare)
    If lngB < 1 Then Exit Function
    TextBetween = Mid$(Text, lngA + 1, lngB - lngA - 1)
End Function

Muista en osaa sanoa.

Mihinkään noista ei ole valmista funktiota, mutta näillä nuo onnistuu tekemään itse, kuten tesmu tuossa edellä.