Op deze website gebruiken we cookies om content en advertenties te personaliseren, om functies voor social media te bieden en om ons websiteverkeer te analyseren. Ook delen we informatie over uw gebruik van onze site met onze partners voor social media, adverteren en analyse. Deze partners kunnen deze gegevens combineren met andere informatie die u aan ze heeft verstrekt of die ze hebben verzameld op basis van uw gebruik van hun services. Meer informatie.

Akkoord

Vraag & Antwoord

Programmeren

vb6 vraag je

old
4 antwoorden
  • Ik kom hier niet uit

    Hoe kan ik deze aanpassen dat hij pas vanaf de 2e of 3e Stats gaat lezen.
    Dus dat hij niet de 1e pakt.


    [code:1:4f9e641962]

    Dim strZoekstring As String
    Dim lngStart As Long
    Dim lngEerste As Long
    Dim lngTweede As Long
    Dim strResultaat As String

    strZoekstring = Text1.Text
    lngStart = 1
    lngEerste = InStr(lngStart, strZoekstring, "Stats")
    lngTweede = InStr(lngEerste + 6, strZoekstring, "end")
    strResultaat = Mid(strZoekstring, lngEerste + 6, lngTweede - lngEerste - 7)
    Label6 = (strResultaat)

    [/code:1:4f9e641962]

    Alvast bedankt
  • Met mid de eerste stats vervangen; dus " " plaatsen waar "stats" stond. Uiteraard later wel weer het origineel gebruiken voor de data.
  • Als ik dat doe dan krijg ik ook de tekst wat voor de 1e stats staat
    maar de 2e rij krijg ik niet

    of ik doe iets verkeerd.
  • euh, nee, als het goed is niet.
    Je moet zoiets hebben:

    lngEerste = InStr(lngStart, strZoekstring, "Stats")
    mid(strZoekstring,lngEerste)=" "
    lngEerste = InStr(lngStart, strZoekstring, "Stats")



    oid, en dan hetzelfde voor lngTweede.

Beantwoord deze vraag

Dit is een gearchiveerde pagina. Antwoorden is niet meer mogelijk.