Vraag : koord extractie

Ik zou het volgende uit een koord willen halen: cijfers

any bij brief V of v worden gevolgd die:
#V
##V

not
###V

must igonre alle karakters na V en negeert alle karakters of cijfers vóór #V of vóór ##V
Related Oplossingen: van het Extract aantal deuren van string

Antwoord : koord extractie

De functie keert hieronder eerst het dergelijke ingebedde aantal van een koord terug.

(°v°)
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:

Functie GetNumV (Tekst)
    Schemerige pos als Geheel
    
        pos = InStr (pos + 1, Tekst, „V“)
        Als pos > 2 toen
            Als Medio (Tekst, pos - 2, 2) als „##“ toen
                GetNumV = Medio Val ((Tekst, pos - 2, 2))
                De Functie van de uitgang
            Eind als
        Eind als
        Als pos > 1 toen
            Als Medio (Tekst, pos - 1, 1) als „#“ toen
                GetNumV = Medio Val ((Tekst, pos - 1, 1))
                De Functie van de uitgang
            Eind als
        Eind als
    Lijn terwijl pos
    GetNumV = verklaart nietig
De Functie van het eind
Andere oplossingen  
 
programming4us programming4us