Het commando word$(

Cursussen, tutorials
Plaats hier uw bijdrage.

Het commando word$(

Berichtdoor Gordon » za aug 11, 2007 9:15 pm

Hier volgt een vertaling uit de Help-file

WORD$(stringExpression, n [, woordafbakeningsteken ])
Beschrijving: Deze functie toont het n-de woord uit de stringvariabele of
de reeks opgegeven woorden. De spaties voor en na stringExpression
worden automatisch gestript en standaard worden de overblijvende
woorden uitgesplitst in woorden gescheiden door spaties. Als n minder
dan 1 is of groter is dan het aantal woorden in stringExpression,
dan wordt automatisch "" als antwoord gegeven.

Het afscheidingsteken is optioneel. Wanneer het niet wordt gebruikt, is
het spatieteken de afbakening.

Gebruik:
Print word$("De snelle bruine vos die over de luie hond is gesprongen", 8 )

Produceert: luie

En:
Code: Selecteer alles
' toon elk woord van sentence$ op een nieuwe regel
sentence$ = "en vele mijlen te gaan alvorens ik slaap."
token$ = "?"
while token$ <> ""
 index = index + 1
token$ = word$(sentence$, index)
print token$
wend

Produceert:
en
vele
mijlen
te
gaan
alvorens
ik
slaap.

Het gebruik van de afscheidingsoptie:
U kunt als afbakeningsteken zelf één of meerdere karakters specificeren,
dus u kunt kiezen voor een komma of een andere reeks tekens als
afbakeningsteken van de woordjes:

Code: Selecteer alles
token$ = "*"
parseMe$ = "dit, is, een,, test"
idx = 0
while token$ <> ""
idx = idx + 1
token$ = word$(parseMe$, idx, ",")
if token$ <> "" then print token$
wend


Let op, er staan twee komma’s na elkaar in de teststring. Daardoor
wordt ook een komma in het antwoord weergegeven. Dit kan nuttig zijn
om dubbele spaties in teksten op te sporen.


Substitueer de volgende regels:

parseMe$ = "het meest thisarfisarfarfaarftest"

en:
token$ = word$(parseMe$, idx, "arf")

om te effect te zien.
Avatar gebruiker
Gordon
Site Admin
 
Berichten: 684
Geregistreerd: zo mei 22, 2005 12:50 am

Berichtdoor Gordon » za aug 11, 2007 10:04 pm

Hier volgt een vertaling uit de Help-file
van het commando Drives$

Drives$ is een speciale (Windows) systeemvariabele en is
daarom hoofdlettersgevoelig. Dus begint de variabele met
een hoofdletter en het zijn Drives$ met een s en een $.

Beschrijving:
Drives$ is een systeemvariabele.
Het kan als elke andere variabele worden gebruikt.
Gebruik het in uitdrukkingen, print het, stop het in functies, enz.
Het is speciaal in zoverre dat het de drive letters van alle
aangesloten harde schijven, floppydrives en dergelijke bevat
die in de computer bij de start werden geïnstalleerd.

Bijvoorbeeld:
print Drives$
Zal in vele gevallen a: b: c: geven.

Het kan worden gebruikt om een drive te selecteren:

Code: Selecteer alles
' eenvoudig voorbeeld van het gebruik van de variabele Drives$
 
    dim letters$(25)
    index = 0
    while word$(Drives$, index + 1) <> ""
        letters$(index) = word$(Drives$, index + 1)
        index = index + 1
    wend

    statictext #win, "Double-click to pick a drive:", 10, 10, 200, 20
    listbox #win.list, letters$(, [selectionMade], 10, 35, 100, 150
    open "Scan drive" for dialog as #win

    wait

[selectionMade]

    close #win
    end


(1) Merk op dat word$( een LibertyBASIC functie is.
Het is dus niet hoofdlettergevoelig.
(2) Merk op dat de woordjes uit het antwoord van Drives$
eindigen op dubbelpunt spatie (: )
Hierdoor hoeven we bij het gebruikt van de word$ functie
geen afbakeningsteken op te geven, omdat default een
spatie gebruikt wordt.

De listing staat in de help-file

Gordon
Avatar gebruiker
Gordon
Site Admin
 
Berichten: 684
Geregistreerd: zo mei 22, 2005 12:50 am


Keer terug naar Leren programmeren met Liberty BASIC

Wie is er online

Gebruikers op dit forum: Geen geregistreerde gebruikers. en 1 gast

cron