🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: pl.comp.lang.vbasic
Article #104406

Re: Prosba o uproszczenie funkcji

#104406
From: InDesign Scripts
Date: Thu, 17 Dec 2009 18:23
25 lines
2171 bytes
> Funcja, ma wyciagac fragment oddzielony okreslonym znakiem.
> Przykladowo dla tekstu "aaa/bbb/ccc/ddd/eee"
> a) uzywajac jej z parametrami "/",3,1 otrzymamy wynik "ccc"
> b) dla "/",2,2 "bbb/ccc", itd.
> Parametry to kolejno znak rozdzielajacy, ktore z kolei wyrazenie
> i ilosc wyrazen.

a jakim cudem:

i = ile_wyrazow
...
Do While y < p + i

p+i ma rozszerzyć obszar poszukiwań o np. i=5 kolejnych 3'wyrazowych słów ?
poza tym - przecież pomiędzy separatorem możesz mieć ciągi znaków różnej długości ?

bo aktualnie to rozszerzy obszar poszukiwań o i'kolejnych znaków a nie i'kolejnych ciągów znaków

> Najwazniejsze dla mnie, by bylo okreslane ktory z kolei separator.
> Zaraz lukne to split, moze ta funkcja posiada to co potrzebuje.

najprostrze i najlepsze rozwiązanie ;)
bo wtedy splitujesz i w petli bierzesz sobie elementy od p(ozycja) do p(ozycja)+i(le_wyrazow) - oczywiście najpierw musisz sprawdzić, czy ilość elementów w tablicy (wynik Split) jest większa niż p(ozycja) i czy p(ozycja)+i(le_wyrazów) jest mniejsze od ilości otrzymanych elementów - jeżeli nie to bierzesz do ostatniego elmentu

robin
Technical Details
Message-ID: <hgdsuv$ipo$1@inews.gazeta.pl>
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.gazeta.pl!not-for-mail
References: <hgdfq6$2ku$1@inews.gazeta.pl> <hgdjja$foq$1@inews.gazeta.pl> <hgdoe6$3ia$1@inews.gazeta.pl>

Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.gazeta.pl!not-for-mail
From: InDesign Scripts <indesignscripts@gazeta.pl>
Newsgroups: pl.comp.lang.vbasic
Subject: Re: Prosba o uproszczenie funkcji
Date: Thu, 17 Dec 2009 18:23:26 +0000
Organization: "Portal Gazeta.pl -> http://www.gazeta.pl"
Lines: 25
Message-ID: <hgdsuv$ipo$1@inews.gazeta.pl>
References: <hgdfq6$2ku$1@inews.gazeta.pl> <hgdjja$foq$1@inews.gazeta.pl> <hgdoe6$3ia$1@inews.gazeta.pl>
NNTP-Posting-Host: host81-158-97-19.range81-158.btcentralplus.com
Mime-Version: 1.0
X-Trace: inews.gazeta.pl 1261074207 19256 81.158.97.19 (17 Dec 2009 18:23:27 GMT)
X-Complaints-To: usenet@agora.pl
NNTP-Posting-Date: Thu, 17 Dec 2009 18:23:27 +0000 (UTC)
X-User: indesignscripts
X-Antivirus: avast! (VPS 091217-0, 2009-12-17), Outbound message
In-Reply-To: <hgdoe6$3ia$1@inews.gazeta.pl>
X-Antivirus-Status: Clean
User-Agent: Thunderbird 2.0.0.23 (Windows/20090812)
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit