####Text\SBASIC\COMMON\00000002.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;27(subject)%PRODUCTNAME Basic Glossary %PRODUCTNAME BASIC Woordenlijst ------------------------------- ****73;96;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****73;127;15() Basic Glossary BASIC Woordenlijst ------------------------------- ****74;40;151(text:p)In addition to several technical terms, this glossary also explains some of the most important functions that you will come across in programming with Naast verschillende technische termen, verklaart deze woordenlijst ook sommige van de meest belangrijke functies die u zult tegenkomen bij het programmeren met ****74;209;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****74;240;7() Basic. BASIC. ------------------------------- ****75;40;83(text:p)Click on the desired term, or browse through the alphabetical list of descriptions. Klik op de gewenste term of blader door de alfabetische lijst van beschrijvingen. ------------------------------- ****76;76;13(help:link)Decimal Point Decimale punt ****76;101;2(), , ****76;138;7(help:link) Colors Kleuren ****76;157;2(), , ****76;201;17(help:link)measurement units Maateenheden ****76;230;2(), , ****76;266;5(help:link)Twips Twips ------------------------------- ****79;56;13(text:p)Decimal Point Decimale punt ------------------------------- ****80;40;25(text:p)When converting numbers, Bij het converteren van getallen, ****80;83;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****80;114;256() Basic takes country settings into effect. If you have specified a country in your system settings where decimal points in numbers are represented by a comma, and thousand separators are represented by a point, this setting also applies to calculations in BASIC neemt de landinstellingen in acht. Als u een land in uw systeeminstellingen heeft gespecificeerd waar decimale punten in getallen worden aangeduid door een komma en duizendtallen-scheidingstekens worden aangeduid door een punt, heeft deze instelling ook betrekking op berekeningen in ****80;388;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****80;419;7() Basic. BASIC. ------------------------------- ****81;40;121(text:p)The behavior has an effect on both the implicit conversion ( 1 + "2,3" = 3,3 ) as well as the runtime function Het gedrag heeft een effect op zowel de impliciete omzetting ( 1 + "2,3" = 3,3 ) als de runtime functie ****81;183;9(help:link)IsNumeric IsNumeric ****81;204;60(). The thousand separator corresponds to the system settings. . Het duizendtallen scheidingsteken komt overeen met de systeeminstellingen. ------------------------------- ****83;55;6(text:p)Colors Kleuren ------------------------------- ****84;40;3(text:p)In In ****84;61;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****84;92;162() Basic, colors are generally treated as long integer variables; the return value is also always long integer. When defining properties, colors can also be set in BASIC, worden kleuren in het algemeen behandeld als “Long Integer getal”-variabelen; de resultaatwaarde is ook altijd Long Integer. Bij het definiëren van eigenschappen, kunnen kleuren ook worden ingesteld in ****84;286;8(help:link)RGB code RGB code ****84;306;41() and thus treated as long integer values. en als zodanig worden behandeld als een “Integer”- waarde. ------------------------------- ****86;62;17(text:p)Measurement units Maateenheden ------------------------------- ****87;40;95(text:p)The pass parameters of a method, which contain the measurement unit information, can be set in De geldige parameters van een methode, welke de maateenheid-informatie bevat, kan worden ingesteld in ****87;153;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****87;184;258() Basic either as an integer or long integer expression without a defined unit, or as a character string with a defined unit. If such a parameter is passed as an integer or long integer expression, the default unit defined for the active document type in the BASIC óf als een Integer (geheel getal) óf Long Integer getaluitdrukking (lang geheel getal) zonder een gedefinieerde eenheid óf als een tekenreeks met een gedefinieerde eenheid. Als een dergelijke parameter geldig is als een Integer of Long Integer getaluitdrukking, zal de standaardwaarde-eenheid, gedefinieerd voor het actuele documenttype in de ****87;474;6(text:span)Layout Opmaak ****87;492;11() tab under tab onder ****87;535;15(text:span)Tools - Options Extra – Opties, ****87;562;200() will be used as the measurement unit. If the parameter is passed as a character string with a defined measurement unit, the default setting will be ignored. The following are valid measurement units: worden gebruikt als de maateenheid. Als de parameter geldig is als een tekenreeks met een gedefinieerde maateenheid, zal de standaardinstelling worden genegeerd. De volgende zijn geldige maateenheden: ------------------------------- ****88;40;127(text:p)Millimeter ("20mm"), centimeter ("2.00cm"), inch ("0.79in"), pica and point ("59.9pt"). Millimeter ("20mm"), centimeter ("2.00cm"), inch ("0.79in"), pica en punt ("59.9pt"). ------------------------------- ****89;40;451(text:p)For properties, the same applies: parameters can be set with or without a defined measurement unit as a string, or as an integer or long integer. However, for integer or long integer variables, the measurement unit is set according to the default settings. In the Help, a return value is characterized as an integer or long integer expression, depending on the respective variable type. Note that this value can also be returned as a character string. Voor eigenschappen geldt hetzelfde: parameters kunnen worden ingesteld met of zonder een gedefinieerde maateenheid als een tekenreeks, óf als een Integer óf Long Integer getal. Echter voor Integer óf Long Integer getal variabelen, wordt de maateenheid ingesteld volgens de standaardinstellingen. In de Help, een resultaatwaarde wordt weergegeven als een Integer of Long Integer getaluitdrukking, afhankelijk van het respectievelijke variabelentype. Merk op dat deze resultaatwaarde ook kan worden weergegeven als een tekenreeks. ------------------------------- ****90;40;88(text:p)This rule is generally valid, unless defined otherwise in the Help. The settings in the Deze regel is in het algemeen geldig, tenzij anders gedefinieerd in de Help. De instellingen in de ****90;160;6(text:span)Layout Opmaak ****90;178;485() tab do not apply to font sizes or window positioning. Font sizes can also be set either as a long integer variable without a defined unit or with the desired measurement unit. If no unit is specified, the default unit is point. The return value also uses the point unit, regardless of if a string or a numerical value is queried. Window positions are always specified in pixel. To find out which unit is used by the program, please refer to the appropriate topic in the documentation. tab gelden niet voor lettertypeafmetingen of vensterplaatsing. Lettertypeafmetingen kunnen ook worden ingesteld als óf een “Long Integer getal”-variabele zonder een gedefinieerde eenheid óf met de gewenste maateenheid. Als er geen eenheid is gespecificeerd: de standaardwaarde eenheid is de punt. De resultaatwaarde gebruikt ook de punt-eenheid, zonder te letten op het feit of een tekenreeks of een numerieke waarde is gevraagd. Vensterposities worden altijd gespecificeerd in pixel. Om uit te vinden welke eenheid wordt gebruikt door het programma, zoek alstublieft de verwijzing naar het toepasselijke onderwerp in de documentatie. ------------------------------- ****104;59;5(keyword)Twips Twips ****104;83;5(text:p)Twips Twips ------------------------------- ****105;40;270(text:p)A twip is a screen-independent unit which is used to define the uniform position and size of screen elements on all display systems. A twip is 1/1440th of an inch or 1/20 of a printer's point. There are thus 1440 twips to an inch or about 567 twips to a centimeter. Een twip is een scherm-onafhankelijke eenheid welke wordt gebruikt om de uniforme positie en grootte van schermelementen op alle weergavesystemen te definiëren. Een twip is 1/1440e van een inch of 1/20e van een printerpunt. Er zijn daarom 1440 twips in een inch of ongeveer 567 twips in een centimeter. ------------------------------- ****107;57;12(text:p)URL notation URL notatie ------------------------------- ****108;72;7(text:span)Example Voorbeeld ****108;91;25(): file:///c|/autoexec.bat : file:///c|/autoexec.bat ------------------------------- ****109;40;236(text:p)Even individual files can be determined worldwide by a URL. This example shows the address of the file autoexec.bat on the C: drive of the computer on which this file is referenced. The name of the computer is missing in this example - Zelfs individuele bestanden kunnen wereldwijd worden onderscheiden door een URL. Dit voorbeeld toont het adres van het bestand autoexec.bat op de C: schijf van de computer waarnaar dit bestand refereert. De naam van de computer ontbreekt in dit voorbeeld - ****109;285;68(text:p)if you want to add it, insert it between the second and third slash. als u die wilt toevoegen, voeg hem in tussen de tweede en derde schuine streep. ------------------------------- ****110;40;3(text:p)In In ****110;61;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****110;92;431() you can also enter the path for your files with the backslash "\" as the separator; the application will convert it to the correct URL convention with a slash "/". Since the colon (used by many operating systems to separate the disk drive letter from the next part of the address) already has a different function in a URL address, convention dictates that it is replaced by a vertical line "|" here. u kunt ook het pad voor uw bestanden intoetsen met de schuine streep achterover "\" als het scheidingsteken; het programma zal het omzetten naar de correcte URL notatie met een schuine streep "/". Omdat de dubbele punt (gebruikt door veel besturingssystemen om de schijfletter te scheiden van het volgende deel van het addres) al een andere functie in een URL adres heeft, schrijft de notatie voor dat het hier wordt vervangen door een verticale lijn "|". ------------------------------- ****111;40;335(text:p)If a folder name referred to in a URL contains spaces, you should replace these using the syntax for special characters. For example, instead of entering the folder name "My Files," name it "My%20Files". After the percentage sign comes the two-digit hexadecimal ASCII code for a space (decimal 32 = hexadecimal 20). Als een mapnaam, waarnaar wordt verwezen in een URL, spaties bevat, moet u deze, met behulp van de syntaxis voor speciale tekens, vervangen. Bijvoorbeeld, voer in plaats van de mapnaam "Mijn Bestanden," de naam "Mijn%20Bestanden" in. Na het percentageteken komt de tweecijferige hexadecimale ASCII code voor een spatie (decimal 32 = hexadecimaal 20). ####Text\SBASIC\COMMON\00000003.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;18(subject)Embedded and Popup Ingesloten en Popup ------------------------------- ****75;37;18(text:p)Embedded and Popup Ingesloten en Popup ------------------------------- ****77;40;54(text:p)The color codes of the 16 basic colors are as follows: De kleurcodes van de 16 standaardkleuren zijn als volgt: ****84;37;10(text:p)Color Code Kleurcode ****87;37;5(text:p)Color Kleur ****93;45;1(text:p)0 0 ****96;45;5(text:p)Black Zwart ****101;45;3(text:p)128 128 ****104;45;4(text:p)Blue Blauw ****109;45;5(text:p)32768 32768 ****112;45;5(text:p)Green Groen ****117;45;5(text:p)32896 32896 ****120;45;4(text:p)Cyan Cyaan ****125;45;7(text:p)8388608 8388608 ****128;45;3(text:p)Red Rood ****133;45;7(text:p)8388736 8388736 ****136;45;7(text:p)Magenta Magenta ****141;45;7(text:p)8421376 8421376 ****144;45;6(text:p)Yellow Geel ****149;45;7(text:p)8421504 8421504 ****152;45;5(text:p)White Wit ****157;45;8(text:p)12632256 12632256 ****160;45;4(text:p)Gray Grijs ****165;45;3(text:p)255 255 ****168;45;10(text:p)Light blue Lichtblauw ****173;45;5(text:p)65280 65280 ****176;45;11(text:p)Light green Lichtgroen ****181;45;5(text:p)65535 65535 ****184;45;10(text:p)Light cyan Lichtcyaan ****189;45;8(text:p)16711680 16711680 ****192;45;9(text:p)Light red Lichtrood ****197;45;8(text:p)16711935 16711935 ****200;45;13(text:p)Light magenta Lichtmagenta ****205;45;8(text:p)16776960 16776960 ****208;45;12(text:p)Light yellow Lichtgeel ****213;45;8(text:p)16777215 16777215 ****216;45;17(text:p)Transparent white Transparant wit ####Text\SBASIC\COMMON\00000004.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ATTENTIE; De macro's in dit xml document hebben een fout in zich en derhalve werkt de macro Function AlfaToets NIET en Function GeenAlfaToets is NIET GETEST ! Fout komt voor in tekstblok 118;39;74(text:p)iCode = &h00ff AND iCode ------------------------------- ****6;16;17(subject)Events on Objects Gebeurtenissen met objecten ------------------------------- ****102;59;17(keyword)Events on Objects Gebeurtenissen met objecten ****102;95;17(text:p)Events on Objects Gebeurtenissen met objecten ------------------------------- ****103;40;151(text:p)When you insert an object in a document, you can assign a macro to some predefined events. This macro will then be executed when the event happens. In Wanneer u een object in een document invoegt, kunt u een macro toekennen voor enige voorgedefinieerde gebeurtenissen. Deze macro zal dan worden uitgevoerd als de gebeurtenis zich voordoet. In ****103;209;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****103;240;126(), you can get this function by using the corresponding object dialog. That means if the object is a frame, you should use the , u kunt deze functie vinden met behulp van het overeenkomstige objectdialoogvenster. Dat betekent dat als het object een frame is, u moet gebruiken het ****103;398;5(text:span)Frame Frame ****103;425;47()dialog, and if it is a graphic, please use the dialoogvenster, en als het een afbeelding is, gebruik dan het ****103;504;7(text:span)Graphic Afbeelding ****103;523;128() dialog, etc. Depending on the object selected, a list of all events defined for the current object will be found either on the dialoogvenster, etc. Afhankelijk van het geselecteerde object, zal een lijst van alle gebeurtenissen gedefinieerd voor het actuele object worden gevonden of op de ****103;705;5(text:span)Macro Macro ****103;734;42() tab page of the Object dialog, or in the tabpagina van het Object dialoogvenster of in het ****103;808;12(text:span)Assign Macro Toekennen Macro ****103;832;8() dialog. dialoogvenster. ------------------------------- ****104;40;94(text:p)The macro is generally formulated in a SUB. The default composition of this SUB is as follows: De macro is in het algemeen geformuleerd in een SUB. De standaardsamenstelling van deze SUB is als volgt: ------------------------------- ****105;40;18(text:p)Sub EventRoutine() Sub EventRoutine() ------------------------------- ****106;40;15(text:p)[command lines] [command lines] ------------------------------- ****107;40;7(text:p)End Sub End Sub ------------------------------- ****108;40;105(text:p)The SUB EventRoutine should then be linked to an event. It will be initiated as soon as the event occurs. De SUB GebeurtenisRoutine moet dan worden gekoppeld aan een gebeurtenis. Het zal worden uitgevoerd zodra de gebeurtenis voorkomt. ------------------------------- ****109;59;32(keyword)Linking special Events to frames Koppelen speciale Gebeurtenissen aan frames ****109;110;32(text:p)Linking special Events to frames Koppelen speciale Gebeurtenissen aan frames ------------------------------- ****110;40;375(text:p)If you insert a frame in a text document, you will not only find the general events also used with other objects, e.g., to select an object etc., but also some special events, which can be used to change or move the frame. These events can be processed in different ways. You can link them to a Basic FUNCTION, where it can be decided whether the event is to be processed by Als u een frame in een tekstdocument invoegt, zult u niet alleen de algemene gebeurtenissen, ook gebruikt met andere objecten vinden, bijv., om een object te selecteren etc., maar ook enige speciale gebeurtenissen, welke kunnen worden gebruikt om het frame te veranderen of te verplaatsen. Deze gebeurtenissen kunnen worden verwerkt op verschillende manieren. U kunt ze koppellen aan een BASIC FUNCTION, waar kan worden besloten of de gebeurtenis moet worden verwerkt door ****110;433;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****110;464;34() Writer or by the FUNCTION itself. Writer of door de FUNCTION zelf. ------------------------------- ****111;40;210(text:p)Some parameters will be set for the FUNCTION. The first parameter is always the name of the frame. An integer value can be used to determine how the event should be processed. The following values are possible: Sommige parameters zullen zijn ingesteld voor de FUNCTION. De eerste parameter is altijd de naam van het frame. Een Integer waarde kan worden gebruikt om te bepalen hoe de gebeurtenis zou moeten worden verwerkt. De volgende waarden zijn mogelijk: ------------------------------- ****112;40;34(text:p)0: The event will be processed by 0: De gebeurtenis zal worden verwerkt door ****112;92;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****112;123;8() Writer. Writer. ------------------------------- ****113;40;47(text:p)1: The event will be processed by the FUNCTION. 1: De gebeurtenis zal worden verwerkt door de FUNCTION. ------------------------------- ****114;40;248(text:p)Use the return value "1", for example, to define that no character should be entered in the frame after a specified keyboard input, or to determine the action to be executed when using certain keys. The following examples illustrate this: Gebruik de resultaatwaarde "1", bijvoorbeeld, om te definiëren dat geen teken zou moeten worden ingevoerd in het frame na een gespecificeerde toetsenbordinvoer of om te bepalen dat de actie moet worden uitgevoerd als bepaalde toetsen worden gebruikt. De volgende voorbeelden illustreren dit: ------------------------------- ****115;40;175(text:p)If the FUNCTION KeyAlpha is linked to the event "Input of alphanumeric characters", all special characters entered by the user will be replaced by custom characters. Als de FUNCTION AlfaToets is gekoppeld aan de gebeurtenis "Invoer van alfanumerieke karakters", worden alle speciale tekens, ingevoerd door de gebruiker, vervangen door gewone tekens. ------------------------------- ****116;39;66(text:p)Function KeyAlpha( sFrame as String, iCode as Integer ) as Integer Function AlfaToets( sFrame as String, iCode as Integer ) as Integer ------------------------------- ****117;39;21(text:p)Dim sChange as String Dim sChange as String ------------------------------- ****118;39;74(text:p)iCode = &h00ff AND iCode REM only the lowermost byte correpsonds a key iCode = &h00ff AND iCode REM alleen de laagste byte correspondeert met een toets ------------------------------- ****120;39;32(text:p)REM a short transformation table REM een korte omzettingstabel ------------------------------- ****121;39;17(text:p)Select Case iCode Select Case iCode ------------------------------- ****122;39;50(text:p)Case ASC("ö"): sChange = "oe" Case ASC("ö"): sChange = "oe" ------------------------------- ****123;39;50(text:p)Case ASC("ß"): sChange = "ss" Case ASC("ß"): sChange = "ss" ------------------------------- ****124;39;50(text:p)Case ASC("ü"): sChange = "ue" Case ASC("ü"): sChange = "ue" ------------------------------- ****125;39;50(text:p)Case ASC("ä"): sChange = "ae" Case ASC("ä"): sChange = "ae" ------------------------------- ****126;39;10(text:p)End Select End Select ------------------------------- ****128;39;30(text:p)If sChange = "" Then If sChange = "" then ------------------------------- ****129;55;57(text:p)KeyAlpha = 0 REM Character does not have to be replaced. AlfaToets = 0 REM Teken moet niet worden vervangen. ****129;130;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****129;161;19() Writer displays it Writer geeft het weer. ------------------------------- ****130;39;4(text:p)Else Else ------------------------------- ****131;55;26(text:p)rem use the changed string rem gebruik de veranderde tekenreeks ------------------------------- ****132;39;30(text:p)KeyAlpha = 1 REM replace input AlfaToets = 1 REM vervang invoer ------------------------------- ****133;39;6(text:p)End If End If ------------------------------- ****135;39;12(text:p)End Function End Function ------------------------------- ****137;40;274(text:p)The next example demonstrates how formatting can be assigned directly via keyboard. If the FUNCTION KeyNoAlpha is linked to the event "Input of non-alphanumeric characters", predefined formatting will directly be assigned when predetermined shortcut keys are used. Het volgende voorbeeld demonstreert hoe opmaak kan direct worden toegekend via toetsenbord. Als de FUNCTION GeenAlfaToets is gekoppeld aan de gebeurtenis "Invoer van niet-alfanumerieke karakters", zal de voorgedefinieerde opmaak direct worden toegekend als vooringestelde sneltoetsen worden gebruikt. ------------------------------- ****138;39;67(text:p)Function KeyNoAlpha( sFrame as String, iKey as Integer ) as Integer Function GeenAlfaToets ( sFrame as String , iKey as Integer ) as Integer ------------------------------- ****140;39;14(text:p)KeyNoAlpha = 1 GeenAlfaToets = 1 ------------------------------- ****142;39;16(text:p)Select Case iKey Select Case iKey ------------------------------- ****143;39;55(text:p)Case 5382: REM (Shift)+(Del) deletes all frame contents Case 5382: REM (Shift)+(Del) verwijdert alle frameinhoud ------------------------------- ****144;71;14(text:p)REM Select All REM Selecteer alles ------------------------------- ****145;71;14(text:p)REM Delete all REM Verwijder alles ------------------------------- ****146;39;65(text:p)Case 12800: REM (Ctrl)(Shift)+(A) Aligns the frame to the center. Case 12800: REM (Ctrl)(Shift)+(A) Lijnt het frame uit in het midden. ------------------------------- ****147;71;20(text:p)Rem center the frame Rem centreer het frame ------------------------------- ****148;39;62(text:p)Case 12802: REM (Ctrl)(Shift)+(C) makes the background pinkish Case 12802: REM (Ctrl)(Shift)+(C) maakt de achtergrond roze ------------------------------- ****149;71;42(text:p)REM Set Background color= RGB(255,127,127) REM Stel achtergrondkleur in op = RGB(255,127,127) ------------------------------- ****151;55;112(text:p)Case else REM All other keys do not have special functions; thus try to execute them using $[officename ] Writer Case else REM Alle andere toetsen hebben geen speciale functies; probeer daarom om ze uit te voeren met behulp van $[officename ] Writer ------------------------------- ****153;39;14(text:p)KeyNoAlpha = 0 GeenAlfaToets = 0 ------------------------------- ****155;39;10(text:p)End Select End Select ------------------------------- ****157;39;12(text:p)End Function End Function ------------------------------- ****159;40;72(text:p)The passed parameters of the FUNCTION depend of the corresponding event: De geldige parameters van de FUNCTION hangen af van de overeenkomstige gebeurtenis: ------------------------------- ****166;37;5(text:p)Event Gebeurtenis ------------------------------- ****169;37;6(text:p)Syntax Syntaxis ------------------------------- ****175;45;32(text:p)Input of alphanumeric characters Invoer van alfanumerieke tekens ------------------------------- ****178;45;63(text:p)FUNCTION Alpha(FrameName as String, Code as Integer) as Integer FUNCTION Alfa(FrameName as String, Code as Integer) as Integer ------------------------------- ****183;45;36(text:p)Input of non-alphanumeric characters Invoer van niet-alfanumerieke tekens ------------------------------- ****186;45;69(text:p)FUNCTION NotAlpha(FrameName as String, KeyCode as Integer) as Integer FUNCTION GeenAlfa(FrameName as String, KeyCode as Integer) as Integer ------------------------------- ****191;45;12(text:p)Resize frame Verander afmeting frame ------------------------------- ****194;45;93(text:p)FUNCTION FrameSize(FrameName as String, HandleID as Integer, X as Long, Y as Long) as Integer FUNCTION FrameMaat(FrameName as String, HandleID as Integer, X as Long, Y as Long) as Integer ------------------------------- ****199;45;10(text:p)Move frame Verplaatsen frame ------------------------------- ****202;45;76(text:p)FUNCTION FramePosition(FrameName as String, X as Long, Y as Long) as Integer FUNCTION FramePositie(FrameName as String, X as Long, Y as Long) as Integer ------------------------------- ****207;33;9(text:p)Parameter Parameter ------------------------------- ****208;40;67(text:p)FrameName: Name of the frame, in which the respective event occurs. FrameName: Naam van het frame, waarin de respectievelijke gebeurtenis voorkomt. ------------------------------- ****209;40;53(text:p)Code: The ASCII code for the character to be entered. Code: De ASCII code voor het teken dat moet worden ingevoerd. ------------------------------- ****210;40;11(text:p)KeyCode: A KeyCode: Een ****210;69;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****210;100;59() specific code for the nonprinting character to be entered. specifieke code voor het niet-afdrukbare teken dat moet worden ingevoerd. ------------------------------- ****211;40;113(text:p)HandleID: The ID number of the point, at which the frame size will be changed. The following values are possible: HandleID: Het ID-nummer van het punt, waar het frame van grootte zal worden veranderd. de volgende waarden zijn mogelijk: ------------------------------- ****218;46;1(text:p)1 1 ------------------------------- ****221;46;8(text:p)Top Left Linkerbovenkant ------------------------------- ****227;45;1(text:p)2 2 ------------------------------- ****230;45;10(text:p)Top center Midden Bovenkant ------------------------------- ****235;45;1(text:p)3 3 ------------------------------- ****238;45;9(text:p)Top right Rechterbovenkant ------------------------------- ****243;45;1(text:p)4 4 ------------------------------- ****246;45;12(text:p)Middle, left Midden, links ------------------------------- ****251;45;1(text:p)5 5 ------------------------------- ****254;45;13(text:p)Middle, right Midden, rechts ------------------------------- ****259;45;1(text:p)6 6 ------------------------------- ****262;45;12(text:p)Bottom, left Linkeronderkant ------------------------------- ****267;45;1(text:p)7 7 ------------------------------- ****270;45;14(text:p)Bottom, middle Midden Onderkant ------------------------------- ****275;45;1(text:p)8 8 ------------------------------- ****278;45;13(text:p)Bottom, right Rechteronderkant ------------------------------- ****283;40;47(text:p)X: X difference to the starting point in twips. X: X verschil naar het beginpunt in twips. ------------------------------- ****284;40;47(text:p)Y: Y difference to the starting point in twips. Y: Y verschil naar het beginpunt in twips. ####Text\SBASIC\COMMON\01000000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;35(subject)Programming with %PRODUCTNAME Basic Programmeren met %PRODUCTNAME BASIC ------------------------------- ****60;96;17(help:link)Programming with Programmeren met ****60;131;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****60;162;7() Basic BASIC ****61;40;73(text:p)This is where you find general information about working with macros and Hier vindt u algemene informatie over het werken met macro's en ****61;131;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****61;162;7() Basic. BASIC. ####Text\SBASIC\COMMON\01010000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;6(subject)Basics Basis ------------------------------- ****58;59;6(help:link)Basics Basis ****59;40;56(text:p)This section provides the fundamentals for working with Dit bereik biedt u de fundamenten voor het werken met ****59;114;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****59;145;7() Basic. BASIC. ####Text\SBASIC\COMMON\01010210.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;29(subject)%PRODUCTNAME Basic is modular %PRODUCTNAME BASIC is modulair ------------------------------- ****60;77;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****60;108;17() Basic is modular BASIC is modulair ****61;40;17(text:p)Programming with Programmeren met ****61;75;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****61;106;258() Basic is based on single Subs and Functions, which always end with "End Sub" or "End Function". In each Sub or Function, another Subs and Functions can be called. When a macro is executed, it automatically calls the first respective Sub. BASIC is gebaseerd op enkelvoudige Subs en Functions, welke altijd eindigen met "End Sub" of "End Function". In elke Sub of Function, kunnen andere Subs en Functions worden benoemd. Als een macro wordt uitgevoerd, roept hij automatisch de eerste respectievelijke Sub aan. ------------------------------- ****63;37;14(text:p)What is a Sub? Wat is een Sub? ------------------------------- ****64;40;351(text:p)Sub is a short form for subroutine, i.e. it is a sub-procedure, which handle a certain task within another program. Split the task you want to program into individual procedures, then split each procedure into the steps you need for the Sub. This means that the entire program should be split into hierarchically ordered procedures and sub-procedures. Sub is een verkorte vorm voor subroutine, d.w.z. het is een sub-procedure, welke een zekere taak binnen een ander programma behandelt. Splits de taak die u wilt programmeren in individuele procedures, splits dan elke procedure in de stappen die u nodig heeft voor de Sub. Dit betekent dat het gehele programma zou moeten worden splitsen in hierarchisch geordende procedures en sub-procedures. ------------------------------- ****65;37;19(text:p)What is a Function? Wat is een Function (functie)? ------------------------------- ****66;40;188(text:p)A function is essentially a procedure, which directly returns a value. You may use a function at the right side of a variable declaration, or at other places where you normally use values. Een functie is in essentie een procedure, welke direct een waarde teruggeeft. U kunt een functie gebruiken aan de rechterkant van een variabele declaratie of op andere plaatsen waar u normaal gesproken waarden gebruikt. ------------------------------- ****67;40;364(text:p)The more common you code a Sub or Function, the higher is the probability that you can re-use it in other programs. If your code tests text entries for a length of more than 6 characters, then you should write a function that utilizes the upper limit 6 as a parameter. This way you can use the same function to test a text entry for, e.g., more than 20 characters. Hoe algemener u een Sub of Function maakt (codeert), des te groter is de kans dat u het in andere programma's kunt hergebruiken. Als uw code tekstingangen voor een lengte van meer dan 6 tekens test, moet u een functie schrijven die de bovengrens 6 als een parameter gebruikt. Op die manier kunt u dezelfde functie gebruiken om een tekstitem voor, bijv., meer dan 20 tekens te testen. ------------------------------- ****68;37;26(text:p)Global and local variables Globale en lokale variabelen ------------------------------- ****69;40;3(text:p)In In ****69;61;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****69;92;152() Basic you can declare variables that are valid globally for all subs. Also variables are possible that are not explicitly declared in a Dim statement; BASIC kunt u variabelen declareren die globaal geldig zijn voor alle subs. Ook variabelen die niet expliciet zijn gedeclareerd in een Dim statement zijn mogelijk; ****69;262;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****69;293;53() Basic declares these variables internally. See also BASIC declareert deze variabelen intern. Zie ook ****69;368;24(help:link)Procedures and Functions Procedures en Functies ****69;404;1(). . ------------------------------- ****70;40;335(text:p)Variables that you declare within a sub or function are valid only inside this sub or function. These variables have priority over possible variables with the same name in higher subs, and over global variables that are valid only after the sub has ended. With this exception, global variables are valid everywhere else in the program. Variabelen die u declareert binnen een sub of functie zijn alleen binnen deze sub of functie geldig. Deze variabelen hebben prioriteit boven mogelijke variabelen met dezelfde naam in hogere subs en boven globale variabelen die alleen geldig zijn nadat de sub is geeindigd. Met deze uitzondering: globale variabelen zijn op elke andere plaats in het programma geldig. ------------------------------- ****71;37;19(text:p)Program structuring Programmastructuur ------------------------------- ****72;40;195(text:p)After you have broke down your program into procedures and functions (Subs and Functions), you may want to save matching procedures and functions as files, so you can use them in other projects. Nadat u uw programma heeft opgedeeld in procedures en functies (Subs en Functions), kunt u bij elkaar passende procedures en functies als bestanden opslaan als u wilt, zodat u ze dus kunt gebruiken in andere projecten. ****72;253;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****72;284;30() Basic supports this by using BASIC ondersteunt dit door met behulp van ****72;336;21(help:link)Modules and Libraries Modules en Bibliotheken ****72;369;266(). All subs and functions are always contained in modules, and you may use an almost endless number of modules. You can define modules to be global or part of a document. Multiple modules can be combined to a library, and there is no limit to the number of libraries. . Alle subs en functies zijn altijd opgenomen in modules en u kunt een bijna eindeloos aantal modules gebruiken. U kunt modules definiëren om globaal te zijn of als deel van een document. Meerdere modules kunnen worden gecombineerd naar een bibliotheek en er is geen grens aan het aantal bibliotheken. ------------------------------- ****73;40;145(text:p)You can copy or move single subs and functions and even modules and libraries from one file to another file. Find more information in the dialog U kunt enkelvoudige subs en functies en zelfs modules en bibliotheken kopiëren of verplaatsen van één bestand naar een ander bestand. U vindt meer informatie in het dialoogvenster ****73;207;5(help:link)Macro Macro ****73;224;1(). . ####Text\SBASIC\COMMON\01010412.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;16(subject)Saving a Project Een project opslaan ------------------------------- ****61;59;16(help:link)Saving a Project Een project opslaan ****62;40;37(text:p)The following explains how to save a Het volgende verklaart hoe op te slaan een ****62;95;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****62;126;15() Basic project. BASIC project. ------------------------------- ****64;40;14(text:p)To summarize: Om samen te vatten: ****64;72;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****64;103;130() Basic programs (macros) are always attached to a document or a template. Therefore, saving the document automatically stores the BASIC programma's (macros) zijn altijd gehecht aan een document of een sjabloon. Daarom, bij opslaan van het document: automatisch wordt opgeslagen het ****64;251;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****64;282;23() Basic project as well. BASIC project eveneens. ------------------------------- ****65;37;29(text:p)Proceed as follows to save a Doe als volgt om op te slaan een ****65;84;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****65;115;52() Basic project attached to a document or a template: BASIC project gehecht aan een document of een sjabloon: ------------------------------- ****66;40;202(text:p)When you save the document (or template), any libraries or modules (containing SUBS and FUNCTIONS) are saved in the corresponding document. You can either use the Close icon (X) in the Title bar of the Wanneer u het document (of sjabloon) opslaat, alle bibliotheken en modules (waarin SUBS en FUNCTIONS) worden opgeslagen in het overeenkomstige document. U kunt óf gebruiken het Sluiten icoon (X) in de Titelbalk van het ****66;260;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****66;291;39() Basic IDE window, or the menu command BASIC IDE venster, of het menucommando ****66;362;12(text:span)File - Close Bestand - Sluiten ****66;386;27() to save the document with om het document op te slaan met ****66;445;4(text:span)Save Opslaan ****66;461;4() or of ****66;497;7(text:span)Save As Opslaan Als ****66;516;1(). . ------------------------------- ****67;40;148(text:p)To save the document but remain in the IDE to continue programming, switch to the document to which the project is attached. Save the document with Om het document te opslaan maar te blijven in de IDE om door te gaan met programmeren, schakel naar het document waaraan het project is gehecht. Sla het document op met ****67;220;11(text:span)File - Save Bestand - Opslaan ****67;243;1(). . ------------------------------- ****68;37;9(text:p)Saving a Opslaan een ****68;64;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****68;95;29() Basic Project Attached to a BASIC Project gehecht aan een ****68;142;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****68;173;12() Application programma ------------------------------- ****69;40;17(text:p)When you close a Als u sluit een ****69;75;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****69;106;128() application, any libraries and modules (and corresponding SUBS and FUNCTIONS) added to the application are automatically saved. programma, alle bibliotheken en modules (en overeenkomstige SUBS en FUNCTIONS) toegevoegd aan het programma worden automatisch opgeslagen. ####Text\SBASIC\COMMON\01020000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;26(subject)"Technical Data" "Technische Gegevens" ------------------------------- ****58;59;26(help:link)"Technical Data" "Technische Gegevens" ****59;40;60(text:p)In the following you will discover the vast capabilities of In het volgende gedeelte zult u meer ontdekken van de omvangrijke mogelijkheden van ****59;118;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****59;149;65() Basic. Here you will find which variable types are supported by BASIC. Hier vindt u welke variabele types worden ondersteund door ****59;232;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****59;263;137() Basic and the value range for certain variables, as well as a description of tools such as Modules and Libraries used to structure your BASIC en de waardebereiken voor bepaalde variabelen, evenals een beschrijving van werktuigen, zoals Modules en Bibliotheken, die gebruikt worden voor structuur in uw ****59;418;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****59;449;10() programs. programma's . ####Text\SBASIC\COMMON\01020100.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;9(subject)Variables Variabelen ------------------------------- ****126;59;9(help:link)Variables Variabelen ****126;102;18(keyword)names of variables namen van variabelen ****126;161;9(keyword)variables variabelen ****127;40;58(text:p)The following describes some of the most common variables. Het volgende gedeelte beschrijft sommige van de meest algemene variabelen. ------------------------------- ****129;40;192(text:p)Variables are an essential component of Basic programs. Variables store numeric values, strings or objects at runtime. Variables can be read by the program or the contents can be modified. In Variabelen zijn een essentieel onderdeel van BASIC programma's . Variabelen slaan numerieke waarden, tekenreeksen of objecten in runtime op. Variabelen kunnen worden gelezen door het programma of de inhoud kan worden gewijzigd. In ****129;250;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****129;281;151() Basic, you don't need to declare variables explicitly. As soon as a variable is used the first time, it is declared automatically. The statement BASIC, hoeft u niet expliciet variabelen te benoemen. Zodra een variabele de eerste keer is gebruikt, is hij automatisch benoemd. De instructie ****129;464;15(text:span)Option Explicit Option Explicit ****129;491;54() can be used to force a variable-declaration with the kan worden gebruikt om een variable-benoeming te forceren met de ****129;577;3(text:span)Dim Dim ****129;592;11() statement. instructie. ------------------------------- ****130;37;32(text:p)Naming Conventions for Variables Regels voor naamgeving van variabelen ------------------------------- ****131;40;304(text:p)A variable name can consist of a maximum of 255 characters. The first character of a variable name must be a letter of the alphabet. Numbers can also be used in a variable name, but punctuation symbols and special characters are not permitted, with exception of the underscore character ("_"). Een variabelenaam kan bestaan uit een maximum van 255 tekens. Het eerste teken van een variabelenaam moet een letter van het alfabet zijn. Getallen kunnen ook worden gebruikt in een variabelenaam, maar interpunctietekens en speciale tekens zijn niet toegestaan, met uitzondering van het onderstreep-teken ("_"). ****131;362;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****131;393;122() Basic does not distinguish between upper and lower-case letters. Variable names with spaces must be enclosed in brackets. BASIC maakt geen onderscheid tussen hoofd- en kleine letters. Variabelenamen met spaties moeten tussen haakjes staan. ------------------------------- ****132;40;14(text:p)Some examples: Enkele voorbeelden: ------------------------------- ****139;43;9(text:p)Surname=5 Achternaam=5 ------------------------------- ****142;46;30(text:p)Correct, no invalid characters Juist, geen ongeldige tekens ------------------------------- ****148;42;11(text:p)Surname5=15 Achternaam5=15 ------------------------------- ****151;45;38(text:p)Correct, variable starts with a letter Juist, variabele begint met een letter ------------------------------- ****156;42;12(text:p)Surname_5=20 Achternaam_5=20 ------------------------------- ****159;45;27(text:p)Correct, underscore allowed Juist, onderstreep toegestaan ------------------------------- ****164;42;13(text:p)First Name=20 Voor Naam=20 ------------------------------- ****167;45;59(text:p)Not valid, variable with space must be enclosed in brackets Niet geldig, variabele met spatie moet tussen haakjes staan ------------------------------- ****172;42;11(text:p)DéjàVu=25 DéjàVu=25 ------------------------------- ****175;45;41(text:p)Not valid, special characters not allowed Niet geldig, speciale tekens niet toegestaan ------------------------------- ****180;42;12(text:p)5Surnames=12 5Achternamen=12 ------------------------------- ****183;45;40(text:p)Not valid, variable begins with a number Niet geldig, variabele begint met een getal ------------------------------- ****188;42;15(text:p)[First Name]=12 [Voor Naam]=12 ------------------------------- ****191;45;49(text:p)Correct, variable with space enclosed in brackets Juist, variabele met spatie tussen haakjes ------------------------------- ****196;42;13(text:p)First,Name=12 Voor,Namen=12 ------------------------------- ****199;45;40(text:p)Not valid, punctuation marks not allowed Niet geldig, interpunctietekens niet toegestaan ------------------------------- ****203;37;21(text:p)Variable Declarations Variabele benoemen ------------------------------- ****204;40;3(text:p)In In ****204;61;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****204;92;154() Basic, as opposed to other programming languages, you don't need to declare variables explicitly. An variable declaration can be performed with the BASIC, tegengesteld aan andere programmeertalen, hoeft u variabelen niet expliciet te benoemen. Een variabele benoeming kan worden uitgevoerd met de ****204;278;3(text:span)Dim Dim ****204;293;222() statement. You can declare more than one variable at a time by separating the names with a comma. To define the variable type, use either a type-declaration sign after the name, or the appropriate key word. Some examples: instructie. U kunt per keer meer dan één variabele benoemen door de namen met een komma te scheiden. Om het variabele type te definiëren, gebruik óf een typedeclaratie teken na de naam óf het toepasselijke sleutelwoord. Enkele voorbeelden: ------------------------------- ****211;43;6(text:p)DIM a$ DIM a$ ------------------------------- ****214;46;47(text:p)Declares the variable "a" as a String Declareert de variabele "a" als een String ------------------------------- ****220;42;15(text:p)DIM a As String DIM a As String ------------------------------- ****223;45;47(text:p)Declares the variable "a" as a String Declareert de variabele "a" als een String ------------------------------- ****228;42;20(text:p)DIM a$, b As Integer DIM a$, b As Integer ------------------------------- ****231;45;75(text:p)Declares one variable as a String and one as an Integer, separated by comma Declareert één variabele als een tekenreeks en één als een Integer, gescheiden door een komma ------------------------------- ****235;40;204(text:p)It is very important when declaring variables that you use the type-declaration character each time, even if it was used in the declaration instead of a keyword. Thus the following statements are invalid: Het is erg belangrijk bij het benoemen van variabelen dat u het typedeclaratie teken altijd gebruikt, zelfs als het wordt gebruikt in de benoeming in plaats van een sleutelwoord. Daarom zijn de volgende instructies ongeldig: ------------------------------- ****242;43;6(text:p)DIM a$ DIM a$ ------------------------------- ****245;43;34(text:p)Declares "a" as a String Declareert "a" als een String ------------------------------- ****251;42;24(text:p)a="TestString" a="TestString" ------------------------------- ****254;42;41(text:p)Type-declaration missing: "a$=" Type-declaratie ontbreekt: "a$=" ------------------------------- ****268;46;131(text:p)Once you have declared a variable as a certain type, you cannot declare the variable under the same name again as a different type! Eén keer heeft u een variabele als een bepaald type benoemd, u kunt de variabele onder dezelfde naam niet nogmaals als een ander type benoemen! ------------------------------- ****274;37;29(text:p)Forcing Variable Declarations Forceren variabele benoemen ------------------------------- ****275;40;66(text:p)To force every variable to be declared, use the following command: Om te forceren dat iedere variabele wordt benoemd, gebruik het volgende commando: ------------------------------- ****276;39;15(text:p)OPTION EXPLICIT OPTION EXPLICIT ------------------------------- ****277;40;286(text:p)The Option Explicit statement has to be the first line in the source code of a module, i.e., before the first SUB. Generally, only Arrays need to be declared explicitly. All other variables are declared according to the type-declaration character, or - if omitted - as the default type De OPTION EXPLICIT instructie moet de eerste regel in de broncode van een module zijn , d.w.z., vóór de eerste SUB. In het algemeen moeten alleen Arrays expliciet worden benoemd. Alle andere variabelen worden benoemd volgens het typedeclaratie teken, of - indien weggelaten - als het standaardwaarde type ****277;358;6(text:span)Single Enkelvoudige ****277;376;133(). One advantage of forcing variable declaration is the prevention of spelling mistakes. Here's an example of a forced declation: . Eén voordeel van de geforceerde variabele benoeming is het voorkomen van spelfouten. Hier is een voorbeeld van een geforceerde benoeming: ------------------------------- ****278;40;178(text:p)Assume the variable StorageMedium$ has been used in a SUB. At some point in the program code, you assign a specific event to the variable with the following (misspelled) command: Neem aan dat de variabele OpslagMedium$ gebruikt geweest is in een SUB. Op enig punt in de programmacode, kent u een specifieke gebeurtenis toe aan de variabele met het volgende (met spelfouten) commando: ------------------------------- ****279;39;26(text:p)StorageMedium$=Expression$ OpslagMedium$=Expression$ ------------------------------- ****280;58;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****280;89;133() Basic would obviously accept this expression as a new variable, since variables usually don't need to be declared. If you used BASIC zou eigenlijk deze uitdrukking als een nieuwe variabele moeten accepteren, aangezien variabelen doorgaans niet behoeven te zijn benoemd. Als u gebruikt ****280;254;15(text:span)Option Explicit Option Explicit ****280;281;121() however, StarBasic would not recognize the (incorrect) variable name and would report an error when you run the program. echter, zou StarBasic de (incorrecte) variabelenaam niet herkennen en zou een fout rapporteren wanneer u het programma uitvoert. ------------------------------- ****281;59;18(keyword)types of variables types van variabelen ****281;96;18(text:p)Types of Variables Types van Variabelen ------------------------------- ****282;58;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****282;89;111() Basic supports a number of variable types. Variables can generally be categorized in the four following types: BASIC ondersteunt een aantal variabele types. Variabelen kunnen in het algemeen worden onderscheiden in de vier volgende types: ------------------------------- ****283;72;7(text:span)Numeric Numerieke ****283;91;430() variables can contain number values in certain range limits. Certain variables are used to store large or small numbers, and others for floating-point or fractional numbers. Each of the variable types has advantages and disadvantages. For instance, integer variables do not require much memory and thus are rapidly calculated. Floating-point numbers, however, require more memory and time (for calculation), but are more precise. variabelen kunnen getalwaarden binnen zekere bereikbegrenzingen bevatten. Bepaalde variabelen wordengebruikt voor het opslaan van grote of kleine getallen, en andere voor verplaatsende-komma of breuk-getallen. Elk van de variabele types heeft voordelen en nadelen. Bijvoorbeeld, Integer variabelen hebben niet veel geheugen nodig en zijn daarom snel berekend. Floating-point getallen, echter, hebben meer geheugen en tijd nodig (voor calculation), maar zijn meer precies. ------------------------------- ****284;72;6(text:span)String tekenreeks ****284;90;45() variables contain strings of any characters. variabelen bevat tekenreeksen van willekeurige tekens. ------------------------------- ****285;72;7(text:span)Boolean Boolean ****285;91;54() variables can only indicate the status TRUE or FALSE. variabelen kunnen alleen de status TRUE of FALSE aangeven. ------------------------------- ****286;72;6(text:span)Object Object ****286;90;225() variables can store objects of various types. Objects, for instance, can refer to tables and documents within a document. You can use the corresponding methods and properties in the program to "edit" these objects. variabelen kunnen objecten van verschillende types opslaan. Objecten, bijvoorbeeld, kunnen verwijzen naar tabellen en documenten binnen een document. U kunt de overeenkomstige methoden en eigenschappen gebruiken in het programma om deze objecten te "bewerken". ------------------------------- ****287;37;17(text:p)Integer Variables Geheel getal-Variabelen ------------------------------- ****288;40;29(text:p)Integer variables range from Geheel getal-variabelen vallen binnen het bereik van ****288;78;281(text:p)-32768 to 32767. If you assign a floating-point value to an integer variable, the decimal places are truncated. Integer variables are rapidly calculated in procedures and are suitable for counter variables in loops. Internally, an integer variable only requires 2 bytes of memory. -32768 tot 32767. Als u een verplaatsende-kommawaarde aan een Integer-variabele toekent, de decimale plaatsen worden afgekort. Geheel getal variabelen worden snel berekend in procedures en zijn geschikt voor telling-variabelen in loops. Intern heeft een Integer-variabele maar 2 bytes van het geheugen nodig. ****288;368;48(text:p)"%" is the type-declaration character. "%" is het typedeclaratieteken. ------------------------------- ****289;40;12(text:p)Declaration: Declaratie: ------------------------------- ****290;39;13(text:p)Dim Variable% Dim Variable% ------------------------------- ****291;39;23(text:p)Dim Variable As Integer Dim Variabele As Integer ------------------------------- ****292;37;22(text:p)Long Integer Variables Long Integer getal-Variabelen ------------------------------- ****293;40;364(text:p)Long integers can hold whole numbers between -2,147,483,648 and 2,147,483,647. If you assign a floating-point value to an integer variable, the decimal places are truncated. Long integer variables are rapidly calculated in procedures and are suitable for counter variables in loops for large values. Internally, a long integer variable requires 4 bytes of memory. Long Integer getallen kunnen bestaan uit gehele getallen tussen -2,147,483,648 en 2,147,483,647. Als u een verplaatsende-kommawaarde aan een Integer-variabele toekent, worden de decimale plaatsen afgekort. Long Integer getal-variabelen worden snel berekend in procedures en zijn geschikt voor telling-variabelen in loops voor grote waarden. Intern heeft een Long Integer getal-variabele 4 bytes van het geheugen nodig. ****293;413;52(text:p)"&" is the type-declaration character. "&" is het typedeclaratieteken. ------------------------------- ****294;40;12(text:p)Declaration: Declaratie: ------------------------------- ****295;39;17(text:p)Dim Variable& Dim Variable& ------------------------------- ****296;39;20(text:p)Dim Variable as Long Dim Variabele as Long ------------------------------- ****297;37;16(text:p)Single Variables Single Variabelen ------------------------------- ****298;40;268(text:p)Single variables can hold positive or negative values from 3,402823 x 10E38 to 1,401298 x 10E-45. Single variables are floating-point variables. A characteristic of these numbers is that the decimal precision decreases as the non-decimal part of the number increases. Enkelvoudige variabelen kunnen bestaan uit positieve of negatieve waarden van 3,402823 x 10E38 tot 1,401298 x 10E-45. Enkelvoudige variabelen zijn verplaatsende-komma variabelen. Een karakteristiek van deze getallen is dat de decimale nauwkeurigheid vermindert als het niet-decimale deel van het getal vermeerdert. ****298;317;289(text:p)Single variables are suitable for mathematical calculations of average precision. Calculations require more time than for Integer variables, but are faster than calculations with Double variables. Internally, a Single variable requires 4 bytes of memory. The type-declaration character is Enkelvoudige variabelen zijn geschikt voor wiskundige berekeningen van gemiddelde nauwkeurigheid. Berekeningen duren langer dan voor Geheel getal-variabelen, maar zijn sneller dan berekeningen met Dubbele-variabelen. Intern heeft een Enkelvoudige variabele 4 bytes van het geheugen nodig. Het typedeclaratieteken is ****298;615;14(text:p)"!". "!". ------------------------------- ****299;39;13(text:p)Dim Variable! Dim Variabele! ------------------------------- ****300;39;22(text:p)Dim Variable as Single Dim Variabele as Single ------------------------------- ****301;37;16(text:p)Double Variables Double Variabelen ------------------------------- ****302;40;375(text:p)Double variables can hold positive or negative values from 1,79769313486232 x 10E308 to 4,94065645841247 x 10E-324. Double variables are floating-point variables, in which the decimal precision decreases as the non-decimal part of the number increases. Double variables are suitable for precise calculations and require 8 bytes of memory. The type-declaration character is Dubbele variabelen kunnen bestaan uit positieve of negatieve waarden van 1,79769313486232 x 10E308 tot 4,94065645841247 x 10E-324. Dubbele variabelen zijn verplaatsende-komma variabelen, waarin de decimale nauwkeurigheid vermindert als dhet non-decimale deel van het getal vermeerdert. Dubbele variabelen zijn geschikt voor precieze berekeningen enhebben 8 bytes van het geheugen nodig. Het typedeclaratieteken is ****302;424;14(text:p)"#". "#". ------------------------------- ****303;39;13(text:p)Dim Variable# Dim Variable# ------------------------------- ****304;39;22(text:p)Dim Variable As Double Dim Variabele As Double ------------------------------- ****305;37;18(text:p)Currency Variables Valuta Variabelen ------------------------------- ****306;40;391(text:p)Currency variables are stored internally as 64-bit numbers (8 Bytes), displayed in integer format and divided by 10,000. This results in a fixed-decimal format with 15 non-decimal and 4 decimal places. The values must lie in the range from -922.337.203.685.477,5808 to +922.337.203.685.477,5807. Currency variables are used to calculate currency values with a relatively high precision. The Valuta-variabelen worden intern opgeslagen als 64-bit getallen (8 Bytes), getoond in Integer-opmaak en gedeeld door 10.000. Deze resulteren in een vast-decimale opmaak met 15 niet-decimale en 4 decimale plaatsen. De waarden moet liggen in het bereik van -922.337.203.685.477,5808 tot +922.337.203.685.477,5807. Valuta-variabelen worden gebruikt om valutawaarden met een relatief hoge nauwkeurigheid te berekenen. Het ****306;440;44(text:p)type-declaration character is "@". typedeclaratie teken is "@". ------------------------------- ****307;39;13(text:p)Dim Variable@ Dim Variable@ ------------------------------- ****308;39;24(text:p)Dim Variable As Currency Dim Variabele As Currency ------------------------------- ****309;37;16(text:p)String Variables String Variabelen ------------------------------- ****310;40;441(text:p)String variables can hold any character string with up to 64,000 characters. Each character is stored as a 1-byte ASCII character. String variables are suitable for word processing within programs and for temporary storage of any non-printable character up to a maximum length of 64 Kbytes. The memory required for storing string variables depends on the number of characters in the variable. The type-declaration character is "$". Tekenreeks-variabelen (String) kunnen bestaan uit een willekeurige tekenreeks tot max. 64.000 tekens. Elk teken wordt opgeslagen als een 1-byte ASCII teken. Tekenreeks-variabelen zijn geschikt voor tekstverwerking binnen programma's en voor tijdelijk opslag van een willekeurig niet-afdrukbaar teken tot een maximumlengte van 64 Kbytes. Het geheugen benodigd voor de opslag van tekenreeks-variabelen hangt af van het aantal tekens in de variabele. Het typedeclaratieteken is "$". ------------------------------- ****311;39;13(text:p)Dim Variable$ Dim Variable$ ------------------------------- ****312;39;22(text:p)Dim Variable As String Dim Variabele As String ------------------------------- ****314;37;17(text:p)Boolean Variables Boolean Variabelen ------------------------------- ****315;40;78(text:p)Boolean variables store only one of two values: TRUE or FALSE. If you use the Boolean variabelen slaan alleen één van twee waarden: TRUE of FALSE op. Als u gebruikt het ****315;150;5(text:span)Print Print ****315;167;424() command to display the content of a Boolean variable, True is returned as "-1", False as "0". Booleans are used to store binary values, e.g., a result of a comparison. Internally, a 2-byte integer value is stored. Any value assigned to a Boolean is converted to "False" if the value is not exactly equal to "-1". Boolean variables can only be declared by the key words True or False. commando om de inhoud van een Boolean variabele te tonen, wordt TRUE weergegeven als "-1"en FALSE als "0". Booleans worden gebruikt voor het opslaan van binaire waarden, bijv., het resultaat van een vergelijking. Intern wordt een 2-byte Integer-waarde opgeslagen. Elke waarde, toegekend aan een Boolean wordt geconverteerd naar "False" als de waarde niet precies gelijk is aan "-1". Boolean-variabelen kunnen alleen worden benoemd door de sleutelwoorden TRUE of FALSE. ------------------------------- ****316;39;23(text:p)Dim Variable As Boolean Dim Variabele As Boolean ------------------------------- ****317;37;14(text:p)Date Variables Datum Variabelen ------------------------------- ****318;40;123(text:p)Date variables can only contain dates and time values stored in an internal format. Values assigned to Date variables with Datum-variabelen kunnen alleen datum- en tijd-waarden bevatten, opgeslagen in een interne opmaak. Waarden toegekend aan Datum variabelen met ****318;195;10(text:span)Dateserial Dateserial ****318;217;2(), , ****318;251;9(text:span)Datevalue Datevalue ****318;272;2(), , ****318;306;10(text:span)Timeserial Timeserial ****318;328;4() or of ****318;364;9(text:span)Timevalue Timevalue ****318;385;113() are automatically converted to the internal format. Date-variables are converted to normal numbers by using the worden automatisch geconverteerd naar de interne opmaak. Datum-variables worden geconverteerd naar normale getallen met behulp van de ****318;530;3(text:span)Day Day ****318;545;2(), , ****318;579;5(text:span)Month Month ****318;596;2(), , ****318;630;4(text:span)Year Year ****318;646;8() or the of de ****318;686;4(text:span)Hour Hour ****318;702;2(), , ****318;736;6(text:span)Minute Minute ****318;754;2(), , ****318;788;6(text:span)Second Second ****318;806;178() function. The internal format enables a comparison of date/time values by calculating the difference between two numbers. These variables can only be declared with the key word functie. De interne opmaak maakt een vergelijking van datum/tijd-waarden mogelijk door het verschil tussen twee getallen te berekenen. Deze variabelen kunnen alleen worden benoemd met het sleutelwoord ****318;1016;4(text:span)Date Date ****318;1032;1(). . ------------------------------- ****319;39;20(text:p)Dim Variable As Date Dim Variabele As Date ------------------------------- ****320;37;18(text:p)Defining Variables Definiëren Variabelen ------------------------------- ****321;40;206(text:p)As soon as the variable has been declared, it is automatically set to the "Null" value, i.e., you do not need to manually reset a declared variable to a zero-value. Note the following conventions: Zodra de variabele benoemd is geworden, wordt het automatisch ingesteld op de "Null" waarde, d.w.z., u hoeft niet handmatig een benoemde variabele op een nulwaarde in te stellen. Let op de volgende regels: ------------------------------- ****322;72;7(text:span)Numeric Numerieke ****322;91;91() variables are automatically assigned the value "0" as soon as they are declared. variabelen worden automatisch de waarde "0" toegekend zodra zij zijn benoemd. ------------------------------- ****323;72;14(text:span)Date variables Datum variabelen ****323;98;76() are assigned the value 0 internally; equivalent to converting the value to wordt de waarde 0 intern toegekend; hetzelfde als het omzetten naar de waarde ****323;183;23()"0" with the "0" met de ****323;238;3(text:span)Day Day ****323;253;2(), , ****323;287;5(text:span)Month Month ****323;304;2(), , ****323;347;4(text:span)Year Year ****323;363;4() or of ****323;399;4(text:span)Hour Hour ****323;415;2(), , ****323;449;6(text:span)Minute Minute ****323;467;2(), , ****323;501;6(text:span)Second Second ****323;519;10() function. functie. ------------------------------- ****324;72;16(text:span)String variables Tekenreeks-variabelen ****324;100;68() are assigned an empty-string ("") when they are declared. worden een lege-reeks ("") toegekend wanneer zij worden benoemd. ------------------------------- ****325;37;27(text:p)Predefined system variables Voorgedefinieerde systeemvariabelen ------------------------------- ****326;58;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****326;89;99() Basic supports several predefined system variables that always return a certain result in a query: BASIC ondersteunt verschillende voorgedefinieerde systeemvariabelen die altijd een zeker resultaat weergeven in een zoekvraag: ------------------------------- ****327;37;14(text:p)TRUE and FALSE TRUE en FALSE ------------------------------- ****328;40;125(text:p)These are Boolean variables and return either the value 0 (FALSE) or -1 (TRUE). These variables can be used, for example, in Dit zijn Boolean-variabelen en geven of de waarde 0 (FALSE) of -1 (TRUE). Deze variabelen kunnen worden gebruikt, bijvoorbeeld, in ****328;197;16(text:span)If...Then...Else If...Then...Else ****328;225;108() queries to test the logical value of a comparison. Comparisons are represented by the comparison operators zoekvragen om de logische waarde van een vergelijking te testen. Vergelijkingen worden weergegeven door de vergelijkingoperatoren ****328;342;30()(=, <, >) The statement: (=, <, >) Het argument: ------------------------------- ****329;39;9(text:p)PRINT 5=3 PRINT 5=3 ------------------------------- ****330;40;78(text:p)returns the value 0 (FALSE), since the expression 5=3 is false. The statement: geeft de waarde 0 (FALSE) weer, aangezien de uitdrukking 5=3 onwaar is. Het argument: ------------------------------- ****331;39;12(text:p)PRINT 5>3 PRINT 5>3 ------------------------------- ****332;40;235(text:p)returns the value -1 (TRUE), since the expression is true. The use of system variables doesn't technically alter the actual numeric values of 0 or -1, but the use of TRUE / FALSE variables improves the readability of program code. geeft de waarde -1 (TRUE) weer, aangezien de uitdrukkingx waar is. Het gebruik van systeemvariabelen verandert technisch niet de huidige numerieke waarden van 0 of -1, maar het gebruik van TRUE / FALSE variabelen verbetert de leesbaarheid van programmacode. ------------------------------- ****333;37;2(text:p)PI PI ------------------------------- ****334;40;82(text:p)PI is a mathematical constant that returns the infinite number Pi = 3,141592657... PI is een wiskundige constante die het oneindige getal Pi = 3,141592657... weergeeft. ------------------------------- ****335;37;6(text:p)Arrays Arrays ------------------------------- ****336;58;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****336;89;263() Basic uses single or multiple arrays, defined by a specified variable type. Arrays are suitable for editing lists and tables in programs. The advantage of an array is that the individual elements can be addressed via an index of numeric expressions or variables. BASIC gebruikt enkele of meervoudige matrices, gedefinieerd door een gespecificeerd variabelentype . Arrays zijn geschikt om overzichten en tabellen in programma's te bewerken. Het voordeel van een matrix is dat de individuele elementen kunnen worden geadresseerd via een index van numerieke uitdrukkingen of variabelen. ------------------------------- ****337;40;29(text:p)Arrays are declared with the Arrays worden benoemd met de ****337;101;3(text:span)Dim Dim ****337;116;71() statement. There are two ways to define how an index can be addressed: instructie. Er zijn twee manieren om te definiëren hoe een index kan worden geadresseerd: ------------------------------- ****343;43;13(text:p)DIM text$(20) DIM text$(20) ------------------------------- ****346;43;33(text:p)21 elements numbered from 0 to 20 21 elementen genummerd van 0 tot 20 ------------------------------- ****352;42;15(text:p)DIM text$(10,2) DIM text$(10,2) ------------------------------- ****355;42;40(text:p)33 elements, Dimension 0, from 0 to 10, 33 elementen, Afmeting 0, van 0 tot 10, ****355;91;53(text:p)Dimension 1, from 0 to 10, Dimension 2, from 0 to 10. Afmeting 1, van 0 tot 10, Afmeting 2, van 0 tot 10. ------------------------------- ****360;42;18(text:p)DIM text$(5 to 25) DIM text$(5 to 25) ------------------------------- ****363;42;33(text:p)21 elements numbered from 5 to 25 21 elementen genummerd van 5 tot 25 ------------------------------- ****368;42;19(text:p)DIM text$(-15 to 5) DIM text$(-15 to 5) ------------------------------- ****371;42;49(text:p)21 elements (including 0), numbered from -15 to 5 21 elementen (waaronder 0), genummerd van -15 tot 5 ------------------------------- ****375;40;142(text:p)The index range can include positive as well as negative numbers. The maximum number of elements that can be addressed via an index is 16,368. Het indexbereik kan zowel positieve als negatieve getallen bevatten. Het maximum aantal elementen dat kan worden geadresseerd via een index is 16.368. ------------------------------- ****376;37;9(text:p)Constants Constanten ------------------------------- ****377;40;328(text:p)Constants are a "variant" of variables that aid in making program code easier to read. Constants are not defined as a certain type, but are used instead as a placeholder in the program code. A constant can only be defined once in the program and cannot be redefined. The following command is used to define a constant: Constanten zijn een "variant" van variabelen die helpen om programmacode eenvoudiger te lezen te maken. Constanten worden niet gedefinieerd als een bepaald type, maar worden gebruikt in de plaats van een symbool in de programmacode. Een constante kan alleen maar één keer in het programma worden gedefinieerd en kan niet opnieuw worden gedefinieerd. Het volgende commando wordt gebruikt om een constante te definiëren: ------------------------------- ****378;39;26(text:p)CONST ConstName=Expression CONST ConstName=Expression ------------------------------- ****379;40;160(text:p)The kind of an expression specified in the command line is not taken into account. As soon as a program is started, the program code is converted internally in De soort van een uitdrukking, gespecificeerd in de commandoregel, wordt niet in acht genomen. Zodra een programma is begonnen, wordt de programmacode intern geconverteerd naar ****379;218;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****379;249;97() Basic and each constant is replaced with the predefined expression, regardless of constant type. BASIC en elke constante wordt vervangen door de voorgedefinieerde uitdrukking, zonder te letten op het constante-type. ####Text\SBASIC\COMMON\01020200.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;7(subject)Objects Objecten ------------------------------- ****139;59;7(help:link)Objects Objecten ****140;40;46(text:p)The following describes the use of objects in Het volgende deel beschrijft het gebruik van objecten in ****140;104;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****140;135;7() Basic. BASIC. ------------------------------- ****142;37;4(text:p)The De ****142;63;14(keyword)Object Catalog Objectcatalogus ****142;96;14(text:p)Object Catalog Objectcatalogus ------------------------------- ****143;40;87(text:p)The object catalog provides an overview of all modules and dialogs you have created in Het objectcatalogus biedt een overzicht van alle modules en dialogen u heeft gemaakt in ****143;145;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****143;176;1(). . ------------------------------- ****146;35;10(text:p)Click the Klik het ****146;77;14(text:span)Object Catalog Objectcatalogus ****146;103;24() icon in the Macro bar. icoon in de Macro balk. ****146;145;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****146;176;35() Basic displays the object catalog. BASIC geeft de objectcatalogus weer. ------------------------------- ****161;35;299(text:p)The dialog displays a list of all existing objects. Many objects (e.g., documents, templates, and the libraries and modules of application itself ) contain subitems that you can choose to hide or show. By double-clicking a module entry, for example, you can view all the contained SUBS or FUNCTIONS. Het dialoogvenster geeft een lijst weer van alle bestaande objecten. Veel objecten (bijv., documenten, sjablonen en de bibliotheken en modules van de toepassing zelf ) bevatten subitems die u kunt kiezen om te verbergen of te tonen. Door het dubbelklikken van een module-item, bijvoorbeeld, kunt u alle daarin opgenomen SUBS of FUNCTIONS weergeven. ------------------------------- ****164;40;67(text:p)Close the object catalog by clicking the (X) icon in the title bar. Sluit de objectcatalogus door het (X) icoon in de titelbalk te klikken. ####Text\SBASIC\COMMON\01020300.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;24(subject)Procedures and Functions Procedures en Functies ------------------------------- ****123;59;24(help:link)Procedures and Functions Procedures en Functies ****124;40;72(text:p)The following provides a description of SUBS (procedures) and FUNCTIONS. Het volgende gedeelte biedt een beschrijving van SUBS (procedures) en FUNCTIONS. ------------------------------- ****126;40;118(text:p)Procedures and functions allow you to break a program into partial programs, and thus, maintain a structured overview. Procedures en functies staan u toe een programma te verdelen in deelprogramma's en daardoor een gestructureerd overzicht te houden. ------------------------------- ****127;40;262(text:p)An advantage of SUBS and FUNCTIONS is that once you have developed a program code containing task components, you can use this code in different places in your project, but also in all future projects. To illustrate, please refer to the following sample program: Een voordeel van SUBS en FUNCTIONS is dat als u één keer een programmacode heeft ontwikkeld die taakcomponenten bevat, u deze code op verschillende plaatsen in uw project kunt gebruiken, maar ook in alle toekomstige projecten. Om dat te illustreren, zie alstublieft het volgende voorbeeldprogramma: ------------------------------- ****137;46;35(text:p)You can copy this program from the U kunt dit programma kopiëren uit de ****137;99;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****137;130;81() help and insert it directly into the IDE. To enter the program manually, select Help en het direct invoegen in de IDE. Om te het programma handmatig in te toetsen, selecteer ****137;243;13(text:span)Tools - Macro Extra - Macro ****137;268;36(), and type "Start" as the , en type "Start" als de ****137;336;10(text:span)Macro name Macronaam ****137;358;8(). Click . Klik ****137;398;3(text:span)New Nieuw ****137;413;22() to switch to the IDE. om over te schakelen naar de IDE. ------------------------------- ****143;39;15(text:p)option explicit option explicit ------------------------------- ****145;39;9(text:p)Sub Start Sub Start ------------------------------- ****147;55;19(text:p)Dim stext as String Dim stekst as String ------------------------------- ****148;55;24(text:p)Dim sInfoText1 as String Dim sInfoTekst1 as String ------------------------------- ****149;55;24(text:p)Dim sInfoText2 as String Dim sInfoTekst2 as String ------------------------------- ****150;55;24(text:p)Dim sInfoText3 as String Dim sInfoTekst3 as String ------------------------------- ****151;55;24(text:p)Dim sTitleText as String Dim sTitelTekst as String ------------------------------- ****153;55;47(text:p)sInfoText1 = "Please enter your text" sInfoTekst1 = "Toets alstublieft uw tekst in" ------------------------------- ****154;55;43(text:p)sInfoText2 = "This text contains" sInfoTekst2 = "Deze tekst bevat" ------------------------------- ****155;55;31(text:p)sInfoText3 = " Words" sInfoTekst3 = " woorden !" ------------------------------- ****156;55;35(text:p)sTitleText = "Text input" sTitelTekst = "TEKST INVOER" ------------------------------- ****158;55;54(text:p)stext = inputbox(sInfoText1, sTitleText, "") stekst = inputbox(sInfoTekst1, sTitelTekst, "") ------------------------------- ****159;55;45(text:p)print sInfoText2;WordCount%(stext);sInfoText3 print sInfoTekst2;TelWoord%(stekst);sInfoTekst3 ------------------------------- ****161;39;7(text:p)End Sub end sub ------------------------------- ****164;39;63(text:p)REM *** This function counts the spaces (and words) in a string REM *** Deze functie telt de spaties (en woorden) in een tekenreeks ------------------------------- ****167;39;49(text:p)function WordCount(WordText as String) as Integer function TelWoord(WoordTekst as String) as Integer ------------------------------- ****169;55;16(text:p)dim z as Integer dim z as Integer ------------------------------- ****170;55;20(text:p)dim count as Integer dim tellen as Integer ------------------------------- ****171;55;7(text:p)count=1 tellen=1 ------------------------------- ****172;55;24(text:p)for z=1 to len(WordText) for z=1 to len(WoordTekst) ------------------------------- ****173;71;40(text:p)if mid$(WordText,z,1)=" " then if mid$(WoordTekst,z,1)=" " then ------------------------------- ****174;87;17(text:p)count = count + 1 tellen = tellen + 1 ------------------------------- ****175;71;5(text:p)endif endif ------------------------------- ****176;55;6(text:p)next z next z ------------------------------- ****178;39;17(text:p)WordCount = count TelWoord = tellen ------------------------------- ****180;39;12(text:p)end function end function ------------------------------- ****183;40;229(text:p)If you start this program directly from the IDE, the program begins with the SUB "Start" (since it is at the first position). Within the procedure, the user is requested to enter a text. This text is then passed to the Als u dit programma direct uit de IDE start, begint het programma met de SUB "Start" (omdat het de eerste positie is). Binnen de procedure, wordt de gebruiker gevraagd om een tekst in te voeren. Deze tekst wordt dan doorgegeven aan de ****183;301;9(text:span)WordCount TelWoord ****183;322;98() function which counts the number of spaces and returns the number of words contained in the text. functie die het aantal spaties telt en het aantal woorden die de tekst bevat weergeeft. ------------------------------- ****184;40;57(text:p)The advantage of using functions is that the name (e.g., Het voordeel van het gebruik van functies is dat de naam (bijv., ****184;129;9(text:span)WordCount TelWoord ****184;150;246()) indicates which function to perform, and if you need the function in another position within a program, you can simply call it again. However, the code appears only once, thus making the program code more compact and enabling a better overview. ) aangeeft welke functie moet worden uitgevoerd en als u de functie op een andere positie binnen een programma nodig heeft, kunt u het eenvoudigweg nogmaals noemen. Echter, de code verschijnt maar één keer, daardoor wordt de programmacode meer compact en verschaft een beter overzicht. ------------------------------- ****185;37;38(text:p)Passing Variables to SUBS or FUNCTIONS Geldige Variabelen voor SUBS of FUNCTIONS ------------------------------- ****186;40;86(text:p)Variables can be passed to both SUBS or FUNCTIONS and used as fixed components of the Variabelen kunnen geldig worden gemaakt voor zowel SUBS als FUNCTIONS en worden gebruikt als vast componenten van de ****186;144;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****186;175;130() Basic programming language, providing that the SUB or FUNCTION to be called expects the parameter. The declaration is as follows: BASIC programmeertaal, vooropgesteld dat de SUB of FUNCTION die wordt aangeroepen de parameter verwacht. De declaratie is als volgt: ------------------------------- ****187;39;55(text:p)SUB SubName(Parameter1 As Type, Parameter2 As Type,...) SUB SubName(Parameter1 As Type, Parameter2 As Type,...) ------------------------------- ****190;39;12(text:p)Program code Programma code ------------------------------- ****193;39;7(text:p)END SUB END SUB ------------------------------- ****194;40;42(text:p)Use the following command to call the SUB: Gebruik het volgende commando voor het oproepen van de SUB: ------------------------------- ****195;39;27(text:p)SubName(Value1, Value2,...) SubName(Value1, Value2,...) ------------------------------- ****196;40;98(text:p)Ensure that the parameters passed to a SUB are the same as those specified in the SUB declaration. Overtuig u ervan dat de geldige parameters voor een SUB hetzelfde zijn als die gespecificeerd in de SUB declaratie. ------------------------------- ****197;40;250(text:p)The same process applies to FUNCTIONS, to return a function result. This result can be defined directly before reaching the end of the function by assigning the function name and a parameter to the value to be returned by the function. (see example). Dezelfde werkwijze heeft betrekking op FUNCTIONS, om een functieresultaat weer te geven. Dit resultaat kan worden gedefinieerd vlak vóór het einde van de functie wordt bereikt door de functienaam en een parameter voor de waarde die moet worden weergegeven door de functie toe te kennen. (zie voorbeeld). ------------------------------- ****198;39;73(text:p)FUNCTION FunctionName(Parameter1 As Type, Parameter2 As Type,...) As Type FUNCTION FunctionName(Parameter1 As Type, Parameter2 As Type,...) As Type ------------------------------- ****201;39;12(text:p)Program code Programma code ------------------------------- ****204;39;28(text:p)FunctionName=Function result FunctionName=Functie resultaat ------------------------------- ****206;39;12(text:p)End Function end function ------------------------------- ****207;40;47(text:p)Use the following command to call the FUNCTION: Gebruik het volgende commando voor het aanroepen van de FUNCTION: ------------------------------- ****208;39;49(text:p)Variable=FunctionName(Parameter1, Parameter2,...) Variable=FunctionName(Parameter1, Parameter2,...) ------------------------------- ****209;37;42(text:p)Determining the Return Value of a FUNCTION Bepaal de resultaatwaarde van een FUNCTION ------------------------------- ****210;40;376(text:p)As you can see from the FUNCTION definition in the example above, the type of return value must be specified. As with variables, simply include a type-declaration character after the function name, or the type indicated by "As" and the corresponding key word at the end of the parameter list. Thus, the definition line may appear in one of the following variations : Zoals u kunt zien in de FUNCTION definitie in het voorbeeld hierboven, moet de soort resultaatwaarde worden gespecificeerd. Zoals met variabelen, toets eenvoudigweg een typedeclaratieteken na de functienaam of het type aangegeven door "As" en het overeenkomstige sleutelwoord aan het einde van de parameter lijst. Daarom kan de definitieregel verschijnen in één van de volgende variaties : ------------------------------- ****211;39;49(text:p)Function WordCount(WordText as String) as Integer Function TelWoord(WoordTekst as String) as Integer ------------------------------- ****212;37;40(text:p)Passing Variables as Value and Reference Geldige Variabelen als Waarde en Verwijzing ------------------------------- ****213;40;89(text:p)A very important distinction to keep in mind when passing variables to FUNCTIONS or SUBS Een erg belangrijk verschil om te onthouden voor geldige variabelen voor FUNCTIONS of SUBS ****213;138;72(text:p)is the difference between variables passed as a reference or as a value. is het verschil tussen geldige variabelen als een verwijzing of als een waarde. ------------------------------- ****214;40;318(text:p)Unless otherwise specified, a variable is always passed as a reference to a FUNCTION or SUB. This means that when you modify a variable within a SUB or FUNCTION, the variable passed in the code to be called by the SUB or FUNCTION is correspondingly modified. In the above example, modify the sample program as follows: Tenzij anders is gespecificeerd, is een variabele altijd geldig als een verwijzing naar een FUNCTION of SUB. Dit betekent dat wanneer u een variabele binnen een SUB of FUNCTION wijzigt, de geldige variabele in de code voor het aanroepen van de SUB of FUNCTION overeenkomstig moet worden gewijzigd. In het voorbeeld hierboven, wijzig het voorbeeldprogramma als volgt: ------------------------------- ****215;40;73(text:p)Insert an additional command line in the SUB "Start" after the Voeg een aanvullende commandoregel in de SUB "Start" in, na het ****215;145;5(text:span)Print Print ****215;162;9() command: commando: ------------------------------- ****216;39;11(text:p)PRINT stext PRINT stekst ------------------------------- ****217;40;91(text:p)Insert an additional command line before the "End Function" line in the FUNCTION Voeg een aanvullende commandoregel in vóór de "End Function" regel in de FUNCTION ****217;163;10(text:span)WordCount% TelWoord% ****217;185;2() : : ------------------------------- ****218;39;36(text:p)WordText$="Function ended" WoordTekst ="Functie beeindigd !" ------------------------------- ****219;40;41(text:p)Now, start the program and enter a text. Nu, start het programma en toets een tekst in. ****219;99;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****219;130;75() Basic returns the number of spaces and prints the content of the variable BASIC geeft het aantal spaties weer en drukt af de inhoud van de variabele ****219;246;6(text:span)text$ tekst$ ****219;264;135(): "Function ended". The content of this variable appears to be modified, but not by the main program, rather by the FUNCTION : "Functie beeindigd !". De inhoud van deze variabele lijkt te zijn gewijzigd, echter niet door het hoofdprogramma, maar door de FUNCTION ****219;431;10(text:span)WordCount% TelWoord% ****219;453;159(). Since the variable was passed directly to the function, it was able to modify the content of the variable, even though it was only valid in the main program. . Omdat de geldige variabele direct was toegwezen aan de functie, was die in staat de inhoud van de variabele te wijzigen, zelfs terwijl het alleen geldig was in het hoofdprogramma. ------------------------------- ****220;40;170(text:p)If you want to prevent this from occurring, insert the key word "ByVal" (By Value) before the passed variable when you call a SUB or FUNCTION. Modify the first Als u wilt voorkomen dat dit gebeurt, voeg het sleutelwoord "ByVal" (By Value) in vóór de geldige variabele bij aanroepen van een SUB of FUNCTION. Wijzigen de eerste ****220;242;5(text:span)Print print ****220;259;46() line in the SUB "Start" as follows: regel in de SUB "Start" als volgt: ------------------------------- ****221;39;78(text:p)Print "This text contains";WordCount%(ByVal Text$);"words" Print "Deze tekst bevat";TelWoord%(ByVal Tekst$);"woorden!" ------------------------------- ****222;40;153(text:p)Now, if you start the program again, the text will appear exactly as you entered it. The content of the variable could not be modified by the subroutine. Dan, als u het programma nogmaals start, zal de tekst precies zo verschijnen als u het ingevoerd heeft. De inhoud van de variabele kon niet worden gewijzigd door de subroutine. ------------------------------- ****232;46;30(text:p)When you create a new module, Wanneer u een nieuw module creëert, ****232;94;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****232;125;133() Basic automatically inserts a SUB Main. This is only a default name and has nothing to do with the order or the starting point of a BASIC voegt automatisch een SUB Main in. Dit is alleen een BASIC-naam en heeft niets te doen met de volgorde of het beginpunt van een ****232;276;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****232;307;57() Basic project. You may rename this SUB however you like. BASIC project. U kunt deze SUB hernoemen zoals u wilt. ------------------------------- ****238;37;65(text:p)Variable Validity in Procedures and Modules or Outside of Modules Variabele Geldigheid in Procedures en Modules of buiten Modules ------------------------------- ****239;40;519(text:p)If a variable is defined within a SUB or FUNCTION, it only remains valid until the procedure is exited, and is created anew if the SUB or FUNCTION is required again. This is known as a "local" defined variable. In many cases, however, it may be necessary to define a variable to be valid in all procedures, or even in all modules of all libraries. Or, you may wish to retain a variable even after a SUB or FUNCTION is exited. This property is controlled in a variable declaration via certain key words in the Als een variabele is gedefinieerd binnen een SUB of FUNCTION, blijft die alleen geldig totdat de procedure wordt verlaten en wordt opnieuw gemaakt als de SUB of FUNCTION nogmaals nodig is. Dit is bekend als een "lokaal" gedefinieerde variabele. In veel gevallen, echter, kan het zijn nodig zijn om een variabele te definiëren, die geldig is in alle procedures of zelfs in alle modules van alle bibliotheken. Of u wilt een variabele behouden zelfs nadat een SUB of FUNCTION is beeindigd. Deze eigenschap wordt bestuurd in een variabele declaratie via bepaalde sleutelwoorden in de ****239;591;3(text:span)Dim Dim ****239;606;11() statement. instructie. ------------------------------- ****240;37;45(text:p)Declaring Variables Outside a SUB or FUNCTION Benoemen Variabelen buiten een SUB of FUNCTION ------------------------------- ****241;39;30(text:p)DIM PUBLIC VarName As TYPENAME DIM PUBLIC VarName As TYPENAME ------------------------------- ****242;40;37(text:p)The variable is valid in all modules. De variabele is geldig in alle modules. ------------------------------- ****243;39;31(text:p)DIM PRIVATE VarName As TYPENAME DIM PRIVATE VarName As TYPENAME ------------------------------- ****244;40;42(text:p)The variable is only valid in this module. De variabele is slechts geldig in deze module. ------------------------------- ****245;39;23(text:p)DIM VarName As TYPENAME DIM VarName As TYPENAME ------------------------------- ****246;40;9(text:p)As above. Als boven. ------------------------------- ****247;37;56(text:p)Saving Variable Contents after Exiting a SUB or FUNCTION Opslaan Variabele Inhoud na verlaten een SUB of FUNCTION ------------------------------- ****248;39;30(text:p)DIM STATIC VarName As TYPENAME DIM STATIC VarName As TYPENAME ------------------------------- ****249;40;157(text:p)The variable retains its value until the next time the FUNCTION or SUB is entered. Note that the declaration must exist, of course, within a SUB or FUNCTION. De variabele behoudt zijn waarde totdat de volgende keer de FUNCTION of SUB wordt ingevoerd. Merk op dat de declaratie moet bestaan, natuurlijk, binnen een SUB of FUNCTION. ------------------------------- ****259;46;35(text:p)Please refer to the explanation of Bekijk alstublieft de uitleg van ****259;121;9(help:link)Debugging Debugging ****259;142;142(), which provides further examples of variable validity, and especially the possible errors that may occur when variables are used incorrectly. , welke verdere voorbeelden van geldige variabele geldigheid biedt en in het bijzonder de mogelijke fouten die kunnen voorkomen als variabelen onjuist worden gebruikt. ------------------------------- ****274;68;37(keyword)Recursive calls of SUBs and functions Zelfaanroepen van SUBs en FUNCTIONs ****274;124;55(text:p)Recursive calls of SUBs and functions are not possible. Zelfaanroepende oproepen van SUBs en FUNCTIONs zijn niet mogelijk. ####Text\SBASIC\COMMON\01020500.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;30(subject)Libraries, Modules and Dialogs Bibliotheken, Modules en Dialoogvensters ------------------------------- ****79;59;30(help:link)Libraries, Modules and Dialogs Bibliotheken, Modules en Dialoogvensters ****80;40;51(text:p)The following describes how you can structure your Het volgende gedeelte beschrijft hoe u kunt structureren uw ****80;109;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****80;140;54() Basic projects with the aid of modules and libraries. BASIC projecten met behulp van modules en bibliotheken. ------------------------------- ****82;40;46(text:p)To help organize especially complex projects, Om, in het bijzonder complexe projecten, te helpen ordenen ****82;104;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****82;135;80() Basic provides special programming tools that aid in structuring your projects. BASIC biedt speciale programmeerwerktuigen die helpen bij het structureren van uw projecten. ------------------------------- ****83;58;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****83;89;117() Basic supports various "units" which enable you to group individual SUBS and FUNCTIONS in a Basic project. BASIC ondersteunt verschillende "afdelingen" welke het u mogelijk maken uw individuele SUBS en FUNCTIONS in een BASIC project te groeperen. ------------------------------- ****84;37;9(text:p)Libraries Bibliotheken ------------------------------- ****85;40;253(text:p)Libraries serve as a tool for organizing modules, and can either be attached to a document or a template. When the document or a template is saved, all modules (and respective SUBS and FUNCTIONS) contained in the library are automatically saved as well. Bibliotheken dienen als een werktuig voor het ordenen van modules, en kunnen óf zijn gehecht aan een document óf een sjabloon. Wanneer het document of een sjabloon wordt opgeslagen, worden alle modules (en respectievelijke SUBS en FUNCTIONS), opgenomen in de bibliotheek, eveneens automatisch opgeslagen. ------------------------------- ****86;40;152(text:p)Theoretically, a library can contain up to 16, 000 modules; but practically speaking, the possible number of modules is limited by the available memory. Theoretisch kan een bibliotheek tot 16.000 modules bevatten, maar praktisch gesproken wordt het mogelijke aantal modules beperkt door het beschikbare geheugen. ------------------------------- ****87;37;7(text:p)Modules Modules ------------------------------- ****88;40;247(text:p)A module contains SUBS and FUNCTIONS along with variable declarations valid in an entire module or in all modules. The length of the program text that can be saved in a module is limited to 64 KB. If this space is not sufficient, you can divide a Een module bevat SUBS en FUNCTIONS samen met variabeledeclaraties, geldig in een gehele module of in alle modules. De lengte van de programmatekst die kan worden opgeslagen in een module is beperkt tot 64 KB. Als deze ruimte niet voldoende is, kunt u delen een ****88;305;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****88;336;76() Basic project among several modules, an then save them in a single library. BASIC project over verschillende modules en ze dan opslaan in een enkele bibliotheek. ------------------------------- ****98;46;93(text:p)You should combine the single macros required in a document or an application in one module. U zou de enkelvoudige macro's, nodig in een document of een toepassing, in één module moeten combineren. ****98;157;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****98;188;193() Basic projects consisting of several macros (and SUBS) should each be saved in an individual module, and complex projects even in their own library, so that the macros that you work with in a BASIC projecten bestaande uit verschillende macro's (en SUBS) zouden elk moeten worden opgeslagen in een individuele module en complexe projecten zelfs in hun eigen bibliotheek, zodat de macro's, waarmee u werkt in een ****98;399;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****98;430;40() program don't get mixed up with a programma niet worden vermengd met een ****98;488;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****98;519;86() Basic project. For information about creating new modules or libraries, refer to the BASIC project. Voor informatie over het maken van nieuwe modules of bibliotheken, zie de ****98;627;16(help:link)IDE introduction IDE inleiding ****98;655;1(). . ------------------------------- ****104;37;14(text:p)Dialog Modules Dialoogvenster Modules ------------------------------- ****105;40;270(text:p)Dialog modules combine the structure of a dialog box, the properties of each element within the dialog and the events assigned to SUBS into a single module. Since a dialog module can only contain a single dialog, they are often referred to simply as "dialogs". Dialoogvenster modules combineren de structuur van een dialoogvenster, de eigenschappen van elk element binnen het dialoogvenster en de aan SUBS toegekende gebeurtenissen in één enkele module. Omdat een dialoogvenstermodule alleen een enkel dialoogvenster kan bevatten, wordt daar eenvoudigweg naar verwezen als "dialogen". ------------------------------- ****106;40;50(text:p)Dialogs are called from the program code with the Dialogen worden aangeroepen vanuit de programmacode met de ****106;122;4(text:span)Show Show ****106;138;32() method and are closed with the methode en worden gesloten met de ****106;202;4(text:span)Hide Hide ****106;218;9() method. methode. ****106;245;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****106;276;123() Basic controls which actions a user can perform in a dialog, so as a programmer, you only need to evaluate certain events. BASIC controleert welke handelingen een gebruiker kan uitvoeren in een dialoogvenster, zoals een programmer, u moet alleen bepaalde gebeurtenissen evalueren. ####Text\SBASIC\COMMON\01030000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;40(subject)Integrated Development Environment (IDE) Integrated Development Environment (IDE) ------------------------------- ****57;59;34(keyword)Basic-IDE; Development Environment Basic-IDE; Ontwikkelomgeving ****57;134;14(keyword)IDE; Basic-IDE IDE; Basic-IDE ****57;189;40(help:link)Integrated Development Environment (IDE) Integrated Development Environment (IDE) ****58;40;288(text:p)Here you will find a description of the functions in the Integrated Development Environment (IDE). You will discover how you can organize modules or libraries, which functions are available to you in the Basic Editor, and how the IDE can help you find errors in your programs (debugging). Hier vindt u een beschrijving van de functies in de Integrated Development Environment (IDE). U zult ontdekken hoe u modules of bibliotheken kunt ordenen, welke functies voor u beschikbaar zijn in de BASIC Editor en hoe de IDE u kan helpen fouten te vinden in uw programma's (debugging). ####Text\SBASIC\COMMON\01030100.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;12(subject)IDE Overview IDE Overzicht ------------------------------- ****63;59;12(help:link)IDE Overview IDE Overzicht ****64;40;42(text:p)The following provides an overview of the De volgende sectie biedt u een overzicht van de ****64;100;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****64;131;70() Basic-IDE. The IDE is activated as soon as you begin editing a macro. Basic-IDE. De IDE is geactiveerd zodra u begint met de bewerking van een macro. ------------------------------- ****66;40;4(text:p)The De ****66;66;7(help:link)toolbar werkbalk ****66;85;77() in the IDE provides various function icons for editing and testing programs. in de IDE biedt verschillende functie iconen om programma's te bewerken en te testen. ------------------------------- ****67;40;7(text:p)In the In de/het ****67;69;13(help:link)Editor window Bewerkvenster ****67;94;241(), directly below the Macro toolbar, you can edit the Basic program code. Pay attention to the narrow column at the left - here you can view the breakpoints during a single step process, indicating which part of the program is being executed. , direct onder de Macro werkbalk, kunt u de Basic programmacode bewerken. Let op de smalle kolom links – hier kunt u de onderbrekingspunten tijdens het verwerken van een enkele stap weergeven, aangevende welk deel van het programma wordt uitgevoerd. ------------------------------- ****68;40;4(text:p)The Het ****68;66;5(help:link)Watch Contrle ****68;83;143() (observer) is located below the Editor window at the left, and displays the contents of variables or arrays during a single step process. The (observer) bevind zich links onder het Bewerkvenster en geeft de inhoud weer van variabelen of matrices de verwerking van een enkele stap. Het ****68;258;10(text:span)Call Stack Oproepen ****68;280;89() window to the right provides information about the call hierarchy of SUBS and FUNCTIONS. venster rechts biedt informatie over de aanroephiërarchie van SUBS en FUNCTIONS. ------------------------------- ****70;61;9(help:link)Basic IDE BASIC IDE ####Text\SBASIC\COMMON\01030200.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;16(subject)The Basic Editor De BASIC Editor ------------------------------- ****230;59;16(help:link)The Basic Editor De BASIC Editor ****231;40;43(text:p)Following is a general introduction to the Het volgende is een algemene inleiding voor de ****231;101;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****231;132;14() Basic Editor. BASIC Editor. ------------------------------- ****233;40;145(text:p)The Basic Editor provides the standard editing functions you are familiar with when working in a text document. It supports the functions of the De BASIC Editor biedt de BASIC bewerkingsfuncties die u bekend zijn van het werken in een tekstdocument. Het ondersteunt de functies van het ****233;217;4(text:span)Edit Bewerken ****233;233;152() menu (Cut, Delete, Paste), the ability to select text with the Shift key, as well as cursor positioning functions (e.g., moving from word to word with menu (Knippen, Verwijderen, Plakken), de mogelijkheid om tekst te selecteren met de Shifttoets evenals cursorplaatsingfuncties (bijv., verplaatsen van woord naar woord met ****233;439;8()(Option) (Optie) ****233;473;6()(Ctrl) (Ctrl) ****233;508;21() and the arrow keys). en de pijltoetsen). ------------------------------- ****234;37;23(text:p)Navigating in a Project Navigeren in een Project ------------------------------- ****235;58;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****235;89;78() Basic several functions that enable you to navigate your way through complex BASIC heeft verschillende functies die het u mogelijk maken uw weg te vinden door complexe ****235;185;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****235;216;70() Basic projects. The following sections describe these aids in detail: BASIC projecten. De volgende secties beschrijven deze hulpmiddelen in detail: ------------------------------- ****236;37;34(text:p)Using the Library List Box in the Met behulp van de Bibliotheekkeuzelijst in de ****236;89;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****236;120;14() Basic Toolbar BASIC Macrobalk ------------------------------- ****237;40;7(text:p)In the In de ****237;79;7(text:span)Library Bibliotheek ****237;98;122() list box at the left of the toolbar, you can click on any entry to switch to the first module of a corresponding library. keuzelijst links op de werkbalk, kunt u klikken op een willekeurig item om over te schakelen naar de eerste module van de overeenkomstige bibliotheek. ------------------------------- ****238;37;42(text:p)Using the Object Catalog to Move within a Met behulp van de Objectcatalogus om te verplaatsen binnen een ****238;97;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****238;128;14() Basic Project BASIC Project ------------------------------- ****239;40;144(text:p)The object catalog aids you in navigating within complex projects consisting of several libraries and corresponding modules. Proceed as follows: De objectcatalogus helpen u met navigeren binnen complexe projecten bestaande uit verschillende bibliotheken en overeenkomstige modules. Ga als volgt door: ------------------------------- ****242;35;10(text:p)Click the Klik het ****242;77;14(text:span)Object Catalog Objectcatalogus ****242;103;21() icon in the toolbar. icoon in de Macrobalk. ------------------------------- ****265;46;81(text:p)The object catalog remains visible even when you click back in the Editor window. De objectcatalogus blijft zichtbaar, zelfs wanneer u terugklikt in het Bewerkvenster. ------------------------------- ****273;35;221(text:p)In the dialog, you will find a list of all existing objects. Many objects (documents, templates, the application itself and the respective libraries and modules) contain subitems that you can double-click to hide or show. In het dialoogvenster, zult u een lijst vinden van alle bestaande objecten. Veel objecten (documenten, sjablonen, de toepassing zelf en de respectievelijke bibliotheken en modules) bevatten subitems die u kunt dubbelklikken om te verbergen of te tonen. ------------------------------- ****276;35;161(text:p)To display a certain module in the Editor or to position the cursor directly in a specific SUB or FUNCTION of a module, select the corresponding entry and click Om een bepaalde module in de Editor weer te geven of om de cursor direct in een specifiek SUB of FUNCTION van een module te positioneren, selecteer het overeenkomstige item en klik ****276;228;4(text:span)Show Weergeven ****276;244;1(). . ------------------------------- ****279;35;67(text:p)Close the object catalog by clicking the (x) icon in the title bar. Sluit de objectcatalogus door te klikken op het (x) icoon in de titelbalk. ------------------------------- ****282;37;37(text:p)Saving and Loading Basic Source Text Opslaan en Laden BASIC Brontekst ****282;96;26(keyword)Export; Basic program code Exporteren; Basic programmacode ****282;163;26(keyword)Basic program code; Export Basic programmacode; Exporteren ****282;230;26(keyword)Import; Basic program code Importeren; Basic programmacode ****282;297;26(keyword)Basic program code; Import Basic programmacode; Importeren ------------------------------- ****283;58;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****283;89;125() Basic allows you to export Basic program code to other programming systems, or to import Basic program code in ASCII format. BASIC laat u Basic programmacode naar andere programmeersystemen exporteren of Basic programmacode in ASCII opmaak importeren. ------------------------------- ****293;46;43(text:p)Exporting of Basic dialogs is not possible. Exporteren van BASIC dialoogvensters is niet mogelijk. ------------------------------- ****299;37;67(text:p)This is how you can save the program code of a module as ASCII text Zo kunt u de programmacode van een module als ASCII tekst opslaan ------------------------------- ****302;35;99(text:p)From the object catalog, select the program code of a module that you want to export as ASCII text. Uit de objectcatalogus selecteer de programmacode van een module die u wilt exporteren als ASCII tekst. ------------------------------- ****305;35;10(text:p)Click the Klik het ****305;77;14(text:span)Save Source As Brontekst opslaan als... ****305;103;28() icon in the Macro toolbar. icoon in de Macrowerkbalk. ****305;149;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****305;180;71() Basic opens a file selection dialog, where you can define a file name. BASIC opent een bestandselectiedialoogvenster, waar u een bestandsnaam kunt definiëren. ------------------------------- ****308;35;43(text:p)Enter the path specification and file name Voer de padspecificatie en bestandsnaam in ****308;87;10(text:p)and click en klik ****308;129;2(text:span)OK OK ****308;143;18() to save the file. om het bestand op te slaan. ------------------------------- ****311;37;55(text:p)How to insert ASCII program code at the cursor position Hoe ASCII programmacode in te voegen op de cursorpositie ? ------------------------------- ****314;35;101(text:p)From the object catalog, select the program code of the module that you want to import as ASCII text. Uit de objectcatalogus, selecteer de programmacode uit de module die u wilt importeren als ASCII tekst. ------------------------------- ****317;35;62(text:p)Position the cursor where you want to insert the program code. Positioneer de cursor waar u de programmacode wilt invoegen. ------------------------------- ****320;72;28(text:span)Click the Insert Source Text Klik het Brontekst invoegen ****320;112;131() icon in the Macro toolbar. In the dialog that follows, select the path and name of the file containing the program code and click icoon op de Macro werkbalk. In het volgende dialoogvenster, selecteer het pad en naam van het bestand dat de programmacode bevat en klik ****320;275;2(text:span)OK OK ****320;289;1(). . ####Text\SBASIC\COMMON\01030300.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;9(subject)Debugging Debugging ------------------------------- ****100;59;9(help:link)Debugging Debugging ****101;40;51(text:p)The following describes how to find errors in your De volgende sectie beschrijft hoe uw fouten te vinden in ****101;109;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****101;140;16() Basic programs. BASIC programma's . ------------------------------- ****103;40;20(text:p)Complex projects in Complexe projecten in ****103;78;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****103;109;70() Basic are especially prone to errors, no matter how careful you are. BASIC zijn in het bijzonder gevoelig voor fouten, hoe voorzichtig u ook bent. ****103;197;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****103;228;86() Basic provides several aids to help find errors in your programs, as described below: BASIC biedt verschillende hulpmiddelen om fouten in uw programma's te helpen vinden, zoals hieronder beschreven: ------------------------------- ****104;37;35(text:p)Breakpoints and Single Step Editing Onderbrekingspunten en Stap voor Stap-bewerken ------------------------------- ****105;40;375(text:p)Single step editing enables you to check each command in your program for errors. In this way, errors can be easily localized since you are able to immediately see the result of each step. A pointer in the breakpoint column of the Editor indicates the current line. Moreover, you can set a breakpoint if you want to force the program to be interrupted at a specific position. Stap voor stap-bewerking maakt het u mogelijk om elk commando in uw programma op fouten te controleren. Op deze manier worden fouten gemakkelijk opgespoord aangezien u in staat bent het resultaat van elke stap direct te zien. Een aanwijzer in de onderbrekingspuntkolom van de Editor geeft de huidige regel aan. Bovendien kunt u een onderbrekingspunt instellen als u wilt forceren dat het programma wordt onderbroken op een specifieke positie. ------------------------------- ****106;37;41(text:p)How to Set a Breakpoint at a Program Line Hoe een onderbrekingspunt instellen bij een programmaregel ? ------------------------------- ****107;40;296(text:p)In the breakpoint column at the left of the Editor window, simply double-click to set a breakpoint at the corresponding line, or to delete an existing breakpoint. When the program reaches a breakpoint, the program execution is interrupted. You can then continue the program step-by-step with the In de onderbrekingspuntkolom, links van het Bewerkvenster, eenvoudig dubbelklikken om een onderbrekingspunt bij de overeenkomstige regel in te stellen of om een bestaand onderbrekingspunt te verwijderen. Wanneer het programma een onderbrekingspunt bereikt, wordt de uitvoering van het programma onderbroken. U kunt dan het programma stap voor stap doorgaan met het ****107;368;11(text:span)Single Step Stap voor Stap ****107;391;6() icon. icoon. ------------------------------- ****108;40;75(text:p)When the program comes to a SUB call during single step editing, click the Wanneer het programma komt bij een SUB aanroep gedurende Stap voor Stap bewerking, klik het ****108;147;11(text:span)Single Step Stap voor Stap ****108;170;149() icon to branch into the SUB. However, if you want skip over the single step editing and execute the SUB call like a normal Basic command, click the icoon om over te stappen in de SUB. Echter, als u de Stap voor Stap bewerking wilt overslaan en de SUB aanroep als een normaal BASIC commando wilt uitvoeren, klik het ****108;351;14(text:span)Procedure Step Procedurestap ****108;377;6() icon. icoon. ------------------------------- ****109;37;39(text:p)Defining the Properties of a Breakpoint De eigenschappen van een onderbrekingspunt definiëren ------------------------------- ****110;40;87(text:p)Click with the right mouse button on a breakpoint to open the context menu, and select Klik met de rechter muisknop op een onderbrekingspunt om het contextmenu te openen en selecteer ****110;159;6(text:span)Active Actief ****110;177;150() to activate or deactivate the breakpoint. When a breakpoint is deactivated, it remains in place, but does not interrupt the program execution. Click om het onderbrekingspunt te activeren of te deactiveren. Wanneer een onderbrekingspunt wordt gedeactiveerd blijft het op zijn plaats, maar zal de uitvoering van het programma niet onderbreken. Klik ****110;359;10(text:span)Properties Eigenschappen ****110;381;55() to open a dialog where you can define further options: om een dialoogvenster te openen waar u verdere opties kunt definiëren: ------------------------------- ****122;40;35(text:p)The list box displays all existing De keuzelijst geeft weer: alle bestaande ****122;107;11(text:span)breakpoints onderbrekingspunten ****122;130;155() and the corresponding line number in the program. The line number where the respective breakpoint was defined is selected in the list. With the check box en het overeenkomstige regelnummer in het programma. Het regelnummer waar het respectievelijke onderbrekingspunt was gedefinieerd is geselecteerd in de lijst. Met het vinkvak ****122;317;6(text:span)Active Actief ****122;335;67() you can define whether or not the breakpoint should remain active. kunt u definiëren of het onderbrekingspunt aktief moet blijven of niet. ------------------------------- ****123;40;7(text:p)In the In het ****123;79;10(text:span)Pass Count Doorloop ****123;101;217() field you can define how many times the breakpoint can be passed over before the program is interrupted. If you enter 0 (default setting) the program will always be interrupted as soon as a breakpoint is encountered. veld kunt u definiëren hoeveel keer het onderbrekingspoint mag worden doorlopen vóór het programma wordt onderbroken. Als u intoetst 0 (standaardwaarde) zal het programma altijd worden onderbroken zodra een onderbrekingspunt wordt bereikt. ------------------------------- ****124;40;6(text:p)Click Klik ****124;78;6(text:span)Delete Wissen ****124;96;54() to physically remove the breakpoint from the program. om het onderbrekingspunt fysiek uit het programma te verwijderen. ------------------------------- ****125;37;35(text:p)Observing the Behavior of Variables Het gedrag van variabelen bekijken ------------------------------- ****126;40;162(text:p)During single step editing you can display certain variables in the Watch window. To add a variable, either double-click a variable in the program code and click Gedurende Stap voor Stap-bewerking kunt u bepaalde variabelen in het Controlevenster weergeven. Om een variabele toe te voegen, óf dubbelklik op een variabele in de programmacode en klik ****126;234;9(text:span)Add Watch Controle weergeven ****126;255;75(), or type the variable name directly in the Watch text box and press Enter. óf type de variabelenaam direct in het Controle: tekstvak en druk op <Enter>. ------------------------------- ****127;40;250(text:p)The values of all variables in the current SUB or FUNCTION are displayed in the Watch window. If variables are displayed which are not defined locally for the current SUB or FUNCTION, a message appears ("Out of Scope") instead of the value. De waarden van alle variabelen in de huidige SUB of FUNCTION worden getoond in het Controlevenster. Als variabelen worden getoond die niet lokal zijn gedefinieerd voor de huidige SUB of FUNCTION, verschijnt een boodschap ("Out of Scope") in plaats van de waarde. ------------------------------- ****128;40;183(text:p)You can also include arrays in the Watch window. If you enter the name of an array variable without an index value in the Watch text box, the content of the entire array is displayed. U kunt ook matrices opnemen in het Controlevenster. Als u de naam van een matrix variabele intoetst zonder een indexwaarde in het Controle: tekstvak, wordt de inhoud van de gehele matrix getoond. ------------------------------- ****138;46;25(text:p)You can click a variable U kunt klikken op een variabele ****138;151;20()while pressing (Alt) terwijl u drukt op (Alt) ****138;200;53() to modify its value at run-time (for test purposes). om zijn waarde te veranderen tijdens run-time (voor testdoeleinden). ------------------------------- ****153;46;157(text:p)If you rest the mouse above a valid (and predefined) variable in the Watch window at run-time, the content of the variable is displayed in a pop-up text box. Als u de muis boven een geldige (en voorgedefinieerde) variabele in het Controlevenster houdt tijdens run-time, wordt de inhoud van de variabele getoond in een pop-up tekstvak. ------------------------------- ****159;37;34(text:p)Working with the Call Stack Window Werken met het Oproepen:-venster ------------------------------- ****160;40;284(text:p)The call stack window is always active in single step editing. It provides an overview of the call hierarchy of SUBS or FUNCTIONS. The order of SUBS and FUNCTIONS enables you to determine which SUB called a subsequent SUB, and indicates which SUB will be called after the current SUB. Het Oproepen:-venster is altijd aktief tijdens Stap voor Stap bewerking. Het biedt een overzicht van de oproephiërarchie van SUBS of FUNCTIONS. De volgorde van SUBS en FUNCTIONS maakt het u mogelijk om te bepalen welke SUB een erop volgende SUB aanroept en geeft aan welke SUB zal worden aangeroepen na de huidige SUB. ####Text\SBASIC\COMMON\01030400.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;45(subject)Creating and Organizing Libraries and Modules Maken en ordenen van bibliotheken en modules ------------------------------- ****454;59;45(help:link)Creating and Organizing Libraries and Modules Maken en ordenen van bibliotheken en modules ****455;40;160(text:p)The following provides an introduction to working with libraries and modules. You will discover how to create and delete libraries and modules, and how to move De volgende sectiebiedt een inleiding naar het werken met bibliotheken en modules. U zult ontdekken hoe u bibliotheken en modules creërt en verwijdert en hoe u verplaatst ****455;218;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****455;249;64() Basic projects between documents, templates or the application. BASIC projecten tussen documenten, sjablonen of de toepassing. ------------------------------- ****466;46;16(text:p)Generally, each In het algemeen, elk ****466;80;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****466;111;56() Basic project should be stored in an individual module. BASIC project zou moeten worden opgeslagen in een individuele module. ------------------------------- ****472;37;20(text:p)Organizing Libraries Ordenen bibliotheken ------------------------------- ****473;37;22(text:p)Creating a New Library Een nieuwe bibliotheek maken ------------------------------- ****476;35;44(text:p)If you are not in the IDE, first select the Als u niet in de IDE bent, selecteer eerst het ****476;111;5(text:span)Macro Macro ****476;128;16() command in the commando in het ****476;176;5(text:span)Tools Extra ****476;193;17() menu, and click menu, en klik ****476;242;9(text:span)Organizer Beheren ****476;263;28() in the dialog that follows. in het volgende dialoogvenster. ------------------------------- ****479;35;41(text:p)If you are already in the IDE, click the Als u reeds in de IDE bent, klik het ****479;108;7(text:span)Modules Modules ****479;127;39() icon to open the corresponding dialog. icoon om het overeenkomstige dialoogvenster te openen. ------------------------------- ****482;35;10(text:p)Click the Klik de ****482;77;7(text:span)Library Bibliotheken ****482;96;5() tab. tab. ------------------------------- ****498;35;34(text:p)Use Application/Document and then Gebruik Applicatie/Document en dan ****498;110;7(text:span)Library Bibliotheek ****498;129;56() to select the object you want to attach the library to. om het object te selecteren waaraan u de bibliotheek wilt hechten. ------------------------------- ****501;35;17(text:p)Click the button Klik de knop ****501;84;3(text:span)New Nieuw ****501;99;6(), and , en ****501;123;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****501;154;29() Basic creates a new library. BASIC maakt een nieuwe bibliotheek. ------------------------------- ****504;37;18(text:p)Renaming a Library Een bibliotheek hernoemen ------------------------------- ****507;35;60(text:p)To change the default name of a library, proceed as follows: Om de standaardnaam van een bibliotheek te veranderen, ga als volgt te werk: ------------------------------- ****510;35;36(text:p)Right-click the name of the library. Rechtsklik op de naam van de bibliotheek. ------------------------------- ****513;35;122(text:p)The cursor appears at the end of the name, indicating that you can now edit the name. Press Enter to confirm your changes. De cursor verschijnt aan het einde van de naam, aangevende dat u nu de naam kunt bewerken. Toets <Enter> om uw veranderingen te bevestigen. ------------------------------- ****516;37;18(text:p)Deleting a Library Een bibliotheek verwijderen ------------------------------- ****519;35;34(text:p)Use Application/Document and then Gebruik Applicatie/Document en dan ****519;101;7(text:span)Library Bibliotheek ****519;120;69() to select the object to which the library to be deleted is attached. om het object te selecteren waaraan de bibliotheek die moet worden verwijderd is aangehecht. ------------------------------- ****531;46;121(text:p)Note: As soon as you delete a library, all existing modules and corresponding SUBS and FUNCTIONS are permanently deleted. Let op: Zodra u een bibliotheek verwijdert, worden alle bestaande modules en overeenkomstige SUBS en FUNCTIONS permanent verwijderd. ------------------------------- ****538;35;10(text:p)Click the Klik de ****538;77;6(text:span)Delete Wissen ****538;95;65() button and confirm the dialog that follows with "Yes". drukknop en bevestig het volgende dialoogvenster met "Ja". ------------------------------- ****541;37;30(text:p)Organizing Modules and Dialogs Modules en dialoogvensters ordenen ------------------------------- ****542;37;27(text:p)Renaming a Module or Dialog Een module of dialoogvenster hernoemen ------------------------------- ****543;40;47(text:p)To change the default name, proceed as follows: Om de standaardnaam te veranderen, ga als volgt te werk: ------------------------------- ****546;35;129(text:p)Right-click the name of the module or dialog. A cursor appears at the end of the name, indicating that you can now edit the name. Rechtsklik op de naam van de module of dialoogvenster. Een cursor verschijnt aan het einde van de naam, aangevende dat u nu de naam kunt bewerken. ------------------------------- ****549;35;36(text:p)Press Enter to confirm your changes. Toets <Enter> om uw veranderingen te bevestigen. ------------------------------- ****552;37;27(text:p)Deleting a Module or Dialog Een module of dialoogvenster verwijderen ------------------------------- ****555;35;72(text:p)In the list box, click on the respective module or dialog to be deleted. In de keuzelijst, klik op de respectievelijke module of dialoogvenster dat moet worden verwijderd. ------------------------------- ****567;46;95(text:p)Note: As soon as you delete a module, all contained SUBS and FUNCTIONS are permanently deleted. Let op: Zodra u een module verwijdert, worden alle daarin opgenomen SUBS en FUNCTIONS permanent verwijderd. ------------------------------- ****574;35;10(text:p)Click the Klik de ****574;77;6(text:span)Delete Wissen ****574;95;65() button and confirm the dialog that follows with "Yes". drukknop en bevestig het volgende dialoogvenster met "Ja". ------------------------------- ****577;37;48(text:p)Organizing Projects among Documents or Templates Projecten onder documenten of sjablonen beheren ------------------------------- ****578;40;58(text:p)Once you have developed a program or program project with Als u één keer een programma of programmaproject heeft gemaakt met ****578;116;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****578;147;119() Basic, you may wish to move specific parts of a program, or the entire macro project, to other documents or templates. BASIC, zou u misschien specifieke delen van een programma, of het gehele macroproject, naar andere documenten of sjablonen willen verplaatsen. ------------------------------- ****588;46;12(text:p)Note that a Onthoud dat een ****588;76;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****588;107;285() Basic program generally consists of more than one macro - i.e., multiple SUBS. Therefore, if you have developed a program with multiple SUBS and FUNCTIONS that call each other, make sure you copy all necessary elements in order for your program to run in another document or template. Basicprogramma in het algemeen bestaat uit meer dan één macro - d.w.z., meervoudige SUBS. Daarom, als u een programma met meervoudige SUBS en FUNCTIONS, die elkaar aanroepen, heeft gemaakt, overtuig u ervan dat u alle benodige elementen kopieert die nodig zijn om uw programma uit te voeren in een ander document of sjabloon. ------------------------------- ****593;37;97(text:p)Moving or copying modules, dialogs or libraries between documents, templates and the application. Verplaatsen of kopiëren van modules, dialoogvensters of bibliotheken tussen documenten, sjablonen en de toepassing. ------------------------------- ****596;36;118(text:p)First, open all documents or templates among which you want to move the various objects (modules, libraries, dialogs). Als eerste, open alle documenten of sjablonen onder welke u de verschillende objecten (modules, bibliotheken, dialoogvensters) wilt verplaatsen. ------------------------------- ****599;36;11(text:p)Select the Selecteer het ****599;79;5(text:span)Macro Macro ****599;96;16() command in the commando in het ****599;144;5(text:span)Tools Extra ****599;161;17() menu, and click menu, en klik ****599;210;9(text:span)Organizer Beheren... ****599;231;28() in the dialog that follows. in het volgende dialoogvenster. ------------------------------- ****602;36;201(text:p)To move an object to another document or application, simply click the object and drag it to the desired position. A horizontal line indicates between which objects the moved object will be positioned. Om een object naar een ander document of toepassing te verplaatsen, klik eenvoudigweg op het object en sleep het naar de gewenste positie. Een horizontale lijnl geeft aan tussen welke objecten het verplaatste object zal worden geplaatst. ------------------------------- ****605;40;60(text:p)To copy an object, proceed in the same manner, but keep the Om een object te kopiëren, ga op dezelfde manier te werk, maar houdt de ****605;154;8(text:p)(Option) (Option) ****605;188;6()(Ctrl) (Ctrl) ****605;223;59() key pressed while you drag the object to its new position. toets ingedrukt terwijl u het object naar zijn nieuwe positie sleept. ------------------------------- ****606;37;33(text:p)Inserting a Library from another Een bibliotheek invoegen uit een ander ****606;88;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****606;119;7()Program Programma ------------------------------- ****607;40;31(text:p)Libraries are created in every Bibliotheken worden gemaakt in iedere ****607;89;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****607;120;153() application. As soon as a library is saved, it exists as a folder with two files script.xlb and dialog.xlb. You can then insert these into your project. toepassing. Zodra een bibliotheek is opgeslagen, bestaat het als een map met twee bestanden script.xlb en dialoog.xlb. U kunt deze dan invoegen in uw project. ------------------------------- ****610;36;11(text:p)Select the Selecteer het ****610;79;5(text:span)Macro Macro ****610;96;16() command in the commando in het ****610;144;5(text:span)Tools Extra ****610;161;17() menu, and click menu, en klik ****610;210;9(text:span)Organizer Beheren... ****610;231;28() in the dialog that follows. in het volgende dialoogvenster. ------------------------------- ****613;40;6(text:p)Click Klik ****613;78;6(text:span)Append Toevoegen... ****613;96;40() and select the data you want to insert. en selecteer de gegevens die u wilt invoegen. ####Text\SBASIC\COMMON\01040000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;18(subject)Additional Options Aanvullende opties ------------------------------- ****212;59;18(help:link)Additional Options Aanvullende opties ****213;40;63(text:p)The following describes several additional options provided by Het volgende beschrijft verschillende aanvullende opties geleverd door ****213;121;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****213;152;1(). . ------------------------------- ****215;37;43(text:p)Assigning Macros to Specific Program Events Macro's toewijzen aan specifieke programmagebeurtenissen ------------------------------- ****216;40;7(text:p)In any In een willekeurige ****216;65;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****216;96;203() application you have the option of automatically executing a macro when a specified event occurs. First, though, you must assign the desired macro to the event. The possible events are available in all toepassing heeft u de optie om een macro automatisch uit te voeren als een gespecificeerde gebeurtenis voorkomt. Eerst, echter, moet u de gewenste macro aan de gebeurtenis toekennen. De mogelijke gebeurtenissen zijn beschikbaar in alle ****216;317;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****216;348;119() programs. The following table provides an overview of program events and at what point the assigned macro is executed. programma's . De volgende tabel biedt een overzicht van programmagebeurtenissen en op welk punt de toegekende macro wordt uitgevoerd. ------------------------------- ****223;44;5(text:p)Event Gebeurtenis ------------------------------- ****226;44;41(text:p)Macro (SUB) is automatically executed,... Macro (SUB) wordt automatisch uitgevoerd,... ------------------------------- ****232;45;13(text:p)Program Start Programma starten ------------------------------- ****235;45;20(text:p)...directly after a ...direct nadat een ****235;83;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****235;114;20() program is started. programma is begonnen. ------------------------------- ****240;45;11(text:p)Program End Programma beëindigen ------------------------------- ****243;45;24(text:p)...immediately before a ...vlak voordat een ****243;87;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****243;118;18() program is ended. programma wordt beëindigd. ------------------------------- ****248;45;15(text:p)Create Document Document maken ------------------------------- ****251;45;49(text:p)...directly after a new document is created with ...direct nadat een nieuw document wordt gemaakt met ****251;126;10(text:span)File - New Bestand - Nieuw ****251;148;13() or with the of met het ****251;193;3(text:span)New Nieuw ****251;208;6() icon. icoon. ------------------------------- ****256;45;13(text:p)Open Document Document openen ------------------------------- ****259;45;48(text:p)...directly after a new document is opened with ...direct nadat een nieuw document is geopend met ****259;125;11(text:span)File - Open Bestand - Openen ****259;148;13() or with the of met het ****259;193;4(text:span)Open Bestand openen ****259;209;6() icon. icoon. ------------------------------- ****264;45;16(text:p)Save Document As Document opslaan als ------------------------------- ****267;45;71(text:p)...immediately before a document is saved under a specified name (with ...vlak voordat een document is opgeslagen onder een gespecificeerde naam (met ****267;148;14(text:span)File - Save As Bestand - Opslaan als... ****267;174;10(), or with , of met ****267;216;11(text:span)File - Save Bestand - Opslaan ****267;239;8() or the of het ****267;279;4(text:span)Save Document opslaan ****267;295;54() icon, if a document name has not yet been specified). icoon, als de documentnaam nog niet was gespecificeerd). ------------------------------- ****272;45;26(text:p)Document has been saved as Document is opgeslagen als ------------------------------- ****275;45;67(text:p)...directly after a document is saved under a specified name (with ...direct nadat een document is opgeslagen onder een gespecificeerde naam (met ****275;144;14(text:span)File - Save As Bestand - Opslaan als... ****275;170;10(), or with , of met ****275;212;11(text:span)File - Save Bestand - Opslaan ****275;235;13() or with the of met het ****275;280;4(text:span)Save Opslaan ****275;296;54() icon, if a document name has not yet been specified). icoon, als de documentnaam nog niet was gespecificeerd ). ------------------------------- ****280;45;13(text:p)Save Document Document opslaan ------------------------------- ****283;45;47(text:p)...immediately before a document is saved with ...vlak voordat een document is opgeslagen met ****283;124;11(text:span)File - Save Bestand - Opslaan ****283;147;8() or the of de/het ****283;187;4(text:span)Save Opslaan ****283;203;64() icon, provided that a document name has already been specified. icoon, vooropgesteld dat een documentnaam reeds is gespecificeerd. ------------------------------- ****288;45;23(text:p)Document has been saved Document is opgeslagen ------------------------------- ****291;45;43(text:p)...directly after a document is saved with ...direct nadat een document is opgeslagen met ****291;120;11(text:span)File - Save Bestand - Opslaan ****291;143;8() or the of het ****291;183;4(text:span)Save Opslaan ****291;199;64() icon, provided that a document name has already been specified. icoon, vooropgesteld dat een documentnaam reeds is gespecificeerd. ------------------------------- ****296;45;14(text:p)Close Document Document sluiten ------------------------------- ****299;45;40(text:p)...directly before a document is closed. ...vlak voordat een document wordt gesloten. ------------------------------- ****304;45;24(text:p)Document is being closed Document wordt gesloten ------------------------------- ****307;45;40(text:p)...directly after a document is closed. ...direct nadat een document is gesloten. ****307;117;4(text:span)Note Let op ****307;133;110(): If the document was not saved since the last modification, and the user confirms the subsequent dialog with : Als het document niet was opgeslagen sinds de laatste wijziging en de gebruiker bevestigt het daarop volgende dialoogvenster met ****307;275;3(text:span)Yes Ja ****307;290;77(), the "Save Document" event will automatically be executed as well. , zal de "Document opslaan" gebeurtenis eveneens automatisch worden uitgevoerd. ------------------------------- ****312;45;17(text:p)Activate Document Document activeren ------------------------------- ****315;45;142(text:p)...directly after a document is brought to the foreground either with the corresponding entry in the Window menu, or with the key combination ...direct nadat een document op de voorgrond is gebracht óf met het overeenkomstige item in het menu Venster óf met de toetscombinatie ****315;241;9(text:p)(Command) (Command) ****315;276;6()(Ctrl) (Ctrl) ****315;311;7() (Tab). (Tab). ------------------------------- ****320;45;19(text:p)Deactivate Document Document deactiveren ------------------------------- ****323;45;148(text:p)...directly after another document is brought to the foreground either with the corresponding entry in the Window menu, or with the key combination ...direct nadat een ander document op de voorgrond is gebracht óf met het overeenkomstige item in het menu Venster óf met de toetscombinatie ****323;247;9(text:p)(Command) (Command) ****323;282;6()(Ctrl) (Ctrl) ****323;317;7() (Tab). (Tab). ------------------------------- ****328;45;14(text:p)Print Document Document afdrukken ------------------------------- ****331;45;22(text:p)...directly after the ...direct nadat het ****331;99;5(text:span)Print Afdrukken ****331;116;62() dialog is closed, but before the actual print process begins. dialoogvenster is gesloten, maar vóór het echte afdrukken begint. ------------------------------- ****336;45;25(text:p)JavaScript run-time error JavaScript runtime error ------------------------------- ****339;45;44(text:p)... when a JavaScript run-time error occurs. ... als een JavaScript run-time fout gebeurt. ------------------------------- ****344;45;16(text:p)Print Mail Merge Standaardbrieven afdrukken ------------------------------- ****347;45;22(text:p)...directly after the ...direct nadat het ****347;99;5(text:span)Print Afdrukken ****347;116;103() dialog is closed, but before the actual print process begins. This event occurs for each copy printed. dialoogvenster is gesloten, maar vóór het echte afdrukken begint. Deze gebeurtenis vindt plaats voor elke afgedrukte kopie. ------------------------------- ****352;45;24(text:p)Change of the page count Wijziging van het aantal pagina's ------------------------------- ****355;45;32(text:p)... when the page count changes. ... als de paginanummering verandert. ------------------------------- ****360;45;16(text:p)Message received Bericht ontvangen ------------------------------- ****363;45;30(text:p)... if a message was received. ... als een boodschap werd ontvangen. ------------------------------- ****377;46;122(text:p)A macro assigned to an event will also be automatically executed if the respective event is provoked by a different macro! Een macro, toegekend aan een gebeurtenis, zal ook automatisch worden uitgevoerd als de respectievelijke gebeurtenis wordt uitgelokt door een andere macro! ------------------------------- ****382;37;29(text:p)Assigning a Macro to an Event Toewijzen van een macro aan een gebeurtenis ------------------------------- ****385;35;11(text:p)Select the Selecteer het ****385;78;9(text:span)Configure Configureren... ****385;99;16() command in the commando in het ****385;147;5(text:span)Tools Extra ****385;164;20() menu and click the menu en klik de ****385;193;4()tab tab ****385;229;6(text:span)Events Gebeurtenissen ****385;247;1(). . ------------------------------- ****401;35;9(text:p)From the Uit de ****401;76;5(text:span)Event Gebeurtenis ****401;93;36() list box, select the type of event. keuzelijst, selecteer het type gebeurtenis. ------------------------------- ****404;35;7(text:p)In the In de ****404;74;5(text:span)Macro Macro's ****404;91;134() list box at the left, select the object (document, template, or application) which contains the macro you want to assign to an event. keuzelijst links, selecteer het object (document, sjabloon, of applicatie)die de macro bevat die u wilt toekennen aan een gebeurtenis. ------------------------------- ****407;35;7(text:p)In the In de ****407;74;5(text:span)Macro Macro's ****407;91;55() list box at the right, select the desired macro (SUB). keuzelijst rechts, selecteer de gewenste macro (SUB). ------------------------------- ****410;35;28(text:p)Confirm your selection with Bevestig uw selectie met ****410;95;2(text:span)OK OK ****410;109;1(). . ------------------------------- ****413;37;37(text:p)Removing a Macro Assigned to an Event Verwijderen van een macro toegewezen aan een gebeurtenis ------------------------------- ****416;35;104(text:p)In the dialog (see above) select the event for which you want to remove the macro assignment, and click In het dialoogvenster (zie boven) selecteer de gebeurtenis waarvoor u de macro toekenning wilt verwijderen en klik ****416;171;6(text:span)Remove Opheffen ****416;189;1(). . ------------------------------- ****419;37;65(text:p)Assigning a Macro to a Toolbar, Key Combination or Pull-Down Menu Toewijzen van een macro aan een werkbalk, toetscombinatie of pull-down-menu ------------------------------- ****420;40;7(text:p)In any In een willekeurige ****420;65;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****420;96;52() application you can assign a macro (as well as any toepassing kunt u een macro toekennen (net als aan een willekeurig ****420;166;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****420;197;135() Basic project) to certain toolbars, define a key combination to execute a macro, or start a macro with a pull-down menu entry. Select BASIC project) aan bepaalde werkbalken, een toetscombinatie definiëren om een macro uit te voeren of een macro starten met een pull-down menuitem. Selecteer ****420;364;17(text:span)Tools - Configure Extra – Configureren... ****420;393;71() and click the respective tab, where you can make the desired settings. en klik op de respectievelijke tab, waar u de gewenste instellingen kunt maken. ####Text\SBASIC\COMMON\01050000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;22(subject)%PRODUCTNAME Basic IDE %PRODUCTNAME BASIC IDE ------------------------------- ****63;100;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****63;131;10() Basic IDE BASIC IDE ------------------------------- ****64;40;84(text:p)Here you will take acknowledgment how the customized interface is structured when a Hier zult u kennis nemen van de wijze waarop de aangepaste interface wordt gestructureerd als een ****64;142;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****64;173;26() Basic document is opened. BASIC document wordt geopend. ------------------------------- ****68;59;14(help:link)Breakpoints... Onderbrekingspunten... ------------------------------- ****71;59;13(help:link)Properties... Eigenschappen... ------------------------------- ****73;40;80(text:p)The following commands are only available via the context menu in the tabs area: De volgende commando's zijn alleen beschikbaar via het contextmenu in het tab-gebied onder in het Bewerkvenster: ------------------------------- ****74;37;6(text:p)Insert Invoegen ------------------------------- ****75;40;56(text:p)Specify whether you want to insert a module or a dialog. Specificeer of u een module of een dialoogvenster wilt invoegen. ------------------------------- ****76;83;6(text:p)Module BASIC-module ------------------------------- ****77;72;42(help:help-text)Click here to insert an additional module. Klik hier om een aanvullende module in te voegen. ------------------------------- ****78;83;6(text:p)Dialog BASIC-dialoog ------------------------------- ****79;72;42(help:help-text)Click here to insert an additional dialog. Klik hier om een aanvullend dialoogvenster in te voegen. ------------------------------- ****80;87;6(text:p)Delete Verwijderen ------------------------------- ****81;72;38(help:help-text)Click here to delete the selected tab. Klik hier om verwijder de geselecteerde tab. ****81;127;46() Before deleting you will be asked to confirm. Voor het verwijderen zal u worden gevraagd om te bevestigen. ------------------------------- ****82;87;6(text:p)Rename Naam wijzigen ------------------------------- ****83;72;87(help:help-text)Click here to rename the tab. The existing name will receive a color and can be edited. Klik hier om de tab te hernoemen. De bestaande naam krijgt een kleur en kan worden bewerkt. ------------------------------- ****84;85;4(text:p)Hide Verbergen ------------------------------- ****85;72;72(help:help-text)Click here to hide the tab. If you want to view the tab again, open the Klik hier om de tab te verbergen . Als u de tab weer wilt weergeven, open het ****85;176;6(text:span)Module Module ****85;194;9() command. commando. ------------------------------- ****86;37;7(text:p)Modules Modules ------------------------------- ****87;40;36(text:p)Click on this menu item to open the Klik op dit menuitem om te openen het ****87;147;8(text:span)Organize Macro's beheren ****87;179;8() dialog. dialoogvenster. ####Text\SBASIC\COMMON\01050100.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;5(subject)Watch Controle ------------------------------- ****90;59;5(help:link)Watch Controle ****91;40;59(text:p)The following provides an introduction to working with the De volgende sectie biedt een inleiding naar het werken met het ****91;131;5(text:span)Watch Controle ****91;148;8() Dialog. dialoogvenster. ------------------------------- ****93;40;110(text:p)The Watch window enables you to observe single variables. Define the variable in the Watch text box. Click on Het Controlevenster maakt het u mogelijk u om aparte variabelen te bekijken. Definieer de variabele in het Controle:-tekstvak. Klik op ****93;172;9(help:link)Add Watch Controle weergeven ****93;193;63() to add the variable to the list box and to display its values. om de variabele aan de keuzelijst toe te voegen en om zijn waarden te tonen. ------------------------------- ****103;46;84(text:p)Alternatively, place the cursor on a variable in the source text and click then the Als alternatief, plaats de cursor op een variabele in de brontekst en klik dan de/het ****103;171;9(text:span)Add Watch Controle weergeven ****103;192;53() box. The varialbe will now be added to the list box. icoon. De variabele zal nu worden toegevoegd aan de keuzelijst. ------------------------------- ****108;37;6(text:p)Watch: Controle: ------------------------------- ****109;40;94(text:p)In this field enter the variable whose values are to be displayed permanently in the list box. Toets in dit veld de variabele in waarvan de waarden permanent moeten worden getoond in de keuzelijst. ------------------------------- ****110;37;12(text:p)Remove Watch Bewaker verwijderen ------------------------------- ****111;40;103(text:p)Click this button to remove the values of the variable placed in the Watch text field fromthe list box. Klik op deze knop om de waarden van de variabele, geplaatst in het Controle:-tekstveld, uit de keuzelijst te verwijderen. ------------------------------- ****121;46;12(text:p)Remove Watch Bewaker verwijderen ------------------------------- ****126;37;12(text:p)Edit a value Bewerk een waarde ****126;71;21(keyword)value edit; Basic-IDE waarde bewerken; Basic-IDE ****126;133;21(keyword)Basic-IDE; edit value Basic-IDE; bewerken waarde ------------------------------- ****127;40;110(text:p)Click twice, with a short pause in between, on a text in the list box. Now you can edit the text in that line. Klik twee keer, met een korte pauze ertussen, op een tekst in de keuzelijst. Nu kunt u de tekst in die regel bewerken. ------------------------------- ****128;40;254(text:p)Example: You observe the variable i, which currently (at a breakpoint) has the value 1. In the list box the line states i = 1. Click this text twice with a pause in between. Now you can enter i = 4 and press the Enter key. Variable i has the value 4 now. Voorbeeld: U bekijkt de variabele i, welke momenteel (bij een onderbrekingspunt) de waarde 1 heeft. In de keuzelijst geeft de regel weer i = 1. Klik deze tekst twee keer met een pauze ertussen. Nu kunt u intoetsen i = 4 en druk op de Entertoets. Variabele i heeft nu de waarde 4. ####Text\SBASIC\COMMON\01050200.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;10(subject)Call Stack Oproepen ------------------------------- ****59;59;10(help:link)Call Stack Oproepen ****60;40;59(text:p)The following provides an introduction to working with the De volgende sectie biedt een inleiding naar het werken met het ****60;131;10(text:span)Call Stack Oproepen ****60;153;94() Dialog. In the call stack, the order of the nested function and procedure calls is displayed. dialoogvenster. In het Oproepenvenster, wordt de volgorde van de geneste functie en procedure aanroepen getoond. ------------------------------- ****62;37;6(text:p)Calls: Oproepen: ------------------------------- ****63;40;78(text:p)Displays the names of the nested functions and procedures and their arguments. Toont de namen van de geneste functies en procedures en hun argumenten. ####Text\SBASIC\COMMON\01050300.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;11(subject)Breakpoints Onderbrekingspunten ------------------------------- ****75;37;11(text:p)Breakpoints Onderbrekingspunten ------------------------------- ****76;111;132(help:help-text)Determine the properties of the breakpoint to be inserted. You can also change here the properties for already existing breakpoints. Bepaal de eigenschappen van de onderbrekingspunten die moeten worden ingevoegd. U kunt hier ook de eigenschappen voor reeds bestaande onderbrekingspunten veranderen. ****76;282;96()It is also possible to switch the active property via the context menu of a inserted breakpoint. Het is ook mogelijk om de Aktief-eigenschap via het contextmenu van een ingevoegd onderbrekingspunt te wijzigen. ------------------------------- ****77;120;11(text:p)Breakpoints Onderbrekingspunten ------------------------------- ****78;72;127(help:help-text)Specify the line number of the breakpoint here. The sign (#) followed by the line number has the function of of a guiding sign. Specificeer het regelnummer van het Onderbrekingspunt hier. Het teken (#) gevolgd door het regelnummer heeft de functie van een gidsteken. ------------------------------- ****88;46;144(text:p)Durch einen Doppelklick mit der Maus vor der jeweiligen Zeile wird automatisch ein Haltepunkt gesetzt oder ein bestehender Haltepunkt gelöscht. Door een dubbelklik met de muis voor de huidige regel wordt automatisch een Onderbrekingspunt ingesteld of een bestaand Onderbrekingspunt verwijderd. ------------------------------- ****94;119;6(text:p)Active Actief ------------------------------- ****95;72;21(help:help-text)Here you can specify Hier kunt u specificeren ****95;102;59(help:help-text)the procedure to be interrupted at a predefined breakpoint. de procedure die moet worden onderbroken bij een voorgedefinieerd Onderbrekingspunt. ------------------------------- ****96;120;10(text:p)Identifier Doorloop ------------------------------- ****97;72;74(help:help-text)Specify the number of loops to perform before the breakpoint takes effect. Specificeer het aantal loops die moeten worden uitgevoerd vóór het Onderbrekingspunt effect heeft. ------------------------------- ****98;116;3(text:p)New Nieuw ------------------------------- ****99;72;112(help:help-text)Attaches the breakpoint specified in this field to the current line. The entry will be accepted in the list box. Hecht het in dit veld gespecificeerde onderbrekingspunt aan de huidige regel. Het item zal worden geaccepteerd in de keuzelijst. ####Text\SBASIC\COMMON\01050400.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;6(subject)active Aktief ------------------------------- ****58;101;6(help:link)active Aktief ****59;72;65(help:help-text)Use this command to activate ordeactivate an inserted breakpoint. Gebruik dit commando om een ingevoegd onderbrekingspunt te activeren of te deactiveren. ####Text\SBASIC\COMMON\03000000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;18(subject)Run-Time Functions Run-time functies ------------------------------- ****58;95;18(help:link)Run-Time Functions Run-time functies ****59;39;74(text:p)Here you will find information about all run-time functions available for Hier vindt u informatie over alle run-time functies beschikbaar voor ****59;131;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****59;162;14() applications. toepassingen. ####Text\SBASIC\COMMON\03010000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;20(subject)Screen I/O Functions Beeld I/O functies ------------------------------- ****56;58;20(help:link)Screen I/O Functions Beeld I/O functies ****57;39;105(text:p)Here you will find a list of all functions used to call dialogs for the input and output of user entries. Hier zult u een lijst vinden van alle functies die worden gebruikt om dialoogvensters op te roepen voor de invoer en uitvoer van gebruikersinvoer. ####Text\SBASIC\COMMON\03010100.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;17(subject)Display Functions Beeldfuncties ------------------------------- ****57;58;17(help:link)Display Functions Beeldfuncties ****58;39;83(text:p)All the functions used to output information to the screen display are listed here. Alle functies, gebruikt voor de uitvoer van informatie naar het beeldscherm, zijn hier opgesomd. ####Text\SBASIC\COMMON\03010101.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;26(subject)MsgBox statement [Runtime] MsgBox argument [Runtime] ------------------------------- ****66;58;26(help:link)MsgBox statement [Runtime] MsgBox argument [Runtime] ****66;118;6(keyword)MsgBox MsgBox ****67;39;43(text:p)Displays a dialog box containing a message. Toont een dialoogvenster dat een boodschap bevat. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;165(text:p)MsgBox Text As String [,Type As Integer [,Dialogtitle As String]] (As statement) or MsgBox (Text As String [,Type As Integer [,Dialogtitle As String]]) (As Function) MsgBox Text As String [,Type As Integer [,Dialogtitle As String]] (As statement) or MsgBox (Text As String [,Type As Integer [,Dialogtitle As String]]) (As Function) ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;207(text:p)Text: String expression displayed as a message in the dialog box. Line breaks can be inserted with Chr$(13). Only the first 255 characters of a string are displayed; all exceeding characters are disregarded. Text: tekenreeksuitdrukking getoond als een boodschap in het dialoogvenster. Regeleinden kunnen worden ingevoegd met Chr$(13). Alleen de eerste 255 tekens van een tekenreeks worden getoond; alle meerdere tekens worden genegeerd. ------------------------------- ****73;39;147(text:p)DialogTitle: String expression displayed in the title bar of the dialog. If omitted, the title bar displays the name of the respective application. DialogTitle: tekenreeksuitdrukking getoond in de titelbalk van het dialoogvenster. Indien weggelaten geeft de titelbalk de naam van de respectievelijke toepassing weer. ------------------------------- ****74;39;134(text:p)Type: Any integer expression that specifies the dialog type, along with the number and type of buttons to display, and the icon type. Type: Elke Integer-uitdrukking die het dialoogtype specificeert, samen met het getal en soort knoppen om te tonen en het icoon type. ****74;205;4(text:span)Type Type ****74;221;124() represents a combination of bit patterns, i.e., a combination of elements can be defined by adding their respective values: vertegenwoordigt een combinatie van bitpatronen, d.w.z., een combinatie van elementen kan worden gedefinieerd door hun respectievelijke waarden toe te voegen: ------------------------------- ****75;39;27(text:p)0 : Display OK button only. 0 : OK drukknop alleen weergeven. ------------------------------- ****76;39;34(text:p)1 : Display OK and Cancel buttons. 1 : OK en Annuleren knoppen weergeven. ------------------------------- ****77;39;37(text:p)2 : Display Cancel and Retry buttons. 2 : Annuleren en Herhalen knoppen weergeven. ------------------------------- ****78;39;39(text:p)3 : Display Yes, No and Cancel buttons. 3 : Ja, Nee en Annuleren knoppen weergeven. ------------------------------- ****79;39;31(text:p)4 : Display Yes and No buttons. 4 : Ja en Nee knoppen weergeven. ------------------------------- ****80;39;37(text:p)5 : Display Retry and Cancel buttons. 5 : Herhalen en Annuleren knoppen weergeven. ------------------------------- ****81;39;37(text:p)16 : Add the Stop icon to the dialog. 16 : Voeg het Stop icoon toe aan het dialoogvenster. ------------------------------- ****82;39;41(text:p)32 : Add the Question icon to the dialog. 32 : Voeg het Vraagteken icoon toe aan het dialoogvenster. ------------------------------- ****83;39;44(text:p)48 : Add the Exclamation icon to the dialog. 48 : Voeg het Uitroepteken icoon toe aan het dialoogvenster. ------------------------------- ****84;39;44(text:p)64 : Add the Information icon to the dialog. 64 : Voeg het Informatie icoon toe aan het dialoogvenster. ------------------------------- ****85;39;49(text:p)0 : First button in the dialog as default button. 0 : Eerste drukknop in het dialoogvenster als standaarddrukknop. ------------------------------- ****86;39;52(text:p)256 : Second button in the dialog as default button. 256 : Tweede drukknop in het dialoogvenster als standaarddrukknop. ------------------------------- ****87;39;51(text:p)512 : Third button in the dialog as default button. 512 : Derde drukknop in het dialoogvenster als standaarddrukknop. ------------------------------- ****88;32;8(text:p)Example: Voorbeeld: ------------------------------- ****89;38;17(text:p)Sub ExampleMsgBox Sub VoorbeeldMsgBox ------------------------------- ****90;38;55(text:p)Const sText1 = "An unexpected error occured." Const sTekst1 = "Een onverwachte fout trad op!" ------------------------------- ****91;38;72(text:p)Const sText2 = "The program execution will continue, however." Const sTekst2 = "De programmauitvoering zal echter doorgaan." ------------------------------- ****92;38;32(text:p)Const sText3 = "Error" Const sTekst3 = "Fout !" ------------------------------- ****93;38;43(text:p)MsgBox(sText1 + Chr(13) + sText2,16,sText3) MsgBox(sTekst1 + Chr(13) + sTekst2,16,sTekst3) ------------------------------- ****94;38;7(text:p)End sub end sub ####Text\SBASIC\COMMON\03010102.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;25(subject)MsgBox Function [Runtime] MsgBox functie [Runtime] ------------------------------- ****66;58;25(help:link)MsgBox Function [Runtime] MsgBox functie [Runtime] ****67;39;115(text:p)Displays a dialog box containing a message. This function allows you to define a button used to confirm the dialog. Toont een dialoogvenster dat een boodschap bevat. Deze functie laat u een drukknop definiëren, gebruikt om de dialoog te bevestigen. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;68(text:p)MsgBox (Text As String [,Type As Integer [,Dialogtitle As String]]) MsgBox (Text As String [,Type As Integer [,Dialogtitle As String]]) ****70;129;6(keyword)MsgBox MsgBox ------------------------------- ****71;71;12(text:span)Return value resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;7(text:p)Integer Integer ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;207(text:p)Text: String expression displayed as a message in the dialog box. Line breaks can be inserted with Chr$(13). Only the first 255 characters of a string are displayed; all remaining characters are disregarded. Text: tekenreeksuitdrukking getoond als een boodschap in het dialoogvenster. Regeleinden kunnen worden ingevoegd met Chr$(13). Alleen de eerste 255 tekens van een tekenreeks worden getoond; alle overblijvende tekens worden genegeerd. ------------------------------- ****75;39;137(text:p)DialogTitle: String expression displayed in the title bar of the dialog. If omitted, the name of the respective application is displayed. DialogTitle: tekenreeksuitdrukking getoond in de titelbalk van het dialoogvenster. Indien weggelaten wordt de naam van de respectievelijke toepassing getoond. ------------------------------- ****76;39;122(text:p)Type: Any integer expression that specifies the dialog type and defines the number and type of butons or icons displayed. Type: Elke Integer-uitdrukking die het dialoogtype specificeert en het aantal en soort knoppen of iconen definieert die worden getoond. ****76;193;4(text:span)Type Type ****76;209;112() represents a combination of bit patterns, i.e., dialog elements can be defined by adding the respective values: stelt vertegenwoordigt een combinatie van bitpatronen, d.w.z., dialoogelementen kunnen worden gedefinieerd door het toevoegen van de respectievelijke waarden: ------------------------------- ****77;32;6(text:p)Values Waarden ------------------------------- ****78;39;27(text:p)0 : Display OK button only. 0 : OK drukknop alleen weergeven. ------------------------------- ****79;39;34(text:p)1 : Display OK and Cancel buttons. 1 : OK en Annuleren knoppen weergeven. ------------------------------- ****80;39;37(text:p)2 : Display Cancel and Retry buttons. 2 : Annuleren en Herhalen knoppen weergeven. ------------------------------- ****81;39;40(text:p)3 : Display Yes, No, and Cancel buttons. 3 : Ja, Nee en Annuleren knoppen weergeven. ------------------------------- ****82;39;31(text:p)4 : Display Yes and No buttons. 4 : Ja en Nee knoppen weergeven. ------------------------------- ****83;39;37(text:p)5 : Display Retry and Cancel buttons. 5 : Herhalen en Annuleren knoppen weergeven. ------------------------------- ****84;39;37(text:p)16 : Add the Stop icon to the dialog. 16 : Voeg het Stop icoon toe aan het dialoogvenster. ------------------------------- ****85;39;41(text:p)32 : Add the Question icon to the dialog. 32 : Voeg het Vraagteken icoon toe aan het dialoogvenster. ------------------------------- ****86;39;44(text:p)48 : Add the Explanation icon to the dialog. 48 : Voeg het Uitroepteken icoon toe aan het dialoogvenster. ------------------------------- ****87;39;44(text:p)64 : Add the Information icon to the dialog. 64 : Voeg het Informatie icoon toe aan het dialoogvenster. ------------------------------- ****88;39;49(text:p)0 : First button in the dialog as default button. 0 : Eerste drukknop in het dialoogvenster als standaarddrukknop. ------------------------------- ****89;39;52(text:p)256 : Second button in the dialog as default button. 256 : Tweede drukknop in het dialoogvenster als standaarddrukknop. ------------------------------- ****90;39;51(text:p)512 : Third button in the dialog as default button. 512 : Derde drukknop in het dialoogvenster als standaarddrukknop. ------------------------------- ****91;32;13(text:p)Return value: resultaatwaarde: ------------------------------- ****92;39;6(text:p)1 : OK 1 : OK ------------------------------- ****93;39;10(text:p)2 : Cancel 2 : Annuleren ------------------------------- ****94;39;9(text:p)4 : Retry 4 : Herhalen ------------------------------- ****95;39;10(text:p)5 : Ignore 5 : Negeren ------------------------------- ****96;39;7(text:p)6 : Yes 6 : Ja ------------------------------- ****97;39;6(text:p)7 : No 7 : Nee ------------------------------- ****98;39;122(text:p)The MsgBox function returns a value indicating which button the user has chosen. The following return values are possible: De MsgBox-functie geeft een resultaatwaarde aan die aangeeft welke drukknop de gebruiker heeft gekozen. De volgende resultaatwaarden zijn mogelijk: ------------------------------- ****99;32;12(text:p)Return value resultaatwaarde ------------------------------- ****100;39;6(text:p)1 : OK 1 : OK ------------------------------- ****101;39;10(text:p)2 : Cancel 2 : Annuleren ------------------------------- ****102;39;9(text:p)4 : Retry 4 : Herhalen ------------------------------- ****103;39;10(text:p)5 : Ignore 5 : Negeren ------------------------------- ****104;39;7(text:p)6 : Yes 6 : Ja ------------------------------- ****105;39;6(text:p)7 : No 7 : Nee ------------------------------- ****106;32;8(text:p)Example: Voorbeeld: ------------------------------- ****107;38;17(text:p)Sub ExampleMsgBox Sub Voorbeeld2MsgBox ------------------------------- ****108;38;19(text:p)Dim sVar as Integer Dim sVar as Integer ------------------------------- ****109;38;36(text:p)sVar = MsgBox("Las Vegas") sVar = MsgBox("Leeuwarden") ------------------------------- ****110;38;38(text:p)sVar = MsgBox("Las Vegas",1) sVar = MsgBox("Leeuwarden",1) ------------------------------- ****111;38;75(text:p)sVar = MsgBox( "Las Vegas",256 + 16 + 2,"Dialog title") sVar = MsgBox( "Leeuwarden",256 + 16 + 2,"Dialoogvenster titel") ------------------------------- ****112;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03010103.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;25(subject)Print statement [Runtime] Print argument [Runtime] ------------------------------- ****86;58;25(help:link)Print statement [Runtime] Print argument [Runtime] ****87;39;64(text:p)Prints the specified strings or numeric expressions in a dialog. Drukt de gespecificeerde tekenreeksen of numerieke uitdrukkingen in een dialoogvenster af. ------------------------------- ****89;71;6(text:span)Syntax Syntaxis ****89;89;1(): : ------------------------------- ****90;39;92(text:p)Print Expression1[{;|,} [Spc(Number As Integer);] [Tab(pos As Integer);] [Expression2[...]] Print Expressie1[{;|,} [Spc(Getal As Integer);] [Tab(pos As Integer);] [Expressie2[...]] ****90;153;5(keyword)Print Print ------------------------------- ****91;71;9(text:span)Parameter Parameter ****91;92;1(): : ------------------------------- ****92;39;223(text:p)Expression: Any numeric or string expression to be printed. Multiple expressions can be separated by a semicolon. If separated by a comma, the expressions are indented to the next tab stop. The tab stops cannot be adjusted. Expressie: Elke numerieke of tekenreeksuitdrukking kan worden afgedrukt. Meerdere uitdrukkingen kunnen worden gescheiden door een puntkomma. Indien gescheiden door een komma, springen de uitdrukkingen in naar de volgende tabulatorpositie. De tabstops kunnen niet worden aangepast. ------------------------------- ****93;39;60(text:p)Number: Number of spaces to be inserted by the Spc function. Getal: Aantal spaties die worden ingevoegd door de Spc functie. ------------------------------- ****94;39;54(text:p)Pos: Spaces are inserted until the specified position. Pos: Spaties worden ingevoegd tot de gespecificeerde positie. ------------------------------- ****95;39;73(text:p)If a semicolon or comma appears after the last expression to be printed, Als een puntkomma of komma verschijnt na de laatste uitdrukking die moet worden afgedrukt, ****95;130;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****95;161;222() Basic stores the text in an internal buffer and continues program execution without printing. When another Print statement without a semicolon or comma at the end is encountered, all text to be printed is printed at once. BASIC slaat de tekst op in een interne buffer en vervolgt de programmauitvoering zonder afdrukken. Wanneer een ander Print-argument, zonder een puntkomma of komma aan het eind, wordt bereikt, wordt alle tekst die moet worden afgedrukt in één keer afgedrukt. ------------------------------- ****96;39;250(text:p)Positive numeric expressions are printed with a leading space. Negative expressions are printed with a leading minus sign. If a certain range is exceeded for floating-point values, the respective numeric expression is printed in exponential notation. Positieve numerieke uitdrukkingen worden afgedrukt met een voorafgaande spatie. Negatieve uitdrukkingen worden afgedrukt met een voorafgaand min-teken. Als een bepaald bereik wordt overschreden voor verplaatsende-komma waarden, wordt de respectievelijke numerieke uitdrukking afgedrukt in exponentiele notatie. ------------------------------- ****97;39;111(text:p)If the expression to be printed exceeds a certain length, the display will automatically wrap to the next line. Als de uitdrukking die moet worden afgedrukt groter is dan een bepaalde lengte, zal het scherm automatisch doorlopen naar de volgende regel. ------------------------------- ****107;45;139(text:p)You can insert the Tab function, enclosed by semicolons, between arguments to indent the output to a specific position, or you can use the U kunt de Tab-functie invoegen, gevat binnen puntkomma's, tussen argumenten om de uitvoer naar een specifieke positie in te laten springen of u kunt gebruiken de ****107;216;3(text:span)Spc Spc ****107;231;49() function to insert a specified number of spaces. functie om een gespecificeerd aantal spaties in te voegen. ------------------------------- ****113;32;8(text:p)Example: Voorbeeld: ------------------------------- ****114;38;16(text:p)Sub ExamplePrint Sub VoorbeeldPrint ------------------------------- ****115;38;21(text:p)Print "ABC" Print "ABC" ------------------------------- ****116;38;37(text:p)Print "ABC","123" Print "ABC","123" ------------------------------- ****117;38;7(text:p)end Sub end Sub ####Text\SBASIC\COMMON\03010200.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;26(subject)Functions for Screen Input Functies voor scherminvoer ------------------------------- ****57;58;26(help:link)Functions for Screen Input Functies voor scherminvoer ****58;39;67(text:p)The following describes the functions used to control screen input. Het volgende beschrijft de functies gebruikt om scherminvoer te beheren. ####Text\SBASIC\COMMON\03010201.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;27(subject)InputBox Function [Runtime] InputBox functie [Runtime] ------------------------------- ****66;58;27(help:link)InputBox Function [Runtime] InputBox functie [Runtime] ****67;39;100(text:p)Displays a prompt in a dialog at which the user can input text. The input is assigned to a variable. Toont een prompt in een dialoogvenster waar de gebruiker tekst kan invoeren. De invoer wordt toegekend aan een variabele. ------------------------------- ****69;39;4(text:p)The De ****69;75;8(text:span)InputBox InputBox ****69;95;207() statement is a convenient method of entering text via a dialog. Confirm the input by clicking OK or pressing Return. The input is returned as the function return value. If you close the dialog with Cancel, statement is een convenient methode van invoeren tekst via een dialoog. Bevestigen de invoer door te klikken op OK of te drukken op <Enter>. De invoer wordt weergegeven als de functie resultaatwaarde. Als u het dialoogvenster sluit met Annuleren, ****69;334;8(text:span)InputBox InputBox ****69;354;45() returns a zero-length string (""). geeft een lege tekenreeks ("") weer. ------------------------------- ****70;71;6(text:span)Syntax Syntaxis ****70;89;1(): : ------------------------------- ****71;39;104(text:p)InputBox (Msg As String[, Title As String[, Default As String[, x_pos As Integer, y_pos As Integer]]]]) InputBox (Msg As String[, Title As String[, Default As String[, x_pos As Integer, y_pos As Integer]]]]) ****71;165;8(keyword)InputBox InputBox ------------------------------- ****72;71;12(text:span)Return value Resultaatwaarde ****72;95;1(): : ------------------------------- ****73;39;6(text:p)String String ------------------------------- ****74;71;9(text:span)Parameter Parameter ****74;92;1(): : ------------------------------- ****75;39;66(text:p)Msg: String expression displayed as the message in the dialog box. Msg: tekenreeksuitdrukking getoond als de boodschap in het dialoogvenster. ------------------------------- ****76;39;70(text:p)Title: String expression displayed in the title bar of the dialog box. Titel: tekenreeksuitdrukking getoond in de titelbalk van het dialoogvenster. ------------------------------- ****77;39;91(text:p)Default: String expression displayed in the text box as default if no other input is given. Standaard: tekenreeksuitdrukking als standaard getoond in het tekstvak als er geen andere invoer is gegeven. ------------------------------- ****78;39;178(text:p)x_pos: Integer expression that specifies the horizontal position of the dialog. The position is an absolute coordinate and does not refer to the window of the office application. x_pos: Integer-uitdrukking die de horizontale positie van het dialoogvenster specificeert. De positie is een absolute coördinaat en verwijst niet naar het venster van de toepassing. ------------------------------- ****79;39;176(text:p)y_pos: Integer expression that specifies the vertical position of the dialog. The position is an absolute coordinate and does not refer to the window of the office application. y_pos: Integer-uitdrukking die de verticale positie van het dialoogvenster specificeert. De positie is een absolute coördinaat en verwijst niet naar het venster van de toepassing. ------------------------------- ****80;39;3(text:p)If Als ****80;74;5(text:span)x_pos x_pos ****80;91;5() and en ****80;128;5(text:span)y_pos y_pos ****80;145;81() are omitted, the dialog is centered on the screen. The position is specified in worden weggelaten, wordt het dialoogvenster gecentreerd op het scherm. De positie is gespecificeerd in ****80;261;5()twips twips ****80;279;1(). . ------------------------------- ****81;32;8(text:p)Example: Voorbeeld: ------------------------------- ****82;38;19(text:p)Sub ExampleInputBox Sub VoorbeeldInputBox ------------------------------- ****83;38;19(text:p)Dim sText As String Dim sTekst as String ------------------------------- ****84;38;6(text:p)sText sTekst ****84;53;69(text:p)= InputBox ("Please enter a phrase:","Dear User") = InputBox ("Toets alstublieft een zin in:","Beste gebruiker") ------------------------------- ****85;38;56(text:p)MsgBox ( sText , 64, "Confirmation of phrase") MsgBox ( sTekst , 64, "Bevestiging van de zin") ------------------------------- ****86;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03010300.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;15(subject)Color Functions Kleur functies ------------------------------- ****57;58;15(help:link)Color Functions Kleur functies ****58;39;55(text:p)Here you will find all functions used to define colors. Hier zult u alle functies vinden gebruikt om kleuren te definiëren. ####Text\SBASIC\COMMON\03010301.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;23(subject)Blue Function [Runtime] Blue functie [Runtime] ------------------------------- ****66;58;23(help:link)Blue Function [Runtime] Blue functie [Runtime] ****67;39;55(text:p)Returns the blue component of the specified color code. Geeft de blauwe component van de gespecificeerde kleurcode weer. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;21(text:p)Blue (Color As Long) Blue (Color as Long) ****70;82;4(keyword)Blue Blue ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;7(text:p)Integer Integer ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;56(text:p)Color value: Long integer expression that specifies any Kleurwaarde: Long Integer uitdrukking welke specificeert een willekeurige ****74;134;10(text:p)color code kleurcode ****74;157;40() for which to return the blue component. waarvan de blauwe component moet worden weergegeven. ------------------------------- ****75;32;8(text:p)Example: Voorbeeld: ------------------------------- ****76;38;16(text:p)Sub ExampleColor Sub VoorbeeldColor ------------------------------- ****77;38;16(text:p)Dim lVar As Long Dim lVar as Long ------------------------------- ****78;38;21(text:p)lVar = rgb(128,0,200) lVar = rgb(128,0,200) ------------------------------- ****79;38;93(text:p)MsgBox "The color " & lVar & " consists of:" & Chr(13) &_ MsgBox "De kleur " & lVar & " bevat de componenten:" & Chr(13) &_ ------------------------------- ****80;38;25(text:p)"red = " & "rood = " & ****80;72;29(text:p)Red(lVar) & Chr(13)&_ Red(lVar) & Chr(13)&_ ------------------------------- ****81;38;26(text:p)"green= " & "groen= " & ****81;73;31(text:p)Green(lVar) & Chr(13)&_ Green(lVar) & Chr(13)&_ ------------------------------- ****82;38;25(text:p)"blue= " & "blauw= " & ****82;72;48(text:p)Blue(lVar) & Chr(13) , 64,"colors" Blue(lVar) & Chr(13) , 64,"Kleuren" ------------------------------- ****83;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03010302.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;24(subject)Green Function [Runtime] Green functie [Runtime] ------------------------------- ****66;58;24(help:link)Green Function [Runtime] Green functie [Runtime] ****67;39;52(text:p)Returns the Green component of the given color code. Geeft de Groene component van de gegeven kleurcode weer. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;22(text:p)Green (Color As Long) Green (Color as Long) ****70;83;5(keyword)Green Green ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;7(text:p)Integer Integer ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;48(text:p)Color: Long integer expression that specifies a Kleur: Long Integer-uitdrukking die specificeert een ****74;126;10(text:p)color code kleurcode ****74;149;41() for which to return the Green component. waarvoor de Groene component wordt weergegeven. ------------------------------- ****75;32;8(text:p)Example: Voorbeeld: ------------------------------- ****76;38;16(text:p)Sub ExampleColor Sub VoorbeeldColor ------------------------------- ****77;38;16(text:p)Dim lVar As Long Dim lVar as Long ------------------------------- ****78;38;21(text:p)lVar = rgb(128,0,200) lVar = rgb(128,0,200) ------------------------------- ****79;38;105(text:p)msgbox "The color " & lVar & " contains the components:" & Chr(13) &_ msgbox "De kleur " & lVar & " bevat de componenten:" & Chr(13) &_ ------------------------------- ****80;38;25(text:p)"red = " & "Rood = " & ****80;72;29(text:p)red(lVar) & Chr(13)&_ red(lVar) & Chr(13)&_ ------------------------------- ****81;38;26(text:p)"green= " & "Groen= " & ****81;73;31(text:p)green(lVar) & Chr(13)&_ green(lVar) & Chr(13)&_ ------------------------------- ****82;38;25(text:p)"blue= " & "Blauw= " & ****82;72;48(text:p)blue(lVar) & Chr(13) , 64,"colors" blue(lVar) & Chr(13) , 64,"Kleuren" ------------------------------- ****83;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03010303.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)Red Function [Runtime] Red functie [Runtime] ------------------------------- ****66;58;22(help:link)Red Function [Runtime] Red functie [Runtime] ****67;39;54(text:p)Returns the Red component of the specified color code. Geeft de Rode component van de gespecificeerde kleurcode weer. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;26(text:p)Red (ColorNumber As Long) Red (ColorNumber as Long) ****70;87;3(keyword)Red Red ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;7(text:p)Integer Integer ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;56(text:p)ColorNumber: Long integer expression that specifies any ColorNumber: Long Integer-uitdrukking die specificeert een willekeurige ****74;134;10(text:p)color code kleurcode ****74;157;39() for which to return the Red component. waarvoor naar terugkeer de/het Rood component. ------------------------------- ****75;32;8(text:p)Example: Voorbeeld: ------------------------------- ****76;38;16(text:p)Sub ExampleColor Sub VoorbeeldColor ------------------------------- ****77;38;16(text:p)Dim lVar As Long Dim lVar as Long ------------------------------- ****78;38;21(text:p)lVar = rgb(128,0,200) lVar = rgb(128,0,200) ------------------------------- ****79;38;93(text:p)msgbox "The color " & lVar & " consists of:" & Chr(13) &_ msgbox "De kleur " & lVar & " bevat de componenten:" & Chr(13) &_ ------------------------------- ****80;38;24(text:p)"red= " & "Rood= " & ****80;71;29(text:p)red(lVar) & Chr(13)&_ red(lVar) & Chr(13)&_ ------------------------------- ****81;38;26(text:p)"green= " & "Groen= " & ****81;73;31(text:p)green(lVar) & Chr(13)&_ green(lVar) & Chr(13)&_ ------------------------------- ****82;38;25(text:p)"blue= " & "Blauw= " & ****82;72;48(text:p)blue(lVar) & Chr(13) , 64,"colors" blue(lVar) & Chr(13) , 64,"Kleuren" ------------------------------- ****83;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03010304.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;26(subject)QBColor Function [Runtime] QBColor functie [Runtime] ------------------------------- ****68;58;26(help:link)QBColor Function [Runtime] QBColor functie [Runtime] ****69;39;12(text:p)Returns the Geeft weer de ****69;83;3(help:link)RGB RGB ****69;98;94() color code of the color passed as a color value via an older MS-DOS based programming system. kleurcode van de kleur ingegeven als een kleurwaarde via een ouder MS-DOS-gebaseerd programmeersysteem. ------------------------------- ****71;71;6(text:span)Syntax Syntaxis ****71;89;1(): : ------------------------------- ****72;39;33(text:p)QBColor (ColorNumber As Integer) QBColor (ColorNumber as Integer) ****72;94;7(keyword)QBColor QBColor ------------------------------- ****73;71;12(text:span)Return value Resultaatwaarde ****73;95;1(): : ------------------------------- ****74;39;4(text:p)Long Long ------------------------------- ****75;71;9(text:span)Parameter Parameter ****75;92;1(): : ------------------------------- ****76;39;133(text:p)ColorNumber: Any integer expression that specifies the color value of the color passed from an older MS-DOS based programming system. ColorNumber: Elke Integer-uitdrukking die de kleurwaarde specificeert van de kleur ingegeven vanaf een ouder MS-DOS-gebaseerd programmeersysteem. ------------------------------- ****77;71;11(text:span)ColorNumber ColorNumber ****77;94;38() can be assigned the following values: kan worden toegekend aan de volgende waarden: ------------------------------- ****78;39;9(text:p)0 : Black 0 : Zwart ------------------------------- ****79;39;8(text:p)1 : Blue 1 : Blauw ------------------------------- ****80;39;9(text:p)2 : Green 2 : Groen ------------------------------- ****81;39;8(text:p)3 : Cyan 3 : Cyaan ------------------------------- ****82;39;7(text:p)4 : Red 4 : Rood ------------------------------- ****83;39;11(text:p)5 : Magenta 5 : Magenta ------------------------------- ****84;39;10(text:p)6 : Yellow 6 : Geel ------------------------------- ****85;39;9(text:p)7 : White 7 : Wit ------------------------------- ****86;39;8(text:p)8 : Gray 8 : Grijs ------------------------------- ****87;39;14(text:p)9 : Light Blue 9 : Lichtblauw ------------------------------- ****88;39;16(text:p)10 : Light Green 10 : Licht Groen ------------------------------- ****89;39;15(text:p)11 : Light Cyan 11 : Lichtcyaan ------------------------------- ****90;39;14(text:p)12 : Light Red 12 : Lichtrood ------------------------------- ****91;39;18(text:p)13 : Light Magenta 13 : Lichtmagenta ------------------------------- ****92;39;17(text:p)14 : Light Yellow 14 : Lichtgeel ------------------------------- ****93;39;17(text:p)15 : Bright White 15 : Helder Wit ------------------------------- ****94;39;194(text:p)This function is used only to convert from older MS-DOS based BASIC applications that use the above color codes. The function returns a long integer value indicating the color to be used in the Deze functie wordt alleen gebruikt om te converteren vanuit oudere MS-DOS-gebaseerde BASIC toepassingen die de bovengenoemde kleurcodes gebruiken. De functie geeft een Long Integer-getalwaarde weer die de kleur aangeeft om te worden gebruikt in de ****94;251;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****94;282;5() IDE. IDE. ------------------------------- ****95;32;8(text:p)Example: Voorbeeld: ------------------------------- ****96;38;18(text:p)Sub ExampleQBColor Sub VoorbeeldQBColor ------------------------------- ****97;38;21(text:p)Dim iColor As Integer Dim iColor as Integer ------------------------------- ****98;38;19(text:p)Dim sText As String Dim sText as String ------------------------------- ****99;38;10(text:p)iColor = 7 iColor = 7 ------------------------------- ****100;38;155(text:p)sText = "RGB= " & Red(QBColor( iColor) ) & ":" & Blue(QBColor( iColor) ) & ":" & Green(QBColor( iColor) ) sTekst = "RGB= " & Red(QBColor( iColor) ) & ":" & Blue(QBColor( iColor) ) & ":" & Green(QBColor( iColor) ) ------------------------------- ****101;38;46(text:p)MsgBox stext,0,"Color " & iColor MsgBox stekst,0,"Kleur " & iColor ------------------------------- ****102;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03010305.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)RGB Function [Runtime] RGB functie [Runtime] ------------------------------- ****66;58;22(help:link)RGB Function [Runtime] RGB functie [Runtime] ****67;39;10(text:p)Returns a Geeft weer een ****67;88;24(text:p)long integer color value Long Integer-getal kleurwaarde ****67;125;47() consisting of red, green, and blue components. bestaande uit rode, groene en blauwe componenten. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;23(text:p)RGB (Red, Green, Blue) RGB (Rood, Groen, Blauw) ****70;84;3(keyword)RGB RGB ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;4(text:p)Long Long ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;93(text:p)Red: Any integer expression that represents the red component (0-255) of the composite color. Rood: Elke Integer-uitdrukking die de rode component (0-255) van de samengestelde kleur vertegenwoordigt. ------------------------------- ****75;39;97(text:p)Green: Any integer expression that represents the green component (0-255) of the composite color. Groen: Elke Integer-uitdrukking die de groene component (0-255) van de samengestelde kleur vertegenwoordigt. ------------------------------- ****76;39;95(text:p)Blue: Any integer expression that represents the blue component (0-255) of the composite color. Blauw: Elke Integer-uitdrukking die de blauwe component (0-255) van de samengestelde kleur vertegenwoordigt. ------------------------------- ****77;32;8(text:p)Example: Voorbeeld: ------------------------------- ****78;38;16(text:p)Sub ExampleColor Sub VoorbeeldColor ------------------------------- ****79;38;16(text:p)Dim lVar As Long Dim lVar as Long ------------------------------- ****80;38;21(text:p)lVar = rgb(128,0,200) lVar = rgb(128,0,200) ------------------------------- ****81;38;73(text:p)msgbox "The color " & lVar & " consists of:" msgbox "De kleur " & lVar & " bevat de componenten:" ****81;120;20(text:p)& Chr(13) &_ & Chr(13) &_ ------------------------------- ****82;38;24(text:p)"red= " & "Rood= " & ****82;71;29(text:p)red(lVar) & Chr(13)&_ red(lVar) & Chr(13)&_ ------------------------------- ****83;38;26(text:p)"green= " & "Groen= " & ****83;73;31(text:p)green(lVar) & Chr(13)&_ green(lVar) & Chr(13)&_ ------------------------------- ****84;38;25(text:p)"blue= " & "Blauw= " & ****84;72;48(text:p)blue(lVar) & Chr(13) , 64,"colors" blue(lVar) & Chr(13) , 64,"Kleuren" ------------------------------- ****85;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03020000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;18(subject)File I/O Functions Bestand I/O functies ------------------------------- ****56;58;18(help:link)File I/O Functions Bestand I/O functies ****57;39;85(text:p)Here you will find all functions used to create and manage user-defined (data) files. Hier vindt u alle functies die worden gebruikt om door de gebruiker gedefinieerde (data) bestanden te creëren en te beheren. ------------------------------- ****59;39;462(text:p)Special functions support the creation of "relative" files, which can be used to save certain records and reload them directly by specifying a record number. File I/O functions aid in managing your files by providing you with specific information. These functions return the file size, current path settings or the files of a subdirectory and its respective subdirectories, or can even determine when the file or directory was created or last modified. Speciale functies ondersteunen het creëren van "relatieve" bestanden, welke kunnen worden gebruikt om bepaalde records op te slaan en ze direct te herladen door een recordnummer te specificeren. Bestand I/O functies helpen bij het beheren van uw bestanden door u te voorzien van specifieke informatie. Deze functies geven de bestandsgrootte, actuele padinstellingen of de bestanden van een subdirectory en zijn respectievelijke subdirectories weer of kan zelfs bepalen wanneer het bestand of map was gemaakt of voor het laatst werd gewijzigd. ####Text\SBASIC\COMMON\03020100.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;25(subject)Opening and Closing Files Openen en sluiten bestanden ------------------------------- ****57;58;25(help:link)Opening and Closing Files Openen en sluiten bestanden ****58;39;91(text:p)Here you will find all the necessary functions and statements for opening or closing files. Hier vindt u alle nodige functies en argumenten voor het openen of sluiten van bestanden. ####Text\SBASIC\COMMON\03020101.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;25(subject)Close statement [Runtime] Close argument [Runtime] ------------------------------- ****66;58;25(help:link)Close statement [Runtime] Close argument [Runtime] ****67;39;55(text:p)Closes a specified file opened with the Open statement. Sluit een gespecificeerd bestand dat werd geopend met het Open argument. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;60(text:p)Close FileNumber As Integer[, FileNumber2 As Integer[,...]] Close BestandsNummer As Integer[, BestandsnNummer2 As Integer[,...]] ****70;121;5(keyword)Close Close ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;98(text:p)FileNumber : Any integer expression that specifies the number of the data channel opened with the BestandsNummer : Elke Integer-uitdrukking die specificeert het nummer van het gegevenskanaal geopend met het ****72;169;4(text:span)Open Open ****72;185;11() statement. argument. ------------------------------- ****73;32;8(text:p)Example: Voorbeeld: ------------------------------- ****74;38;24(text:p)Sub ExampleWorkWithAFile Sub VoorbeeldWorkWithAFile ------------------------------- ****75;38;22(text:p)Dim iNumber As Integer Dim iNumber as Integer ------------------------------- ****76;38;19(text:p)Dim sLine As String Dim sLine as String ------------------------------- ****77;38;19(text:p)Dim aFile As String Dim aFile as String ------------------------------- ****78;38;18(text:p)Dim sMsg as String Dim sMsg as String ------------------------------- ****79;38;31(text:p)aFile = "c:\data.txt" aFile = "c:\data.txt" ------------------------------- ****80;38;21(text:p)sMsg = = "" sMsg = "" ------------------------------- ****81;38;18(text:p)iNumber = Freefile iNumber = Freefile ------------------------------- ****82;38;33(text:p)Open aFile For Output As #iNumber Open aFile for output as #iNumber ------------------------------- ****83;38;46(text:p)Print #iNumber, "First line of text" Print #iNumber, "Dit is de eerste tekstregel" ------------------------------- ****84;38;48(text:p)Print #iNumber, "Another line of text" Print #iNumber, "Dit is een andere tekstregel" ------------------------------- ****85;38;14(text:p)Close #iNumber Close #iNumber ------------------------------- ****87;38;18(text:p)iNumber = Freefile iNumber = Freefile ------------------------------- ****88;38;31(text:p)Open aFile For Input As iNumber Open aFile for input as iNumber ------------------------------- ****89;38;22(text:p)While not eof(iNumber) While not eof(iNumber) ------------------------------- ****90;38;26(text:p)Line Input #iNumber, sLine Line input #iNumber, sLine ------------------------------- ****91;38;34(text:p)If sLine <>"" then If sLine <>"" then ------------------------------- ****92;38;38(text:p)sMsg = sMsg & sZeile & chr(13) sMsg = sMsg & sRegel & chr(13) ------------------------------- ****93;38;6(text:p)end if end if ------------------------------- ****94;38;4(text:p)wend wend ------------------------------- ****95;38;14(text:p)Close #iNumber Close #iNumber ------------------------------- ****96;38;11(text:p)Msgbox sMsg Msgbox sMsg ------------------------------- ****97;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03020102.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;26(subject)FreeFile Function[Runtime] FreeFile functie [Runtime] ------------------------------- ****66;58;26(help:link)FreeFile Function[Runtime] FreeFile functie [Runtime] ****67;39;195(text:p)Returns the next available file number for opening a file. This is useful if you want to open a file in addition to other open files and want to ensure that the file number is not already in use. Geeft het volgende beschikbare bestandsnummer voor het openen een bestand weer. Dit is handig als u een bestand wilt openen in aansluiting op andere reeds geopende bestanden en wilt zich er van verzekeren dat het bestandsnummer niet reeds in gebruik is. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;9(text:p)FreeFile FreeFile ****70;70;8(keyword)FreeFile FreeFile ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;7(text:p)Integer Integer ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;140(text:p)This function should be used immediately before an Open statement. FreeFile returns the next available file number, but does not reserve it. Deze functie zou moeten worden gebruikt vlak vóór een Open-argument. FreeFile geeft het volgende beschikbare bestandsnummer weer, maar zal het niet reserveren. ------------------------------- ****75;32;8(text:p)Example: Voorbeeld: ------------------------------- ****76;38;24(text:p)Sub ExampleWorkWithAFile Sub VoorbeeldWorkWithAFile ------------------------------- ****77;38;22(text:p)Dim iNumber As Integer Dim iNumber as Integer ------------------------------- ****78;38;20(text:p)Dim sZeile As String Dim sRegel as String ------------------------------- ****79;38;19(text:p)Dim aFile As String Dim aFile as String ------------------------------- ****80;38;18(text:p)Dim sMsg as String Dim sMsg as String ------------------------------- ****81;38;31(text:p)aFile = "c:\data.txt" aFile = "c:\data.txt" ------------------------------- ****82;38;21(text:p)sMsg = = "" sMsg = "" ------------------------------- ****83;38;18(text:p)iNumber = Freefile iNumber = Freefile ------------------------------- ****84;38;33(text:p)Open aFile For Output As #iNumber Open aFile for output as #iNumber ------------------------------- ****85;38;46(text:p)Print #iNumber, "First line of text" Print #iNumber, "Dit is de eerste tekstregel" ------------------------------- ****86;38;48(text:p)Print #iNumber, "Another line of text" Print #iNumber, "Dit is een andere tekstregel" ------------------------------- ****87;38;14(text:p)Close #iNumber Close #iNumber ------------------------------- ****89;38;18(text:p)iNumber = Freefile iNumber = Freefile ------------------------------- ****90;38;32(text:p)Open aFile For Input As #iNumber Open aFile for input as #iNumber ------------------------------- ****91;38;23(text:p)While not eof(#iNumber) While not eof(#iNumber) ------------------------------- ****92;38;26(text:p)Line Input #iNumber, sLine Line input #iNumber, sLine ------------------------------- ****93;38;34(text:p)If sLine <>"" then If sLine <>"" then ------------------------------- ****94;38;38(text:p)sMsg = sMsg & sZeile & chr(13) sMsg = sMsg & sLine & chr(13) ------------------------------- ****95;38;6(text:p)end if end if ------------------------------- ****96;38;4(text:p)wend wend ------------------------------- ****97;38;14(text:p)Close #iNumber Close #iNumber ------------------------------- ****98;38;11(text:p)Msgbox sMsg Msgbox sMsg ------------------------------- ****99;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03020103.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;23(subject)Open statement[Runtime] Open argument [Runtime] ------------------------------- ****84;58;23(help:link)Open statement[Runtime] Open argument [Runtime] ****85;39;21(text:p)Opens a data channel. Opent een gegevenskanaal. ------------------------------- ****87;71;6(text:span)Syntax Syntaxis ****87;89;1(): : ------------------------------- ****88;39;112(text:p)Open FileName As String [For Modus] [Access IOMode] [protected] As [#]FileName As Integer [Len = Datasetlength] Open BestandsNaam as String [For Modus] [Access IOMode] [protected] As [#]BestandsNaam as Integer [Len = Datasetlength] ****88;173;4(keyword)Open Open ------------------------------- ****89;71;9(text:span)Parameter Parameter ****89;92;1(): : ------------------------------- ****90;39;238(text:p)FileName: Name and path of the file to be opened. If the file does not exist when you open it for reading (Access = Read), an error message appears. If you open a non-existing file for writing (Access = Write), a new file will be created. BestandsNaam: Naam en pad van het bestand dat moet worden geopend. Als het bestand niet bestaat wanneer u het opent om te lezen (Access = Read), zal een foutboodschap verschijnen. Als u een niet-bestaand bestand opent om te schrijven (Access = Write), zal een nieuw bestand worden gemaakt. ------------------------------- ****91;39;267(text:p)Mode: Keyword that specifies the file mode. Valid values: Append (append to sequential file), binary (data can be accessed by bytes using Get and Put), Input (opens data channel for reading), Output (opens data channel for writing), and Random (edits relative files). Modus: Sleutelwoord dat de bestandmodus specificeert. Geldige waarden: Append (voeg toe aan sequentieel bestand), Binary (gegevens kunnen toegankelijk worden gemaakt voor bytes met behulp van Get en Put), Input (opent gegevenskanaal om te kunnen lezen), Output (opent gegevenskanaal om te kunnen schrijven), en Random (bewerkt relatieve bestanden). ------------------------------- ****92;39;116(text:p)Access: Keyword that defines the access type. Valid values: Read (read-only), Write (write-only), Read Write (both). Access: Sleutelwoord dat het toegangstype definieert. Geldige waarden: Read (alleen lezen), Write (alleen schrijven), Read Write (beide). ------------------------------- ****93;39;274(text:p)Protected: Keyword that defines the security status of a file after opening. Valid values: Shared (file may be opened by other applications), Lock Read (file is protected against reading), Lock Write (file is protected against writing), Lock Read Write (denies file access). Protected: Sleutelwoord dat de beveiligingsstatus van een bestand na het openen definieert. Geldige waarden: Shared (bestand kan worden geopend door andere applicaties), Lock Read (bestand is beschermd tegen lezen), Lock Write (bestand is beschermd tegen schrijven), Lock Read Write (weigert bestandstoegang). ------------------------------- ****94;39;269(text:p)FileNumber: Any integer expression ranging from 0-511 indicating the number of a free data channel, which can later be used to access the file with various commands. The file number should be determined immediately before the Open statement using the FreeFile function. FileNumber: Elke Integer-uitdrukking tussen 0 en 511 aangevende het nummer van een vrij gegevenskanaal, dat later kan worden gebruikt om toegang te krijgen tot het bestand met verschillende commando's. Het bestandsnummer zou moeten worden bepaald vlak vóór het Open-argument met behulp van de FreeFile-functie. ------------------------------- ****95;39;15(text:p)DatasetLength: DatasetLength: ****95;63;134(text:p)For relative files, returns the length of a certain record. This parameter is only necessary if the file was opened for Random access. Voor relatieve bestanden, geeft de lengte van een bepaald record weer. Deze parameter is slechts nodig als het bestand was geopend voor Random-toegang. ------------------------------- ****105;45;162(text:p)A file must be opened with the Open statement before the file contents can be modified. If you try to open a file that is already opened, an error message occurs. Een bestand moet worden geopend met het Open-argument vóór de bestandsinhoud kan worden gewijzigd. Als u probeert een bestand te openen dat reeds was geopend, verschijnt een foutboodschap. ------------------------------- ****111;32;8(text:p)Example: Voorbeeld: ------------------------------- ****112;38;24(text:p)Sub ExampleWorkWithAFile Sub VoorbeeldWorkWithAFile ------------------------------- ****113;38;22(text:p)Dim iNumber As Integer Dim iNumber as Integer ------------------------------- ****114;38;19(text:p)Dim sLine As String Dim sLine as String ------------------------------- ****115;38;19(text:p)Dim aFile As String Dim aFile as String ------------------------------- ****116;38;18(text:p)Dim sMsg as String Dim sMsg as String ------------------------------- ****117;38;31(text:p)aFile = "c:\data.txt" aFile = "c:\data.txt" ------------------------------- ****119;38;18(text:p)iNumber = Freefile iNumber = Freefile ------------------------------- ****120;38;33(text:p)Open aFile For Output As #iNumber Open aFile for output as #iNumber ------------------------------- ****121;38;50(text:p)Print #iNumber, "This is a line of text" Print #iNumber, "Dit is de eerste tekstregel" ------------------------------- ****122;38;56(text:p)Print #iNumber, "This is another line of text" Print #iNumber, "Dit is een andere tekstregel" ------------------------------- ****123;38;14(text:p)Close #iNumber Close #iNumber ------------------------------- ****125;38;18(text:p)iNumber = Freefile iNumber = Freefile ------------------------------- ****126;38;31(text:p)Open aFile For Input As iNumber Open aFile for input as iNumber ------------------------------- ****127;38;22(text:p)While not eof(iNumber) While not eof(iNumber) ------------------------------- ****128;38;26(text:p)Line Input #iNumber, sLine Line input #iNumber, sLine ------------------------------- ****129;38;34(text:p)If sLine <>"" then If sLine <>"" then ------------------------------- ****130;38;38(text:p)sMsg = sMsg & sZeile & chr(13) sMsg = sMsg & sLine & chr(13) ------------------------------- ****131;38;6(text:p)end if end if ------------------------------- ****132;38;4(text:p)wend wend ------------------------------- ****133;38;14(text:p)Close #iNumber Close #iNumber ------------------------------- ****134;38;11(text:p)Msgbox sMsg Msgbox sMsg ------------------------------- ****135;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03020104.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;25(subject)Reset statement [Runtime] Reset argument [Runtime] ------------------------------- ****66;58;25(help:link)Reset statement [Runtime] Reset argument [Runtime] ****67;39;74(text:p)Closes all open files and writes the contents of all file buffers to disk. Sluit alle geopende bestanden en schrijft de inhoud van alle bestandbuffers naar schijf. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;6(text:p)Reset Reset ****70;67;5(keyword)Reset Reset ------------------------------- ****71;32;8(text:p)Example: Voorbeeld: ------------------------------- ****72;38;16(text:p)Sub ExampleReset Sub VoorbeeldReset ------------------------------- ****73;38;26(text:p)On Error Goto ErrorHandler On Error Goto FoutBehandelaar ------------------------------- ****74;38;22(text:p)Dim iNumber As Integer Dim iNumber as Integer ------------------------------- ****75;38;21(text:p)Dim iCount As Integer Dim iCount as Integer ------------------------------- ****76;38;20(text:p)Dim sZeile As String Dim sLine as String ------------------------------- ****77;38;19(text:p)Dim aFile As String Dim aFile as String ------------------------------- ****78;38;31(text:p)aFile = "c:\data.txt" aFile = "c:\data.txt" ------------------------------- ****80;38;18(text:p)iNumber = Freefile iNumber = Freefile ------------------------------- ****81;38;33(text:p)Open aFile For Output As #iNumber Open aFile for output as #iNumber ------------------------------- ****82;38;54(text:p)Print #iNumber, "This is a new line of text" Print #iNumber, "Dit is een nieuwe tekstregel" ------------------------------- ****83;38;14(text:p)Close #iNumber Close #iNumber ------------------------------- ****85;38;18(text:p)iNumber = Freefile iNumber = Freefile ------------------------------- ****86;38;31(text:p)Open aFile For Input As iNumber Open aFile for input as iNumber ------------------------------- ****87;38;19(text:p)For iCount = 1 to 5 For iCount = 1 to 5 ------------------------------- ****88;38;26(text:p)Line Input #iNumber, sLine Line Input #iNumber, sLine ------------------------------- ****89;38;34(text:p)If sLine <>"" then If sLine <>"" then ------------------------------- ****90;38;3(text:p)rem rem ------------------------------- ****91;38;6(text:p)end if end if ------------------------------- ****92;38;11(text:p)Next iCount Next iCount ------------------------------- ****93;38;14(text:p)Close #iNumber Close #iNumber ------------------------------- ****94;38;8(text:p)Exit Sub Exit sub ------------------------------- ****95;38;13(text:p)ErrorHandler: FoutBehandelaar: ------------------------------- ****96;38;5(text:p)Reset Reset ------------------------------- ****97;38;63(text:p)MsgBox "All files will be closed",0,"Error" MsgBox "Alle bestanden zullen worden gesloten",0,"FOUT" ------------------------------- ****98;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03020200.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;12(subject)Input/Output Invoer/Uitvoer ------------------------------- ****57;58;12(help:link)Input/Output Invoer/Uitvoer ****58;39;56(text:p)The following describes all file input/output functions. Het volgende beschrijft alle bestands invoer/uitvoer functies. ####Text\SBASIC\COMMON\03020201.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ATTENTIE; De macro in dit xml document heeft een fout in zich en derhalve werkt de macro VoorbeeldRandomAcces N I E T ! Fout komt voor in tekstblok 92;38;19(text:p)Get #iNumber,,sText ------------------------------- ****6;15;23(subject)Get statement [Runtime] Get argument [Runtime] ------------------------------- ****66;58;23(help:link)Get statement [Runtime] Get argument [Runtime] ****67;39;96(text:p)Reads a record from a relative file, or a sequence of bytes from a binary file, into a variable. Leest een record uit een relatief bestand, of een reeks van bytes uit een binair bestand, in in een variabele. ------------------------------- ****69;39;10(text:p)See also: Zie ook: ****69;81;3(help:link)PUT PUT ****69;96;10() statement argument ------------------------------- ****70;71;6(text:span)Syntax Syntaxis ****70;89;1(): : ------------------------------- ****71;39;52(text:p)Get [#] FileNumber As Integer, [Position], Variable Get [#] FileNumber as Integer, [Position], Variabele ****71;113;3(keyword)Get Get ------------------------------- ****72;71;9(text:span)Parameter Parameter ****72;92;1(): : ------------------------------- ****73;39;67(text:p)FileNumber: Any integer expression that determines the file number. FileNumber: Elke Integer-uitdrukking die het bestandsnummer bepaalt. ------------------------------- ****74;39;43(text:p)Position: For files opened in Random mode, Position: Voor bestanden geopend in Random- modus, ****74;114;8(text:span)Position Position ****74;134;40() is the number of the record to be read. is het nummer van het record dat moet worden gelezen. ------------------------------- ****75;39;33(text:p)For files opened in Binary mode, Voor bestanden geopend in Binary-modus, ****75;104;8(text:span)Position Position ****75;124;59() is the byte position within the file where reading starts. is de byte-positie binnen het bestand waar het lezen begint. ------------------------------- ****76;39;3(text:p)If Als ****76;74;8(text:span)Position Position ****76;94;81() is omitted, the current position or the current data record of the file is used. is weggelaten, wordt de huidige positie of het actuele gegevensrecord van het bestand gebruikt. ------------------------------- ****77;39;113(text:p)Variable: Name of the variable to be read. With the exception of object variables, any variable type can be used. Variabele: Naam van de variabele die moet worden gelezen. Met uitzondering van objectvariabelen, kan een willekeurig variabelentype worden gebruikt. ------------------------------- ****78;32;8(text:p)Example: Voorbeeld: ------------------------------- ****79;38;23(text:p)Sub ExampleRandomAccess Sub VoorbeeldRandomAccess ------------------------------- ****80;38;22(text:p)Dim iNumber As Integer Dim iNumber as Integer ------------------------------- ****81;38;42(text:p)Dim sText As Variant REM Must be a variant Dim sText as Variant REM Moet een variant zijn ! ------------------------------- ****82;38;19(text:p)Dim aFile As String Dim aFile as String ------------------------------- ****83;38;31(text:p)aFile = "c:\data.txt" aFile = "c:\data.txt" ------------------------------- ****85;38;18(text:p)iNumber = Freefile iNumber = Freefile ------------------------------- ****86;38;40(text:p)Open aFile For Random As #iNumber Len=32 Open aFile for Random as #iNumber Len=32 ------------------------------- ****87;38;16(text:p)Seek #iNumber,1 Seek #iNumber,1 ****87;74;25(text:p)REM Position at beginning REM Positie bij aanvang ------------------------------- ****88;38;58(text:p)Put #iNumber,, "This is the first line of text" Put #iNumber,, "Dit is de eerste regel van de tekst" ****88;105;23(text:p)REM Fill line with text REM Vult regel met tekst ------------------------------- ****89;38;58(text:p)Put #iNumber,, "This is the second line of text" Put #iNumber,, "Dit is de tweede regel van de tekst" ------------------------------- ****90;38;57(text:p)Put #iNumber,, "This is the third line of text" Put #iNumber,, "Dit is de derde regel van de tekst" ------------------------------- ****91;38;15(text:p)Seek #iNumber,2 Seek #iNumber,2 ------------------------------- ****92;38;19(text:p)Get #iNumber,,sText Get #iNumber,,sText ------------------------------- ****93;38;11(text:p)Print sText Print sText ------------------------------- ****94;38;14(text:p)Close #iNumber Close #iNumber ------------------------------- ****96;38;18(text:p)iNumber = Freefile iNumber = Freefile ------------------------------- ****97;38;40(text:p)Open aFile For Random As #iNumber Len=32 Open aFile for Random as #iNumber Len=32 ------------------------------- ****98;38;20(text:p)Get #iNumber,2,sText Get #iNumber,2,sText ------------------------------- ****99;38;44(text:p)Put #iNumber,,"This is a new text" Put #iNumber,,"Dit is een nieuwe tekst" ------------------------------- ****100;38;20(text:p)Get #iNumber,1,sText Get #iNumber,1,sText ------------------------------- ****101;38;20(text:p)Get #iNumber,2,sText Get #iNumber,2,sText ------------------------------- ****102;38;57(text:p)Put #iNumber,20,"This is the text in record 20" Put #iNumber,20,"Dit is de tekst in record 20" ------------------------------- ****103;38;19(text:p)Print Lof(#iNumber) Print Lof(#iNumber) ------------------------------- ****104;38;14(text:p)Close #iNumber Close #iNumber ------------------------------- ****106;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03020202.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;26(subject)Input# statement [Runtime] Input# argument [Runtime] ------------------------------- ****66;58;26(help:link)Input# statement [Runtime] Input# argument [Runtime] ****67;39;40(text:p)Reads data from an open sequential file. Leest gegevens uit een geopend sequentieel bestand. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;57(text:p)Input #FileNumber As Integer; var1[, var2[, var3[,...]]] Input #BestandsNummer as Integer; var1[, var2[, var3[,...]]] ****70;118;5(keyword)Input Input ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;139(text:p)FileNumber: Number of the file from which data is to be read. The file must have been opened by the Open statement with the key word INPUT. BestandsNummer: Nummer van het bestand waarvan gegevens moeten worden gelezen. Het bestand moet geopend zijn door het Open-argument met het sleutelwoord INPUT. ------------------------------- ****73;39;108(text:p)var: A variable to which the values read from the file are assigned. Numeric and string variables are valid. var: Een variabele waar de waarden, gelezen uit het bestand, aan moeten worden toegekend. Numerieke en tekenreeks-variabelen zijn geldig. ------------------------------- ****74;39;4(text:p)The Het ****74;75;6(text:span)Input# Input# ****74;93;317() statement is used to read numeric values or strings from an open file and assign the data to one or more variables. A numeric variable is read up to the first carriage return (Asc=13), line feed (Asc=10), space, or comma. String variables are read to the first carriage return (Asc=13), line feed (Asc=10), or comma. argument wordt gebruikt om numerieke waarden of tekenreeksen uit een geopend bestand te lezen en kent de gegevens aan één of meer variabelen toe. Een numerieke variabele wordt gelezen tot het eerste harde regeleinde (Asc=13), regeleinde (Asc=10), spatie of komma. Tekenreeks variabelen worden gelezen tot het eerste harde regeleinde (Asc=13), regeleinde (Asc=10) of komma. ------------------------------- ****75;39;188(text:p)Data and data types in a file must appear in the same order as the variables passed in var. If you assign non-numeric values to a numeric variable, the variable is assigned the value zero. Gegevens en gegevenstypen in een bestand moeten in dezelfde volgorde verschijnen als de variabelen toegekend in var. Als u niet-numerieke waarden toekent aan een numerieke variabele, wordt de variabele de waarde nul toegekend. ------------------------------- ****76;39;220(text:p)Since records in the file may be separated by commas, commas cannot be read to a string variable. Quotation marks (") in the file are disregarded as well. If you want to read these characters from the file, use the Omdat records in het bestand kunnen zijn gescheiden door komma's, kunnen komma's niet worden gelezen naar een Tekenreeks-variabele. Aanhalings-tekens (") in het bestand worden eveneens genegeerd. Als u deze tekens uit het bestand wilt lezen, gebruik het ****76;291;11(text:span)Line Input# Line Input# ****76;314;93() statement to read pure text files (files containing only printable characters) line by line. argument om pure tekstbestanden (bestanden die alleen afdrukbare tekens bevatten) regel na regel te lezen. ------------------------------- ****77;39;107(text:p)If the end of the file is reached while reading a data element, an error occurs and the process is aborted. Als het einde van het bestand wordt bereikt terwijl een gegevenselement wordt gelezen, verschijnt een foutboodschap en het proces wordt afgebroken. ------------------------------- ****78;32;8(text:p)Example: Voorbeeld: ------------------------------- ****79;38;24(text:p)Sub ExampleWorkWithAFile Sub VoorbeeldWorkWithAFile ------------------------------- ****80;38;22(text:p)Dim iNumber As Integer Dim iNumber as Integer ------------------------------- ****81;38;20(text:p)Dim sZeile As String Dim sLine as String ------------------------------- ****82;38;19(text:p)Dim aFile As String Dim aFile as String ------------------------------- ****83;38;18(text:p)Dim sMsg as String Dim sMsg as String ------------------------------- ****84;38;31(text:p)aFile = "c:\data.txt" aFile = "c:\data.txt" ------------------------------- ****86;38;18(text:p)iNumber = Freefile iNumber = Freefile ------------------------------- ****87;38;33(text:p)Open aFile For Output As #iNumber Open aFile for output as #iNumber ------------------------------- ****88;38;50(text:p)Print #iNumber, "This is a line of text" Print #iNumber, "Dit is een tekstregel" ------------------------------- ****89;38;56(text:p)Print #iNumber, "This is another line of text" Print #iNumber, "Dit is een andere tekstregel" ------------------------------- ****90;38;14(text:p)Close #iNumber Close #iNumber ------------------------------- ****92;38;18(text:p)iNumber = Freefile iNumber = Freefile ------------------------------- ****93;38;31(text:p)Open aFile For Input As iNumber Open aFile for input as iNumber ------------------------------- ****94;38;22(text:p)While not eof(iNumber) While not eof(iNumber) ------------------------------- ****95;38;26(text:p)Line Input #iNumber, sLine Line Input #iNumber, sLine ------------------------------- ****96;38;34(text:p)If sLine <>"" then If sLine <>"" then ------------------------------- ****97;38;38(text:p)sMsg = sMsg & sZeile & chr(13) sMsg = sMsg & sLine & chr(13) ------------------------------- ****98;38;6(text:p)end if end if ------------------------------- ****99;38;4(text:p)wend wend ------------------------------- ****100;38;14(text:p)Close #iNumber Close #iNumber ------------------------------- ****101;38;11(text:p)Msgbox sMsg Msgbox sMsg ------------------------------- ****102;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03020203.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;32(subject)Line Input # statement [Runtime] Line Input # argument [Runtime] ------------------------------- ****66;58;32(help:link)Line Input # statement [Runtime] Line Input # argument [Runtime] ****67;39;51(text:p)Reads strings from a sequential file to a variable. Leest tekenreeksen uit een sequentieel bestand naar een variabele. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;49(text:p)Line Input #FileNumber As Integer, Var As String Line Input #BestandsNummer as Integer, Var as String ****70;110;4(keyword)Line Line ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;150(text:p)FileNumber: Number of the file from which data is ot be read. The file must have been opened in advance with the Open statement and the key word READ. BestandsNummer: Nummer van het bestand waarvan de gegevens moeten worden gelezen. Het bestand moet vooraf geopend zijn geweest met het Open-argument en het sleutelwoord READ. ------------------------------- ****73;39;55(text:p)var: The name of the variable used to store the result. var: De naam van de variabele gebruikt om het resultaat op te slaan. ------------------------------- ****74;39;9(text:p)With the Met het ****74;80;11(text:span)Line Input# Line Input# ****74;103;170() statement, you can read strings from an open file into a variable. String variables are read line-by-line up to the first carriage return (Asc=13) or linefeed (Asc=10). argument, kunt u tekenreeksen uit een geopend bestand in een variabele inlezen. Tekenreeks-variabelen worden regel-na-regel gelezen tot het eerste harde regeleinde (Asc=13) of regeleinde (Asc=10). ****74;282;56()Line end marks are not included in the resulting string. Regeleinde-tekens worden niet opgenomen in de resulterende tekenreeks. ------------------------------- ****75;32;8(text:p)Example: Voorbeeld: ------------------------------- ****76;38;24(text:p)Sub ExampleWorkWithAFile Sub VoorbeeldWorkWithAFile ------------------------------- ****77;38;22(text:p)Dim iNumber As Integer Dim iNumber as Integer ------------------------------- ****78;38;19(text:p)Dim sLine As String Dim sLine as String ------------------------------- ****79;38;19(text:p)Dim aFile As String Dim aFile as String ------------------------------- ****80;38;18(text:p)Dim sMsg as String Dim sMsg as String ------------------------------- ****81;38;31(text:p)aFile = "c:\data.txt" aFile = "c:\data.txt" ------------------------------- ****83;38;18(text:p)iNumber = Freefile iNumber = Freefile ------------------------------- ****84;38;33(text:p)Open aFile For Output As #iNumber Open aFile for output as #iNumber ------------------------------- ****85;38;50(text:p)Print #iNumber, "This is a line of text" Print #iNumber, "Dit is een tekstregel" ------------------------------- ****86;38;56(text:p)Print #iNumber, "This is another line of text" Print #iNumber, "Dit is een andere tekstregel" ------------------------------- ****87;38;14(text:p)Close #iNumber Close #iNumber ------------------------------- ****89;38;18(text:p)iNumber = Freefile iNumber = Freefile ------------------------------- ****90;38;31(text:p)Open aFile For Input As iNumber Open aFile for input as iNumber ------------------------------- ****91;38;22(text:p)While not eof(iNumber) While not eof(iNumber) ------------------------------- ****92;38;26(text:p)Line Input #iNumber, sLine Line Input #iNumber, sLine ------------------------------- ****93;38;34(text:p)If sLine <>"" then If sLine <>"" then ------------------------------- ****94;38;38(text:p)sMsg = sMsg & sZeile & chr(13) sMsg = sMsg & sLine & chr(13) ------------------------------- ****95;38;6(text:p)end if end if ------------------------------- ****96;38;4(text:p)wend wend ------------------------------- ****97;38;14(text:p)Close #iNumber Close #iNumber ------------------------------- ****98;38;11(text:p)Msgbox sMsg Msgbox sMsg ------------------------------- ****99;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03020204.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ATTENTIE; De macro in dit xml document heeft een fout in zich en derhalve werkt de macro VoorbeeldRandomAcces N I E T ! Fout komt voor in tekstblok 93;38;19(text:p)Get #iNumber,,sText ------------------------------- ****6;15;23(subject)Put statement [Runtime] Put argument [Runtime] ------------------------------- ****66;58;23(help:link)Put statement [Runtime] Put argument [Runtime] ****67;39;75(text:p)Writes a record to a relative file or a sequence of bytes to a binary file. Schrijft een record naar een relatief bestand of een reeks van bytes naar een binair bestand. ------------------------------- ****69;39;10(text:p)See also: Zie ook: ****69;81;3(help:link)Get Get ****69;96;10() statement argument ------------------------------- ****70;71;6(text:span)Syntax Syntaxis ****70;89;1(): : ------------------------------- ****71;39;52(text:p)Put [#] FileNumber As Integer, [position], Variable Put [#] BestandsNummer as Integer, [positie], Variable ****71;113;3(keyword)Put Put ------------------------------- ****72;71;9(text:span)Parameter Parameter ****72;92;1(): : ------------------------------- ****73;39;71(text:p)FileNumber: Any integer expression that defines the file to write into. BestandsNummer: Elke Integer-uitdrukking die het bestand definieert waarnaar moet worden geschreven. ------------------------------- ****74;39;90(text:p)Position: For relative files (random access files) the number of the record to be written. Positie: Voor relatieve bestanden (Random-toegang bestanden) het nummer van het record dat moet worden geschreven. ------------------------------- ****75;39;89(text:p)For binary files (binary access) the byte position in the file at which to begin writing. Voor binaire bestanden (Binary-toegang) de byte-positie in het bestand waarop moet worden begonnen met schrijven. ------------------------------- ****76;39;52(text:p)Variable: Name of the variable to write to the file. Variabele: Naam van de variabele die naar het bestand moet worden geschreven. ------------------------------- ****77;39;111(text:p)Note for relative files: If the contents of this variable do not match the length of a record specified in the Attentie voor relatieve bestanden: Als de inhoud van deze variabele niet overeenstemt met de lengte van een record, gespecificeerd in de ****77;182;3(text:span)Len Len ****77;207;14()clause of the bijzin van het ****77;253;4(text:span)Open Open ****77;269;123() statement, the space from the end of the new written data to the next record is padded with the existing data in the file. argument, wordt de ruimte vanaf het einde van de nieuw geschreven gegevens tot het volgende record gevuld met de bestaande gegevens in het bestand. ------------------------------- ****78;39;183(text:p)Note for binary files: The contents of the variables is written to the specified position, and the file pointer is set directly after the last byte, without any space between records. Attentie voor binaire bestanden: De inhoud van de variabelen wordt geschreven naar de gespecificeerde positie en de bestandaanwijzer wordt direct na de laatste byte ingesteld, zonder enige ruimte tussen de records. ------------------------------- ****79;32;8(text:p)Example: Voorbeeld: ------------------------------- ****80;38;23(text:p)Sub ExampleRandomAccess Sub VoorbeeldRandomAccess ------------------------------- ****81;38;22(text:p)Dim iNumber As Integer Dim iNumber as Integer ------------------------------- ****82;38;47(text:p)Dim sText As Variant REM Must be a variant type Dim sText as Variant REM Must be a variant type ! ------------------------------- ****83;38;19(text:p)Dim aFile As String Dim aFile as String ------------------------------- ****84;38;31(text:p)aFile = "c:\data.txt" aFile = "c:\data.txt" ------------------------------- ****86;38;18(text:p)iNumber = Freefile iNumber = Freefile ------------------------------- ****87;38;40(text:p)Open aFile For Random As #iNumber Len=32 Open aFile for random as #iNumber Len=32 ------------------------------- ****88;38;16(text:p)Seek #iNumber,1 Seek #iNumber,1 ****88;74;29(text:p)REM Position to start writing REM Positie om schrijven te beginnen ------------------------------- ****89;38;58(text:p)Put #iNumber,, "This is the first line of text" Put #iNumber,, "Dit is de eerste tekstregel" ****89;105;23(text:p)REM Fill line with text REM Vult regel met tekst ------------------------------- ****90;38;58(text:p)Put #iNumber,, "This is the second line of text" Put #iNumber,, "Dit is de tweede tekstregel" ------------------------------- ****91;38;57(text:p)Put #iNumber,, "This is the third line of text" Put #iNumber,, "Dit is de derde tekstregel" ------------------------------- ****92;38;15(text:p)Seek #iNumber,2 Seek #iNumber,2 ------------------------------- ****93;38;19(text:p)Get #iNumber,,sText Get #iNumber,,sText ------------------------------- ****94;38;11(text:p)Print sText Print sText ------------------------------- ****95;38;14(text:p)Close #iNumber Close #iNumber ------------------------------- ****97;38;18(text:p)iNumber = Freefile iNumber = Freefile ------------------------------- ****98;38;40(text:p)Open aFile For Random As #iNumber Len=32 Open aFile for random as #iNumber Len=32 ------------------------------- ****99;38;20(text:p)Get #iNumber,2,sText Get #iNumber,2,sText ------------------------------- ****100;38;42(text:p)Put #iNumber,,"This is new text" Put #iNumber,,"Dit is nieuwe tekst" ------------------------------- ****101;38;20(text:p)Get #iNumber,1,sText Get #iNumber,1,sText ------------------------------- ****102;38;20(text:p)Get #iNumber,2,sText Get #iNumber,2,sText ------------------------------- ****103;38;57(text:p)Put #iNumber,20,"This is the text in record 20" Put #iNumber,20,"Dit is de tekst in record 20" ------------------------------- ****104;38;19(text:p)Print Lof(#iNumber) Print Lof(#iNumber) ------------------------------- ****105;38;14(text:p)Close #iNumber Close #iNumber ------------------------------- ****107;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03020205.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;25(subject)Write statement [Runtime] Write argument [Runtime] ------------------------------- ****66;58;25(help:link)Write statement [Runtime] Write argument [Runtime] ****67;39;33(text:p)Writes data in a sequential file. Schrijft gegevens in een sequentieel bestand. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;36(text:p)Write [#]FileName, [Expressionlist] Write [#]BestandsNaam, [Expressielijst] ****70;97;5(keyword)Write Write ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;113(text:p)FileName: Any numeric expression that contains the file number set by the Open statement for the respective file. BestandsNaam: Een willekeurige numerieke uitdrukking die het bestandsnummer bevat, ingesteld door het Open-argument voor het respectievelijke bestand. ------------------------------- ****73;39;86(text:p)Expressionlist: Variables or expressions to be entered in a file, separated by commas. Expressielijst: Variabelen of uitdrukkingen die moeten worden ingevoerd in een bestand, gescheiden door komma's. ------------------------------- ****74;39;39(text:p)If the expression list is omitted, the Als de expressielijst is weggelaten, het ****74;110;6(text:span)Write# Write# ****74;128;45() statement appends an empty line to the file. argument voegt een lege regel aan het bestand toe. ------------------------------- ****75;39;84(text:p)To add an expression list to a new or existing file, the file must be opened in the Om een expressielijst aan een nieuw of bestaand bestand toe te voegen, moet het bestand zijn geopend in de ****75;164;6(text:span)Output Output ****75;182;4() or of ****75;218;6(text:span)Append Append ****75;236;6() mode. modus. ------------------------------- ****76;39;4(text:p)The Het ****76;75;6(text:span)Write# Write# ****76;93;103() statement enters data enclosed by quotation marks and separated by commas into a file. Opposed to the argument voert gegevens, gevat in aanhalingstekens en gescheiden door komma's, in een bestand in. In tegenstelling tot het ****76;228;6(text:span)Print# Print# ****76;246;98() statement, it is not necessary to use delimiters in the list. The end of a file created with the argument, is het niet nodig om scheidingstekens in de lijst te gebruiken. Het einde van een bestand gemaakt met het ****76;376;6(text:span)Write# Write# ****76;394;45() statement is indicated by a line end symbol. argument wordt aangegeven door een regeleinde-symbool. ------------------------------- ****77;32;8(text:p)Example: Voorbeeld: ------------------------------- ****78;38;16(text:p)Sub ExampleWrite Sub VoorbeeldWrite ------------------------------- ****79;38;21(text:p)Dim iCount As Integer Dim iCount as Integer ------------------------------- ****80;38;20(text:p)Dim sValue As String Dim sValue as String ------------------------------- ****81;38;17(text:p)iCount = Freefile iCount = Freefile ------------------------------- ****82;38;49(text:p)open "C:\data.txt" for OutPut as iCount open "C:\data.txt" for output as iCount ------------------------------- ****83;38;28(text:p)sValue = "Hamburg" sValue = "Harlingen" ------------------------------- ****84;38;24(text:p)Write #iCount,sValue,200 Write #iCount,sValue,200 ------------------------------- ****85;38;29(text:p)sValue = "New York" sValue = "Enschede" ------------------------------- ****86;38;24(text:p)Write #iCount,sValue,300 Write #iCount,sValue,300 ------------------------------- ****87;38;26(text:p)sValue = "Miami" sValue = "Amsterdam" ------------------------------- ****88;38;24(text:p)Write #iCount,sValue,450 Write #iCount,sValue,450 ------------------------------- ****89;38;13(text:p)close #iCount Close #iCount ------------------------------- ****90;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03020300.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;16(subject)File Positioning Bestand plaatsen ------------------------------- ****57;58;16(help:link)File Positioning Bestand plaatsen ****58;39;77(text:p)The following functions and statements are used to position the file pointer. De volgende functies en argumenten worden gebruikt om de bestandaanwijzer te positioneren. ####Text\SBASIC\COMMON\03020301.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)Eof Function [Runtime] Eof functie [Runtime] ------------------------------- ****66;58;22(help:link)Eof Function [Runtime] Eof functie [Runtime] ****67;39;66(text:p)Determines whether the file pointer has reached the end of a file. Bepaalt of de bestandaanwijzer het einde van een bestand heeft bereikt. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;31(text:p)Eof (intexpression As Integer) Eof (intexpression as Integer ) ****70;92;3(keyword)Eof Eof ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;4(text:p)Bool Bool ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;83(text:p)Intexpression: Any integer expression that evaluates to the number of an open file. Intexpression: Elke Integer-uitdrukking die verwijst naar het nummer van een open bestand. ------------------------------- ****75;39;257(text:p)Use EOF to avoid errors when attempting to get input past the end of a file. When using the Input or Get statement to read from a file, the file pointer is advanced by the number of bytes read. If the end of the file has been reached, EOF returns True (-1). Gebruik EOF om fouten te vermijden wanneer geprobeerd wordt invoer voorbij het einde van een bestand in te voeren. Als het Input of Get argument wordt gebruikt om te lezen uit een bestand, gaat de bestandaanwijzer vooruit door het aantal gelezen bytes. Als het einde van het bestand wordt bereikt, geeft EOF de waarde True (-1). ------------------------------- ****76;32;8(text:p)Example: Voorbeeld: ------------------------------- ****77;38;24(text:p)Sub ExampleWorkWithAFile Sub VoorbeeldWorkWithAFile ------------------------------- ****78;38;22(text:p)Dim iNumber As Integer Dim iNumber as Integer ------------------------------- ****79;38;20(text:p)Dim sZeile As String Dim sLine as String ------------------------------- ****80;38;19(text:p)Dim aFile As String Dim aFile as String ------------------------------- ****81;38;18(text:p)Dim sMsg as String Dim sMsg as String ------------------------------- ****82;38;31(text:p)aFile = "c:\data.txt" aFile = "c:\data.txt" ------------------------------- ****84;38;18(text:p)iNumber = Freefile iNumber = Freefile ------------------------------- ****85;38;33(text:p)Open aFile For Output As #iNumber Open aFile for output as #iNumber ------------------------------- ****86;38;46(text:p)Print #iNumber, "First line of text" Print #iNumber, "Dit is de eerste tekstregel" ------------------------------- ****87;38;48(text:p)Print #iNumber, "Another line of text" Print #iNumber, "Dit is een andere tekstregel" ------------------------------- ****88;38;14(text:p)Close #iNumber Close #iNumber ------------------------------- ****90;38;18(text:p)iNumber = Freefile iNumber = Freefile ------------------------------- ****91;38;31(text:p)Open aFile For Input As iNumber Open aFile for input as iNumber ------------------------------- ****92;38;22(text:p)While not eof(iNumber) While not eof(iNumber) ------------------------------- ****93;38;26(text:p)Line Input #iNumber, sLine Line input #iNumber, sLine ------------------------------- ****94;38;34(text:p)If sLine <>"" then If sLine <>"" then ------------------------------- ****95;38;38(text:p)sMsg = sMsg & sZeile & chr(13) sMsg = sMsg & sLine & chr(13) ------------------------------- ****96;38;6(text:p)end if end if ------------------------------- ****97;38;4(text:p)wend wend ------------------------------- ****98;38;14(text:p)Close #iNumber Close #iNumber ------------------------------- ****99;38;11(text:p)Msgbox sMsg Msgbox sMsg ------------------------------- ****100;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03020302.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)Loc Function [Runtime] Loc functie [Runtime] ------------------------------- ****61;73;22(help:link)Loc Function [Runtime] Loc functie [Runtime] ------------------------------- ****62;39;45(text:p)Returns the current position in an open file. Geeft de huidige positie in een open bestand weer. ------------------------------- ****63;71;6(text:span)Syntax Syntaxis ****63;89;1(): : ------------------------------- ****64;39;17(text:p)Loc (FileNumber) Loc (BestandsNummer) ****64;78;3(keyword)Loc Loc ------------------------------- ****65;71;12(text:span)Return value Resultaatwaarde ****65;95;1(): : ------------------------------- ****66;39;4(text:p)Long Long ------------------------------- ****67;71;9(text:span)Parameter Parameter ****67;92;1(): : ------------------------------- ****68;39;115(text:p)FileNumber: Any numeric expression that contains the file number set by the Open statement for the respective file. BestandsNummer: Een willekeurige numerieke uitdrukking die het bestandsnummer, ingesteld door het Open-argument voor het betreffende bestand, bevat. ------------------------------- ****69;39;117(text:p)If the Loc function is used for an open random access file, it returns the number of the last read or written record. Als de Loc-functie wordt gebruikt voor een open Random- toegang bestand, geeft het het nummer van het laatst gelezen of geschreven record weer. ------------------------------- ****70;39;163(text:p)For a sequential file, the Loc function returns the position in a file divided by 128. For binary files, the position of the last read or written byte is returned. Voor een sequentieel bestand, geeft de Loc-functie de positie in een bestand weer, gedeeld door 128. Voor binaire bestanden wordt de positie van de laatst gelezen of geschreven byte weergegeven. ####Text\SBASIC\COMMON\03020303.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ATTENTIE; De macro in dit xml document heeft een fout in zich en derhalve werkt de macro VoorbeeldRandomAcces N I E T ! Fout komt voor in tekstblok 122;38;19 (text:p)Get #iNumber,,sText ------------------------------- ****6;15;22(subject)Lof Function [Runtime] Lof functie [Runtime] ------------------------------- ****84;58;22(help:link)Lof Function [Runtime] Lof functie [Runtime] ****85;39;42(text:p)Returns the size of an open file in bytes. Geeft de grootte van een open bestand in bytes weer. ------------------------------- ****87;71;6(text:span)Syntax Syntaxis ****87;89;1(): : ------------------------------- ****88;39;17(text:p)Lof (FileNumber) Lof (BestandsNummer) ****88;78;3(keyword)Lof Lof ------------------------------- ****89;71;12(text:span)Return value Resultaatwaarde ****89;95;1(): : ------------------------------- ****90;39;4(text:p)Long Long ------------------------------- ****91;71;9(text:span)Parameter Parameter ****91;92;1(): : ------------------------------- ****92;39;97(text:p)FileNumber: Any numeric expression that contains the file number specified by the Open statement. BestandsNummer: Een willekeurige numerieke uitdrukking die het bestandsnummer, gespecificeerd door het Open-argument, bevat. ------------------------------- ****102;45;57(text:p)To obtain the length of a file that is not open, use the Om de grootte van een bestand, dat niet is geopend, te verkrijgen, gebruik de ****102;134;7(text:span)FileLen FileLen ****102;153;10() function. functie. ------------------------------- ****108;32;8(text:p)Example: Voorbeeld: ------------------------------- ****109;38;23(text:p)Sub ExampleRandomAccess Sub VoorbeeldRandomAccess ------------------------------- ****110;38;22(text:p)Dim iNumber As Integer Dim iNumber as Integer ------------------------------- ****111;38;42(text:p)Dim sText As Variant REM must be a Variant Dim sText as Variant REM moet een Variant zijn ! ------------------------------- ****112;38;19(text:p)Dim aFile As String Dim aFile as String ------------------------------- ****113;38;31(text:p)aFile = "c:\data.txt" aFile = "c:\data.txt" ------------------------------- ****115;38;18(text:p)iNumber = Freefile iNumber = Freefile ------------------------------- ****116;38;40(text:p)Open aFile For Random As #iNumber Len=32 Open aFile for random as #iNumber Len=32 ------------------------------- ****117;38;16(text:p)Seek #iNumber,1 Seek #iNumber,1 ****117;74;21(text:p)REM Position at start REM Positie bij start ------------------------------- ****118;38;58(text:p)Put #iNumber,, "This is the first line of text" Put #iNumber,, "Dit is de eerste tekstregel" ****118;105;18(text:p)REM Fill with text REM Vul met tekst ------------------------------- ****119;38;58(text:p)Put #iNumber,, "This is the second line of text" Print #iNumber,, "Dit is de tweede tekstregel" ------------------------------- ****120;38;57(text:p)Put #iNumber,, "This is the third line of text" Put #iNumber,, "Dit is de derde tekstregel" ------------------------------- ****121;38;15(text:p)Seek #iNumber,2 Seek #iNumber,2 ------------------------------- ****122;38;19(text:p)Get #iNumber,,sText Get #iNumber,,sText ------------------------------- ****123;38;11(text:p)Print sText Print sText ------------------------------- ****124;38;14(text:p)Close #iNumber Close #iNumber ------------------------------- ****126;38;18(text:p)iNumber = Freefile iNumber = Freefile ------------------------------- ****127;38;40(text:p)Open aFile For Random As #iNumber Len=32 Open aFile for Random as #iNumber Len=32 ------------------------------- ****128;38;20(text:p)Get #iNumber,2,sText Get #iNumber,2,sText ------------------------------- ****129;38;52(text:p)Put #iNumber,,"This is a new line of text" Put #iNumber,,"Dit is een nieuwe tekstregel" ------------------------------- ****130;38;20(text:p)Get #iNumber,1,sText Get #iNumber,1,sText ------------------------------- ****131;38;20(text:p)Get #iNumber,2,sText Get #iNumber,2,sText ------------------------------- ****132;38;57(text:p)Put #iNumber,20,"This is the text in record 20" Put #iNumber,20,"Dit is de tekst in record 20" ------------------------------- ****133;38;19(text:p)Print Lof(#iNumber) Print Lof(#iNumber) ------------------------------- ****134;38;14(text:p)Close #iNumber Close #iNumber ------------------------------- ****136;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03020304.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;23(subject)Seek Function [Runtime] Seek functie [Runtime] ------------------------------- ****65;74;23(help:link)Seek Function [Runtime] Seek functie [Runtime] ------------------------------- ****66;39;109(text:p)Determines the position for the next writing or reading in a file, which was opened with the open statement. Bepaalt de positie voor het volgende schrijven of lezen in een bestand, dat was geopend met het Open-argument. ****66;164;74(text:p)The return valuecorresponds to the value determined by the Seek statement: De resultaatwaarde correspondeert met de waarde bepaald door het Seek-argument: ------------------------------- ****67;39;92(text:p)For random access files, the Seek function returns the number of the next record to be read. Voor Random-toegang bestanden, geeft de Seek-functie het nummer van het volgende record dat moet worden gelezen weer. ------------------------------- ****68;39;100(text:p)For all other files, the function returns the byte position at which the next operation is to occur. Voor alle andere bestanden, geeft de functie de byte-positie weer waarop de volgende bewerking zal gebeuren. ------------------------------- ****69;39;10(text:p)See also: Zie ook: ****69;82;4(help:link)Open Open ****69;98;2(), , ****69;133;4(help:link)Seek Seek ****69;149;1(). . ------------------------------- ****70;71;6(text:span)Syntax Syntaxis ****70;89;1(): : ------------------------------- ****71;39;18(text:p)Seek (FileNumber) Seek (BestandsNummer) ****71;79;4(keyword)Seek Seek ------------------------------- ****72;71;12(text:span)Return value Resultaatwaarde ****72;95;1(): : ------------------------------- ****73;39;4(text:p)Long Long ------------------------------- ****74;71;9(text:span)Parameter Parameter ****74;92;1(): : ------------------------------- ****75;39;69(text:p)FileNumber: Returns the file number determined by the Open statement. BestandsNummer: Geeft het bestandsnummer, bepaald door het Open-argument, weer. ------------------------------- ****76;32;8(text:p)Example: Voorbeeld: ------------------------------- ****77;38;15(text:p)Sub ExampleSeek Sub VoorbeeldSeek ------------------------------- ****78;38;16(text:p)Dim i As Integer Dim i as Integer ------------------------------- ****79;38;22(text:p)Dim iNumber As Integer Dim iNumber as Integer ------------------------------- ****80;38;18(text:p)iNumber = Freefile iNumber = Freefile ------------------------------- ****81;38;51(text:p)Open "c:\Data.txt" For Random As #iNumber Open "c:\Data.txt" for Random as #iNumber ------------------------------- ****82;38;15(text:p)For i = 1 To 10 For i = 1 to 10 ------------------------------- ****83;38;17(text:p)PUT #iNumber, , i PUT #iNumber, , i ------------------------------- ****84;38;6(text:p)Next i Next i ------------------------------- ****85;38;16(text:p)Seek #iNumber, 2 Seek #iNumber, 2 ------------------------------- ****86;38;11(text:p)Get #1, , i Get #1, , i ------------------------------- ****87;38;35(text:p)Print "Date: "; i;" Print "Datum: "; i;" ****87;82;34(text:p)Next Record: "; Seek(iNumber) Volgend Record: "; Seek(iNumber) ------------------------------- ****88;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03020305.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;24(subject)Seek statement [Runtime] Seek argument [Runtime] ------------------------------- ****61;74;24(help:link)Seek statement [Runtime] Seek argument [Runtime] ------------------------------- ****62;39;108(text:p)Determines the position for the next writing or reading in a file, which was opened with the open statement. Bepaalt de positie voor het volgende schrijven of lezen in een bestand, dat was geopend met het Open-argument. ------------------------------- ****63;39;95(text:p)For random access files, the Seek function returns the number of the next record to be written. Voor Random-toegang bestanden, de Seek-functie geeft het nummer van het volgende record, waarin moet worden geschreven, weer. ------------------------------- ****64;39;100(text:p)For all other files, the function returns the byte position at which the next operation is to occur. Voor alle andere bestanden, geeft de functie de byte-positie weer waar de volgende bewerking zal gebeuren. ------------------------------- ****65;39;10(text:p)See also: Zie ook: ****65;82;4(help:link)Open Open ****65;98;2(), , ****65;133;4(help:link)Seek Seek ****65;149;1(). . ------------------------------- ****66;71;6(text:span)Syntax Syntaxis ****66;89;1(): : ------------------------------- ****67;39;38(text:p)Seek[#]FileNumber, Position (As Long) Seek[#]BestandsNummer, Positie (As Long) ****67;99;4(keyword)Seek Seek ------------------------------- ****68;71;9(text:span)Parameter Parameter ****68;92;1(): : ------------------------------- ****69;39;69(text:p)FileNumber: Returns the file number determined by the Open statement. Bestandsnummer: Geeft het bestandsnummer, bepaald door het Open-argument, weer. ------------------------------- ****70;39;370(text:p)Position: Position for the next writing or reading. Position can be a number between 1 and 2,147,483,647. According to the file type the position indicates the number of the record(Files in the Random mode) or the the byte position (Files in the Binary, Output, Append or Input mode). The first byte of the file has the position 1 and the second byte has the position 2. Positie: Positie voor het volgende schrijven of lezen. Positie kan een getal zijn tussen 1 en 2.147.483.647. Afhankelijk van het bestandstype geeft de positie het nummer van het record (Bestanden in de Random-modus) of de byte-positie (Bestanden in de Binary, Output, Append of Input-modus). De eerste byte van het bestand heeft de positie 1 en de tweede byte heeft de positie 2. ####Text\SBASIC\COMMON\03020400.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;14(subject)Managing Files Bestanden beheren ------------------------------- ****57;58;14(help:link)Managing Files Bestanden beheren ****58;39;67(text:p)All functions and statements for managing files are described here. Alle functies en argumenten voor het beheren van bestanden zijn hier beschreven. ####Text\SBASIC\COMMON\03020401.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;25(subject)ChDir statement [Runtime] ChDir argument [Runtime] ------------------------------- ****84;58;25(help:link)ChDir statement [Runtime] ChDir argument [Runtime] ****85;39;39(text:p)Changes the current directory or drive. Wijzigt de huidige map of schijf. ------------------------------- ****87;71;6(text:span)Syntax Syntaxis ****87;89;1(): : ------------------------------- ****88;39;21(text:p)ChDir Text As String ChDir Tekst as String ****88;82;5(keyword)ChDir ChDir ------------------------------- ****89;71;9(text:span)Parameter Parameter ****89;92;1(): : ------------------------------- ****90;39;71(text:p)Text: Any string expression that specifies the directory path or drive. Tekst: Elke String-uitdrukking die het directory-pad of schijf specificeert. ------------------------------- ****100;45;89(text:p)If you only want to change the current drive, enter the drive letter followed by a colon. Als u alleen de huidige schijf wilt veranderen, toets de schijf-letter, gevolgd door een dubbele punt, in. ------------------------------- ****106;32;8(text:p)Example: Voorbeeld: ------------------------------- ****107;38;16(text:p)Sub ExampleChDir Sub VoorbeeldChDir ------------------------------- ****108;38;37(text:p)Dim sDir1 as String , sDir2 as String Dim sDir1 as String , sDir2 as String ------------------------------- ****109;38;27(text:p)sDir1 = "c:\Test" sDir1 = "c:\Test" ------------------------------- ****110;38;30(text:p)sDir2 = "d:\private" sDir2 = "d:\prive" ------------------------------- ****111;38;14(text:p)ChDir( sDir1 ) ChDir( sDir1 ) ------------------------------- ****112;38;13(text:p)msgbox CurDir msgbox CurDir ------------------------------- ****113;38;14(text:p)ChDir( sDir2 ) ChDir( sDir2 ) ------------------------------- ****114;38;13(text:p)msgbox CurDir msgbox CurDir ------------------------------- ****115;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03020402.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;27(subject)ChDrive statement [Runtime] ChDrive argument [Runtime] ------------------------------- ****66;58;27(help:link)ChDrive statement [Runtime] ChDrive argument [Runtime] ****67;39;26(text:p)Changes the current drive. Wijzigt de huidige schijf. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;23(text:p)ChDrive Text As String ChDrive Tekst as String ****70;84;7(keyword)ChDrive ChDrive ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;81(text:p)Text: Any string expression that contains the drive letter of the new drive. The Tekst: Elke String-uitdrukking die de schijf-letter van de nieuwe schijf bevat. De ****72;157;12(help:link)URL notation URL notatie ****72;181;23() can also be used here. kan hier ook worden gebruikt. ------------------------------- ****73;39;299(text:p)The drive must be assigned with a capital letter and is restricted by the settings in LASTDRV. If the drive argument is a multiple-character string, only the first letter is relevant. If you attempt to access a non-existent drive, an error occurs which you can respond to with the OnError statement. De schijf moet worden aangeduid met een hoofdletter en wordt beperkt door de instellingen in LASTDRV. Als het schijf-argument een meervoudige-tekenreeks is, is alleen de eerste letter relevant. Als u poogt om toegang te krijgen tot een niet-bestaande schijf, zal een foutboodschap verschijnen waarop u kunt reageren met het OnError-argument. ------------------------------- ****74;32;8(text:p)Example: Voorbeeld: ------------------------------- ****75;38;18(text:p)Sub ExampleCHDrive Sub ExampleCHDrive ------------------------------- ****76;38;22(text:p)ChDrive "D" ChDrive "D" ****76;69;50(text:p)REM Only possible if a drive 'D' exists. REM Alleen mogelijk als een schijf 'D' bestaat. ------------------------------- ****77;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03020403.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;25(subject)CurDir Function [Runtime] CurDir functie [Runtime] ------------------------------- ****68;58;25(help:link)CurDir Function [Runtime] CurDir functie [Runtime] ****69;39;78(text:p)Returns a variant string representing the current path of the specified drive. Geeft een Variant-tekenreeks weer die het huidige pad van de gespecificeerde schijf presenteert. ------------------------------- ****71;71;6(text:span)Syntax Syntaxis ****71;89;1(): : ------------------------------- ****72;39;26(text:p)CurDir [(Text As String)] CurDir [(Tekst As String)] ****72;87;6(keyword)CurDir CurDir ------------------------------- ****73;71;12(text:span)Return value Resultaatwaarde ****73;95;1(): : ------------------------------- ****74;39;6(text:p)String String ------------------------------- ****75;71;9(text:span)Parameter Parameter ****75;92;1(): : ------------------------------- ****76;39;168(text:p)Text: Any string expression that specifies an existing drive for which to return the current path (e.g., "C" for the first partition of the first hard drive). Tekst: Elke String-uitdrukking die een bestaande schijf specificeert waarvoor het huidige pad (bijv., "C" voor de eerste partitie van de eerste harde schijf) wordt weergegeven. ------------------------------- ****77;39;128(text:p)If no drive is specified or if the drive is a zero-length string (""), CurDir returns the path for the current drive. Als er geen schijf is gespecificeerd of als de schijf een lege tekenreeks ("") is, geeft CurDir het pad voor de huidige schijf weer. ****77;185;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****77;216;209() Basic reports an error if the syntax of the drive description is incorrect or a drive is defined which either does not exist or is found after the drive defined in the CONFIG.SYS with the Lastdrive statement. BASIC rapporteert een fout als de syntaxis van de schijf-beschrijving onjuist is of als een schijf wordt gedefinieerd die óf niet bestaat óf pas wordt gevonden nadat de schijf is gedefinieerd in CONFIG.SYS met het Lastdrive-argument. ------------------------------- ****78;39;36(text:p)This function is not case-sensitive. Deze functie is niet hoofdlettergevoelig. ------------------------------- ****79;32;8(text:p)Example: Voorbeeld: ------------------------------- ****80;38;17(text:p)Sub ExampleCurDir Sub VoorbeeldCurDir ------------------------------- ****81;38;37(text:p)Dim sDir1 as String , sDir2 as String Dim sDir1 as String , sDir2 as String ------------------------------- ****82;38;27(text:p)sDir1 = "c:\Test" sDir1 = "c:\Test" ------------------------------- ****83;38;30(text:p)sDir2 = "d:\private" sDir2 = "d:\prive" ------------------------------- ****84;38;14(text:p)ChDir( sDir1 ) ChDir( sDir1 ) ------------------------------- ****85;38;13(text:p)msgbox CurDir msgbox CurDir ------------------------------- ****86;38;14(text:p)ChDir( sDir2 ) ChDir( sDir2 ) ------------------------------- ****87;38;13(text:p)msgbox CurDir msgbox CurDir ------------------------------- ****88;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03020404.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)Dir Function [Runtime] Dir functie [Runtime] ------------------------------- ****66;58;22(help:link)Dir Function [Runtime] Dir functie [Runtime] ****67;39;125(text:p)Returns the name of a file, directory, or all files and folders of a drive or directory that match the specified search path. Geeft de naam van een bestand, map of alle bestanden en mappen van een schijf of map weer, die overeenstemmen met het gespecificeerde zoekpad. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;45(text:p)Dir [(Text As String) [, Attrib As Integer]] Dir [(Tekst as String) [, Attrib As Integer]] ****70;106;3(keyword)Dir Dir ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;6(text:p)String String ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;162(text:p)Text: Any string expression that specifies the search path, directory or file. This argument must only be specified the first time you call the Dir function. The Tekst: Elke String-uitdrukking die het zoekpad, map of bestand specificeert. Dit argument moet alleen de eerste keer dat u de Dir-functie aanroept worden gespecificeerd. De ****74;238;12(help:link)URL notation URL notatie ****74;262;23() can also be used here. kan hier ook worden gebruikt. ------------------------------- ****75;39;226(text:p)Attrib: Any integer expression which specifies bitwise file attributes. The Dir function returns only files or directories that match the specified attributes. Various attributes can be combined by adding the attribute values: Attrib: Elke Integer-uitdrukking die bit-specifieke bestandsattributen specificeert. De Dir functie geeft alleen bestanden of mappen weer die overeenstemmen met de gespecificeerde attributen. Verschillende attributen kunnen worden gecombineerd door de attribuutwaarden toe te voegen: ------------------------------- ****76;32;7(text:p)attrib: attrib: ------------------------------- ****77;39;17(text:p)0 : Normal files. 0 : Normale bestanden. ------------------------------- ****78;39;17(text:p)2 : Hidden files. 2 : Verborgen bestanden. ------------------------------- ****79;39;17(text:p)4 : System files. 4 : Systeembestanden. ------------------------------- ****80;39;34(text:p)8 : Returns the name of the volume 8 : Geeft de naam van het volume (schijf) ------------------------------- ****81;39;44(text:p)16 : Returns the name of the directory only. 16 : Geeft alleen de naam van de map. ------------------------------- ****82;39;140(text:p)You can use this function either to check whether a file or directory exists, or to determine all files and folders in a specific directory. U kunt deze functie gebruiken óf om na te gaan of een bestand of map bestaat, óf om alle bestanden en mappen in een specifieke map te bepalen. ------------------------------- ****83;39;249(text:p)To check whether a file exists, enter the complete path name along with the file name. If the Dir function returns a name, the directory or file exists. When no file or directory names match, Dir Function returns a zero-length string (""). Om te controleren of een bestand bestaat, toets de complete padnaam, samen met de bestandsnaam in. Als de Dir-functie een naam weergeeft, bestaat de map of bestand. Wanneer geen bestands- of mapnamen overeenstemmen, geeft de Dir-functie een lege tekenreeks ("") weer. ------------------------------- ****84;39;585(text:p)To generate a list of all existing files in a specific directory, proceed as follows: The first time you call the Dir function specify the complete search path of the files, e.g., "D:\OFFICE4\*.SDW". If the path is correct and the search resulted in at least one file, the function returns the name of the first file that matches the search path. To return any additional file names that match pathname, call Dir again with no arguments. If the Dir function returns a zero-length string (""), this means that no more file names exist that match the search criteria. Om een lijst van alle bestaande bestanden in een specifieke map te genereren, ga als volgt te werk: De eerste keer dat u de Dir-functie aanroept, specificeert u het complete zoekpad van de bestanden, bijv., "D:\OFFICE4\*.SDW". Als het pad correct is en de zoekoperatie resulteert in tenminste één bestand, geeft de functie de naam van het eerste bestand weer dat overeenkomt met het zoekpad. Om willekeurige aanvullende bestandsnamen weer te geven die overeenstemmen met de padnaam, roep Dir nogmaals aan, zonder argumenten. Als de Dir-functie een lege tekenreeks ("") weergeeft, betekent dit dat er niet meer bestandsnamen bestaan die overeenstemmen met de zoekcriteria. ------------------------------- ****85;39;150(text:p)To return directories only, use the attribute parameter. The same applies if you want to determine the name of a volume (e.g., a hard drive partition) Om alleen mappen weer te geven, gebruik de attribuut-parameter. Hetzelfde geldt als u de naam van een volume (bijv., een harde schijf-partitie) wilt bepalen. ------------------------------- ****86;32;8(text:p)Example: Voorbeeld: ------------------------------- ****87;38;14(text:p)Sub ExampleDir Sub VoorbeeldDir ------------------------------- ****88;38;38(text:p)REM Displays all files and directories REM Toont alle bestanden en mappen ------------------------------- ****89;38;36(text:p)Dim sFile as String, sPath As String Dim sFile as String, sPath as String ------------------------------- ****90;38;36(text:p)Dim sDir as String, sValue as String Dim sDir as String, sValue as String ------------------------------- ****91;38;20(text:p)Dim iFIle as Integer Dim iFIle as Integer ------------------------------- ****92;38;26(text:p)sFile= "Files: " sFile= "Bestanden: " ------------------------------- ****93;38;29(text:p)sDir="Directories:" sDir="Directories:" ------------------------------- ****94;38;9(text:p)iFile = 0 iFile = 0 ------------------------------- ****95;38;14(text:p)sPath = CurDir sPath = CurDir ------------------------------- ****96;38;24(text:p)sValue = Dir$(sPath,22) sValue = Dir$(sPath,22) ****96;82;14(text:p)REM 16 + 2 + 4 REM 16 + 2 + 4 ------------------------------- ****97;38;2(text:p)Do Do ------------------------------- ****98;38;72(text:p)If sValue <> "." and sValue <> ".." Then If sValue <> "." and sValue <> ".." then ------------------------------- ****99;38;66(text:p)if (GetAttr( sPath + getPathSeparator + sValue) AND 16) >0 then if (GetAttr( sPath + getPathSeparator + sValue) AND 16) >0 then ------------------------------- ****100;38;24(text:p)REM here the directories REM hier de mappen ------------------------------- ****101;38;38(text:p)sDir = sDir & chr(13) & sValue sDir = sDir & chr(13) & sValue ------------------------------- ****102;38;4(text:p)else else ------------------------------- ****103;38;18(text:p)REM here the files REM hier de bestanden ------------------------------- ****105;38;47(text:p)if iFile Mod 3 = 0 then sFile = sFile + Chr(13) if iFile Mod 3 = 0 then sFile = sFile + Chr(13) ------------------------------- ****106;38;17(text:p)iFile = iFile + 1 iFile = iFile + 1 ------------------------------- ****107;38;42(text:p)sFile = sFile + sValue &"; " sFile = sFile + sValue &"; " ------------------------------- ****108;38;6(text:p)End If end if ------------------------------- ****109;38;6(text:p)End If end if ------------------------------- ****110;38;13(text:p)sValue = Dir$ sValue = Dir$ ------------------------------- ****111;38;32(text:p)Loop Until sValue = "" Loop until sValue = "" ------------------------------- ****112;38;19(text:p)MsgBox sDir,0,sPath MsgBox sDir,0,sPath ------------------------------- ****113;38;71(text:p)MsgBox "" & iFile & " " & sFile,0,sPath MsgBox "" & iFile & " " & sFile,0,sPath ------------------------------- ****114;38;7(text:p)End sub end sub ####Text\SBASIC\COMMON\03020405.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;27(subject)FileAttr-Function [Runtime] FileAttr functie [Runtime] ------------------------------- ****84;58;27(help:link)FileAttr-Function [Runtime] FileAttr functie [Runtime] ****85;39;257(text:p)Returns the access mode or the MS-DOS file attribute of a file that was opened with the Open statement. The MS-Dos file attribute is an access number of the operating system. Therefore it is dependent on the operating system (OSH = Operating System Handle). Geeft de toegangsmodus of het MS-DOS bestandsattribuut weer van een bestand dat was geopend met het Open-argument. Het MS-Dos bestandsattribuut is een toegangsnummer van het besturingssysteem. Daarom het is afhankelijk van het besturingssysteem (OSH = Operating Systeem Handle). ------------------------------- ****96;45;210(text:p)If you use an operating system with a 32-Bit-Version, it will not be possible to use the FileAttr-Function to determine the MS-Dos file attribute. In this case, you will always get the value 0 as access number. Als u een besturingssysteem met een 32Bit-Versie gebruikt, zal het niet mogelijk zijn om de FileAttr-functie te gebruiken om het MS-Dos bestandsattribuut te bepalen. In dat geval zult u altijd de waarde 0 als toegangsnummer krijgen. ------------------------------- ****102;39;10(text:p)See also: Zie ook: ****102;82;4(help:link)Open Open ------------------------------- ****103;71;6(text:span)Syntax Syntaxis ****103;89;1(): : ------------------------------- ****104;39;54(text:p)FileAttr (FileNumber As Integer, Attribut As Integer) FileAttr (BestandsNummer as Integer, Attribuut as Integer) ****104;115;8(keyword)FileAttr FileAttr ------------------------------- ****105;71;12(text:span)Return value Resultaatwaarde ****105;95;1(): : ------------------------------- ****106;39;7(text:p)Integer Integer ------------------------------- ****107;71;9(text:span)Parameter Parameter ****107;92;1(): : ------------------------------- ****108;39;66(text:p)FileNumber: The number of the file opened with the Open statement. BestandsNummer: Het nummer van het bestand geopend met het Open-argument. ------------------------------- ****109;39;119(text:p)Attribute: Integer expression that indicates the type of file information to return. The following values are possible: Attribuut: Integer-uitdrukking die het soort bestandsinformatie, dat wordt weergegeven, aangeeft. De volgende waarden zijn mogelijk: ------------------------------- ****110;39;63(text:p)1: The FileAttr-Function indicates the access mode of the file. 1: De FileAttr-functie geeft de toegangsmodus van het bestand aan. ------------------------------- ****111;39;80(text:p)2: The FileAttr-Function returns the file access number of the operating system. 2: De FileAttr-functie geeft het bestandstoegangsnummer van het besturingssysteem aan. ------------------------------- ****112;39;96(text:p)If you specify a parameter attribute with the value 1, you will get the following return values: Als u een parameterattribuut met de waarde 1 specificeert, krijgt u de volgende Resultaatwaarden: ------------------------------- ****113;39;31(text:p)1 - INPUT (file open for input) 1 - INPUT (bestand open voor invoer) ------------------------------- ****114;39;33(text:p)2 - OUTPUT (file open for output) 2 - OUTPUT (bestand open voor uitvoer) ------------------------------- ****115;39;40(text:p)4 - RANDOM (file open for random access) 4 - RANDOM (bestand open voor Random-toegang) ------------------------------- ****116;39;36(text:p)8 - APPEND (file open for appending) 8 - APPEND (bestand open voor aanvullen) ------------------------------- ****117;39;39(text:p)32 - BINARY (file open in binary mode). 32 - BINARY (bestand open in Binary-modus). ------------------------------- ****118;32;8(text:p)Example: Voorbeeld: ------------------------------- ****119;38;19(text:p)Sub ExampleFileAttr Sub VoorbeeldFileAttr ------------------------------- ****120;38;22(text:p)Dim iNumber As Integer Dim iNumber as Integer ------------------------------- ****121;38;19(text:p)Dim sLine As String Dim sLine as String ------------------------------- ****122;38;19(text:p)Dim aFile As String Dim aFile as String ------------------------------- ****123;38;31(text:p)aFile = "c:\data.txt" aFile = "c:\data.txt" ------------------------------- ****125;38;18(text:p)iNumber = Freefile iNumber = Freefile ------------------------------- ****126;38;33(text:p)Open aFile For Output As #iNumber Open aFile for output as #iNumber ------------------------------- ****127;38;50(text:p)Print #iNumber, "This is a line of text" Print #iNumber, "Dit is een tekstregel" ------------------------------- ****128;38;55(text:p)MsgBox FileAttr(#iNumber, 1 ),0,"Access mode" MsgBox FileAttr(#iNumber, 1 ),0,"Toegangsmodus" ------------------------------- ****129;38;58(text:p)MsgBox FileAttr(#iNumber, 2 ),0,"File attribute" MsgBox FileAttr(#iNumber, 2 ),0,"Bestandsattribuut" ------------------------------- ****130;38;14(text:p)Close #iNumber Close #iNumber ------------------------------- ****131;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03020406.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;28(subject)FileCopy statement [Runtime] FileCopy argument [Runtime] ------------------------------- ****84;58;28(help:link)FileCopy statement [Runtime] FileCopy argument [Runtime] ****85;39;14(text:p)Copies a file. Kopieërt een bestand. ------------------------------- ****87;71;6(text:span)Syntax Syntaxis ****87;89;1(): : ------------------------------- ****88;39;18(text:p)FileCopy TextFrom FileCopy TekstVan ****88;66;28(text:p)As String, TextTo As String as String, TekstNaar as String ****88;116;8(keyword)FileCopy FileCopy ------------------------------- ****89;71;9(text:span)Parameter Parameter ****89;92;1(): : ------------------------------- ****90;39;138(text:p)TextFrom: Any string expression that specifies the name of the file to be copied. It may contain optional path and drive information. The TekstVan: Elke String-uitdrukking die de naam van het bestand, dat moet worden gekopieerd, specificeert. Het kan, optioneel, pad en schijf-informatie bevatten. De ****90;214;12(help:link)URL notation URL notatie ****90;238;23() can also be used here. kan hier ook worden gebruikt. ------------------------------- ****91;39;138(text:p)TextTo: Any string expression that specifies where to copy the source file. It may contain the destination drive, path and file name. The TekstNaar: Elke String-uitdrukking die specificeert waar naartoe het bronbestand te kopiëren. Het kan de doelschijf, pad en bestandsnaam bevatten. De ****91;214;12(help:link)URL notation URL notatie ****91;238;23() can also be used here. kan hier ook worden gebruikt. ------------------------------- ****101;45;74(text:p)You can only use the FileCopy statement to copy files that are not opened. U kunt het FileCopy-argument alleen gebruiken om bestanden te kopiëren die niet zijn geopend. ------------------------------- ****107;32;8(text:p)Example: Voorbeeld: ------------------------------- ****108;38;19(text:p)Sub ExampleFilecopy Sub VoorbeeldFilecopy ------------------------------- ****109;38;70(text:p)Filecopy "c:\autoexec.bat", "c:\Temp\Autoexec.sav" Filecopy "c:\autoexec.bat", "c:\Temp\Autoexec.sav" ------------------------------- ****110;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03020407.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;31(subject)FileDateTime Function [Runtime] FileDateTime functie [Runtime] ------------------------------- ****66;58;31(help:link)FileDateTime Function [Runtime] FileDateTime functie [Runtime] ****67;39;86(text:p)Returns a string that indicates the date and time a file was created or last modified. Geeft een tekenreeks weer die de datum en tijd aangeeft waarop een bestand was gemaakt of het laatst werd gewijzigd. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;30(text:p)FileDateTime (Text As String) FileDateTime (Tekst as String) ****70;91;12(keyword)FileDateTime FileDateTime ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;96(text:p)Text: Any string expression that contains an unambiguous (no wildcards) file specification. The Tekst: Elke String-uitdrukking die een ondubbelzinnige (geen jokertekens) bestandsspecificatie bevat. De ****72;172;12(help:link)URL notation URL notatie ****72;196;23() can also be used here. kan hier ook worden gebruikt. ------------------------------- ****73;39;139(text:p)This function determines the exact time of creation or last modification of a file, returned in the format "MM.DD.YYYY HH.MM.SS". Deze functie bepaalt de exacte tijd van creatie of laatste wijziging van een bestand, weergegeven in de opmaak "MM.DD.JJJJ UU.MM.SS". ------------------------------- ****74;32;8(text:p)Example: Voorbeeld: ------------------------------- ****75;38;23(text:p)Sub ExampleFileDateTime Sub VoorbeeldFileDateTime ------------------------------- ****76;38;48(text:p)msgbox FileDateTime("C:\autoexec.bat") msgbox FileDateTime("C:\autoexec.bat") ------------------------------- ****77;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03020408.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;26(subject)FileLen-Function [Runtime] FileLen functie [Runtime] ------------------------------- ****66;58;26(help:link)FileLen-Function [Runtime] FileLen functie [Runtime] ****67;39;38(text:p)Returns the length of a file in bytes. Geeft de grootte van een bestand in bytes weer. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;25(text:p)FileLen (Text As String) FileLen (Tekst As String) ****70;86;7(keyword)FileLen FileLen ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;4(text:p)Long Long ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;81(text:p)Text: Any string expression that contains an unambiguous file specification. The Tekst: Elke String-uitdrukking die een ondubbelzinnige bestandsspecificatie bevat. De ****74;157;12(help:link)URL notation URL notatie ****74;181;23() can also be used here. kan hier ook worden gebruikt. ------------------------------- ****75;39;241(text:p)This function is used to determine the length of a file. If the FileLen function is called for an open file, it returns the file length before it was opened. To determine the current file length of an open file, use the Lof function instead. Deze functie gebruikt u om de grootte van een bestand te bepalen. Als de FileLen-functie wordt aangeroepen voor een geopend bestand, geeft het de bestandsgrootte vóórdat het was geopend. Om de actuele bestandsgrootte van een geopend bestand bepalen, gebruik de Lof-functie in plaats van FileLen. ------------------------------- ****76;32;8(text:p)Example: Voorbeeld: ------------------------------- ****77;38;18(text:p)Sub ExampleFileLen Sub VoorbeeldFileLen ------------------------------- ****78;38;43(text:p)msgbox FileLen("C:\autoexec.bat") msgbox FileLen("C:\autoexec.bat") ------------------------------- ****79;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03020409.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;26(subject)GetAttr Function [Runtime] GetAttr functie [Runtime] ------------------------------- ****66;58;26(help:link)GetAttr Function [Runtime] GetAttr functie [Runtime] ****67;39;111(text:p)Returns a bit pattern which identifies the file type or shows whether it has a name of a volume or a directory. Geeft een bitpatroon welke het bestandstype identificeert of toont óf het een naam van een volume heeft óf van een map. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;25(text:p)GetAttr (Text As String) GetAttr (Tekst as String) ****70;86;7(keyword)GetAttr GetAttr ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;7(text:p)Integer Integer ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;81(text:p)Text: Any string expression that contains an unambiguous file specification. The Tekst: Elke String-uitdrukking die een ondubbelzinnige bestandsspecificatie bevat. De ****74;157;12(help:link)URL notation URL notatie ****74;181;23() can also be used here. kan hier ook worden gebruikt. ------------------------------- ****75;39;191(text:p)This function is used to determine the MS-Dos file attributes for a specified file. This function returns as a result a bit pattern which helps you to identify the file attributes as follows: Deze functie gebruikt u om de MS-Dos bestandsattributen te bepalen voor een gespecificeerd bestand. Deze functie geeft als een resultaat een bitpatroon weer dat u helpt de bestandsattributen als volgt te identificeren: ------------------------------- ****76;32;5(text:p)Value Waarde ------------------------------- ****77;39;17(text:p)0 : Normal files. 0 : Normale bestanden. ------------------------------- ****78;39;20(text:p)1 : Read-only files. 1 : Alleen-lezen bestanden. ------------------------------- ****79;39;17(text:p)2 : Hidden files. 2 : Verborgen bestanden. ------------------------------- ****80;39;17(text:p)4 : System files. 4 : Systeembestanden. ------------------------------- ****81;39;34(text:p)8 : Returns the name of the volume 8 : Geeft de naam van het volume (schijf) weer. ------------------------------- ****82;39;44(text:p)16 : Returns the name of the directory only. 16 : Geeft alleen de naam van de map weer. ------------------------------- ****83;39;54(text:p)32 : File was changed since last backup (Archive bit). 32 : Bestand is veranderd sinds laatste reservekopie (Archief-bit). ------------------------------- ****84;39;102(text:p)If you want to know whether a bit of the attribute byte is set, please use the following query method: Als u wilt weten of een bit van het attribuutbyte is ingesteld, gebruik alstublieft de volgende bevragingsmethode: ------------------------------- ****85;32;8(text:p)Example: Voorbeeld: ------------------------------- ****86;38;21(text:p)Sub ExampleSetGetAttr Sub VoorbeeldSetGetAttr ------------------------------- ****87;38;62(text:p)On Error Goto ErrorHandler REM Define target for error-handler On Error Goto FoutBehandelaar REM Definieer doel voor foutbehandeling ------------------------------- ****88;38;74(text:p)If Dir("C:\test",16)="" Then MkDir "C:\test" If Dir("C:\test",16)="" then MkDir "C:\test" ------------------------------- ****89;38;129(text:p)If Dir("C:\test\autoexec.sav")="" THEN Filecopy "c:\autoexec.bat", "c:\test\autoexec.sav" IF Dir("C:\test\autoexec.sav")="" THEN Filecopy "c:\autoexec.bat", "c:\test\autoexec.sav" ------------------------------- ****90;38;43(text:p)SetAttr "c:\test\autoexec.sav" ,0 SetAttr "c:\test\autoexec.sav" ,0 ------------------------------- ****91;38;70(text:p)Filecopy "c:\autoexec.bat", "c:\test\autoexec.sav" Filecopy "c:\autoexec.bat", "c:\test\autoexec.sav" ------------------------------- ****92;38;43(text:p)SetAttr "c:\test\autoexec.sav" ,1 SetAttr "c:\test\autoexec.sav" ,1 ------------------------------- ****93;38;49(text:p)print GetAttr( "c:\test\autoexec.sav" ) Print GetAttr( "c:\test\autoexec.sav" ) ------------------------------- ****94;38;3(text:p)end end ------------------------------- ****95;38;13(text:p)ErrorHandler: FoutBehandelaar: ------------------------------- ****96;38;11(text:p)Print Error Print Error ------------------------------- ****97;38;3(text:p)end end ------------------------------- ****98;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03020410.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;24(subject)Kill statement [Runtime] Kill argument [Runtime] ------------------------------- ****66;58;24(help:link)Kill statement [Runtime] Kill argument [Runtime] ****67;39;27(text:p)Deletes a file form a disk. Verwijdert een bestand van een schijf. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;20(text:p)Kill File As String Kill Bestand as String ****70;81;4(keyword)Kill Kill ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;81(text:p)File: Any string expression that contains an unambiguous file specification. The Bestand: Elke String-uitdrukking die een ondubbelzinnige bestandsspecificatie bevat. De ****72;157;12(help:link)URL notation URL notatie ****72;181;23() can also be used here. kan hier ook worden gebruikt. ------------------------------- ****73;32;8(text:p)Example: Voorbeeld: ------------------------------- ****74;38;15(text:p)sub ExampleKill sub VoorbeeldKill ------------------------------- ****75;38;33(text:p)Kill "C:\datafile.dat" Kill "C:\datafile.dat" ****75;80;35(text:p)REM File must be created in advance REM Bestand moet van tevoren zijn gemaakt ------------------------------- ****76;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03020411.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ATTENTIE; De macro in dit xml document heeft een fout in zich en derhalve werkt de macro VoorbeeldFileIO N I E T ! Fout komt voor in tekstblok 86;54;14(text:p)MkDir sSubDir1 ------------------------------- ****6;15;25(subject)MkDir statement [Runtime] MkDir argument [Runtime] ------------------------------- ****66;58;25(help:link)MkDir statement [Runtime] MkDir argument [Runtime] ****67;39;41(text:p)Creates a new directory on a data medium. Creeërt een nieuwe map op een gegevensmedium. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;21(text:p)MkDir Text As String MkDir Tekst as String ****70;82;5(keyword)MkDir MkDir ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;97(text:p)Text: Any string expression that specifies the name and path of the directory to be created. The Tekst: Elke String-uitdrukking die de naam en pad van de map specificeert die moet worden gemaakt. De ****72;173;12(help:link)URL notation URL notatie ****72;197;23() can also be used here. kan hier ook worden gebruikt. ------------------------------- ****73;39;96(text:p)If the path is not determined, the specified directory will be created in the current directory. Als het pad niet is bepaald, zal de gespecificeerde map worden gemaakt in de huidige map. ------------------------------- ****74;32;8(text:p)Example: Voorbeeld: ------------------------------- ****75;38;17(text:p)Sub ExampleFileIO Sub VoorbeeldFileIO ------------------------------- ****76;38;53(text:p)' Example for functions of the file organisation ' Voorbeeld voor functies van de bestandsorganisatie ------------------------------- ****77;38;59(text:p)Const sFile1 as String = "file://c|/autoexec.bat" Const sFile1 as String = "file://c|/autoexec.bat" ------------------------------- ****78;38;50(text:p)Const sDir1 as String = "file://c|/Temp" Const sDir1 as String = "file://c|/Temp" ------------------------------- ****79;38;42(text:p)Const sSubDir1 as String ="Test" Const sSubDir1 as String ="Test" ------------------------------- ****80;38;47(text:p)Const sFile2 as String = "Copied.tmp" Const sFile2 as String = "Gekopieerd.tmp" ------------------------------- ****81;38;48(text:p)Const sFile3 as String = "Renamed.tmp" Const sFile3 as String = "Hernoemd.tmp" ------------------------------- ****82;38;19(text:p)Dim sFile as String Dim sFile as String ------------------------------- ****83;38;40(text:p)sFile = sDir1 + "/" + sSubDir1 sFile = sDir1 + "/" + sSubDir1 ------------------------------- ****84;38;14(text:p)ChDir( sDir1 ) ChDir( sDir1 ) ------------------------------- ****85;38;71(text:p)If Dir(sSubDir1,16)="" then ' Does the directory exist ? IF Dir(sSubDir1,16)="" THEN ' Bestaat de map ? ------------------------------- ****86;54;14(text:p)MkDir sSubDir1 MkDir sSubDir1 ------------------------------- ****87;54;43(text:p)MsgBox sFile,0,"Create directory" MsgBox sFile,0,"Maak de map" ------------------------------- ****88;38;6(text:p)End If End if ------------------------------- ****90;38;38(text:p)sFile = sFile + "/" + sFile2 sFile = sFile + "/" + sFile2 ------------------------------- ****91;38;23(text:p)FileCopy sFile1 , sFile FileCopy sFile1 , sFile ------------------------------- ****92;38;56(text:p)MsgBox fSysURL(CurDir()),0,"Current directory" MsgBox fSysURL(CurDir()),0,"Actuele map" ------------------------------- ****93;38;82(text:p)MsgBox sFile & Chr(13) & FileDateTime( sFile ),0,"Creation time" MsgBox sFile & Chr(13) & FileDateTime( sFile ),0,"= tijd waarop gemaakt:" ------------------------------- ****94;38;7(text:p)MsgBox MsgBox ****94;54;67(text:p)sFile & Chr(13)& FileLen( sFile ),0,"File length" sFile & Chr(13)& FileLen( sFile ),0,"Bestandsgrootte" ------------------------------- ****95;38;7(text:p)MsgBox MsgBox ****95;54;71(text:p)sFile & Chr(13)& GetAttr( sFile ),0,"File attributes" sFile & Chr(13)& GetAttr( sFile ),0,"Bestandsattributen" ------------------------------- ****96;38;71(text:p)Name sFile as sDir1 + "/" + sSubDir1 + "/" + sFile3 Name sFile as sDir1 + "/" + sSubDir1 + "/" + sFile3 ------------------------------- ****97;38;35(text:p)' Rename in the same directory ' Hernoemen in dezelfde map ------------------------------- ****99;38;8(text:p)sFile = sFile = ****99;55;57(text:p)sDir1 + "/" + sSubDir1 + "/" + sFile3 sDir1 + "/" + sSubDir1 + "/" + sFile3 ------------------------------- ****100;38;47(text:p)SetAttr( sFile, 0 ) 'Delete all attributes SetAttr( sFile, 0 ) 'Verwijder alle attributen ------------------------------- ****101;38;83(text:p)MsgBox sFile & Chr(13) & GetAttr( sFile ),0,"New file attributes" MsgBox sFile & Chr(13) & GetAttr( sFile ),0,"Nieuwe bestandsattributen" ------------------------------- ****102;38;10(text:p)Kill sFile Kill sFile ------------------------------- ****103;38;30(text:p)RmDir sDir1 + "/" + RmDir sDir1 + "/" + ****103;77;8(text:p)sSubDir1 sSubDir1 ------------------------------- ****104;38;7(text:p)end sub end sub ------------------------------- ****106;38;36(text:p)' Converts a system path in URL ' Converteert een systeempad in URL ------------------------------- ****107;38;46(text:p)Function fSysURL( fSysFp as String ) as String Function fSysURL( fSysFp as String ) as String ------------------------------- ****108;54;9(text:p)Dim iPos Dim iPos ****108;72;9(text:p)As String as String ------------------------------- ****109;54;8(text:p)iPos = 1 iPos = 1 ------------------------------- ****110;54;45(text:p)iPos = Instr(iPos,fSysFp, getPathSeparator()) iPos = Instr(iPos,fSysFp, getPathSeparator()) ------------------------------- ****111;54;20(text:p)do while iPos > 0 do while iPos > 0 ------------------------------- ****112;70;36(text:p)mid( fSysFp, iPos , 1,"/") mid( fSysFp, iPos , 1,"/") ------------------------------- ****113;70;47(text:p)iPos = Instr(iPos+1,fSysFp, getPathSeparator()) iPos = Instr(iPos+1,fSysFp, getPathSeparator()) ------------------------------- ****114;54;4(text:p)loop loop ------------------------------- ****115;54;25(text:p)' the colon with DOS ' de dubbele punt met DOS ------------------------------- ****116;54;36(text:p)iPos = Instr(1,fSysFp,":") iPos = Instr(1,fSysFp,":") ------------------------------- ****117;54;56(text:p)if iPos > 0 then mid( fSysFp, iPos , 1,"|") if iPos > 0 then mid( fSysFp, iPos , 1,"|") ------------------------------- ****118;54;42(text:p)fSysURL = "file://" & fSysFp fSysURL = "file://" & fSysFp ------------------------------- ****119;38;12(text:p)End Function end function ####Text\SBASIC\COMMON\03020412.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;24(subject)Name statement [Runtime] Name argument [Runtime] ------------------------------- ****66;58;24(help:link)Name statement [Runtime] Name argument [Runtime] ****67;39;38(text:p)Renames an existing file or directory. Hernoemt een bestaand bestand of bestaande map. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;44(text:p)Name OldName As String As NewName As String Name OudeNaam as String as NieuweNaam as String ****70;105;4(keyword)Name Name ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;90(text:p)OldName, NewName: Any string expression that specifies the file name, including path. The OudeNaam, NieuweNaam: Elke String-uitdrukking die de bestandsnaam specificeert, met inbegrip van het pad. De ****72;166;12(help:link)URL notation URL notatie ****72;190;23() can also be used here. kan hier ook worden gebruikt. ------------------------------- ****73;39;96(text:p)If the path is not determined, the specified directory will be created in the current directory. Als het pad niet wordt bepaald, zal de gespecificeerde map worden gemaakt in de huidige map. ------------------------------- ****74;32;8(text:p)Example: Voorbeeld: ------------------------------- ****75;38;17(text:p)Sub ExampleReName Sub VoorbeeldReName ------------------------------- ****76;38;19(text:p)On Error Goto Error On Error Goto Error ------------------------------- ****77;38;70(text:p)Filecopy "c:\autoexec.bat", "c:\temp\autoexec.sav" Filecopy "c:\autoexec.bat", "c:\temp\autoexec.sav" ------------------------------- ****78;38;73(text:p)Name "c:\test\autoexec.sav" as "c:\temp\autoexec.bat" Name "c:\test\autoexec.sav" as "c:\temp\autoexec.bat" ------------------------------- ****79;38;3(text:p)end end ------------------------------- ****80;38;6(text:p)Error: Error: ------------------------------- ****81;38;16(text:p)if err = 76 then if err = 76 then ------------------------------- ****82;38;38(text:p)msgbox "File already exists" msgbox "Bestand bestaat reeds!!" ------------------------------- ****83;38;6(text:p)end if end if ------------------------------- ****84;38;3(text:p)end end ------------------------------- ****85;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03020413.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;25(subject)RmDir statement [Runtime] RmDir argument [Runtime] ------------------------------- ****66;58;25(help:link)RmDir statement [Runtime] RmDir argument [Runtime] ****67;39;49(text:p)Deletes an existing directory from a data medium. Verwijdert een bestaande map van een gegevensmedium. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;21(text:p)RmDir Text As String RmDir Tekst as String ****70;82;5(keyword)RmDir RmDir ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;97(text:p)Text: Any string expression that specifies the name and path of the directory to be created. The Tekst: Elke String-uitdrukking die de naam en pad van de map specificeert die moet worden verwijdert. De ****72;173;12(help:link)URL notation URL notatie ****72;197;23() can also be used here. kan hier ook worden gebruikt. ------------------------------- ****73;39;35(text:p)If the path is not determined, the Als het pad niet wordt bepaald, het ****73;106;15(text:span)RmDir statement RmDir argument ****73;133;31() will search for the specified zal zoeken naar de gespecificeerde ****73;173;86()directory in the current path. If it is not found there, an error message will appear. map in het huidige pad. Als het daar niet wordt gevonden, zal een foutboodschap verschijnen. ------------------------------- ****74;32;8(text:p)Example: Voorbeeld: ------------------------------- ****75;38;16(text:p)Sub ExampleRmDir Sub VoorbeeldRmDir ------------------------------- ****76;38;26(text:p)MkDir "C:\Test2" MkDir "C:\Test2" ------------------------------- ****77;38;26(text:p)ChDir "C:\test2" ChDir "C:\test2" ------------------------------- ****78;38;13(text:p)msgbox Curdir msgbox Curdir ------------------------------- ****79;38;19(text:p)ChDir "\" ChDir "\" ------------------------------- ****80;38;26(text:p)RmDir "C:\test2" RmDir "C:\test2" ------------------------------- ****81;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03020414.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;27(subject)SetAttr statement [Runtime] SetAttr argument [Runtime] ------------------------------- ****66;58;27(help:link)SetAttr statement [Runtime] SetAttr argument [Runtime] ****67;39;52(text:p)Sets the attribute information for a specified file. Stelt de attribuutinformatie voor een gespecificeerd bestand in. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;49(text:p)SetAttr FileName As String, Attribute As Integer SetAttr BestandsNaam as String, Attribuut as Integer ****70;110;7(keyword)SetAttr SetAttr ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;109(text:p)FileName: Name of the file, including path, for which to test attributes. If no path specification is given, BestandsNaam: Naam van het bestand, met inbegrip van het pad, waarvan de attributen moeten worden getest. Als er geen padspecificatie wordt opgegeven, ****72;180;7(text:span)SetAttr SetAttr ****72;209;52()searches for the file in the current directory. The zoekt naarr het bestand in de huidige map. De ****72;298;12(help:link)URL notation URL notatie ****72;322;23() can also be used here. kan hier ook worden gebruikt. ------------------------------- ****73;39;74(text:p)Attribute: Bit pattern defining the attributes to be set or to be cleared: Attribuut: Bitpatroon dat de attributen definieert die moeten worden ingesteld of moeten worden verwijderd: ------------------------------- ****74;32;5(text:p)Value Waarde ------------------------------- ****75;39;17(text:p)0 : Normal files. 0 : Normale bestanden. ------------------------------- ****76;39;20(text:p)1 : Read-only files. 1 : Alleen-lezen bestanden. ------------------------------- ****77;39;17(text:p)2 : Hidden files. 2 : Verborgen bestanden. ------------------------------- ****78;39;17(text:p)4 : System files. 4 : Systeembestanden. ------------------------------- ****79;39;54(text:p)32 : File was changed since last backup (Archive bit). 32 : Bestand werd veranderd sinds laatste reservekopie (Archief-bit). ------------------------------- ****80;39;93(text:p)You can set multiple attributes by combining the respective values with a logic OR statement. U kunt meerdere attributen opgeven door de respectievelijke waarden met een logisch OR-argument te combineren. ------------------------------- ****81;32;8(text:p)Example: Voorbeeld: ------------------------------- ****82;38;21(text:p)Sub ExampleSetGetAttr Sub VoorbeeldSetGetAttr ------------------------------- ****83;38;62(text:p)On Error Goto ErrorHandler REM Define target for error-handler On error goto FoutBehandelaar REM Definieer doel voor Foutbehandeling ------------------------------- ****84;38;74(text:p)If Dir("C:\test",16)="" Then MkDir "C:\test" if Dir("C:\test",16)="" then MkDir "C:\test" ------------------------------- ****85;38;129(text:p)If Dir("C:\test\autoexec.sav")="" THEN Filecopy "c:\autoexec.bat", "c:\test\autoexec.sav" if Dir("C:\test\autoexec.sav")="" then Filecopy "c:\autoexec.bat", "c:\test\autoexec.sav" ------------------------------- ****86;38;43(text:p)SetAttr "c:\test\autoexec.sav" ,0 SetAttr "c:\test\autoexec.sav" ,0 ------------------------------- ****87;38;70(text:p)Filecopy "c:\autoexec.bat", "c:\test\autoexec.sav" Filecopy "c:\autoexec.bat", "c:\test\autoexec.sav" ------------------------------- ****88;38;43(text:p)SetAttr "c:\test\autoexec.sav" ,1 SetAttr "c:\test\autoexec.sav" ,1 ------------------------------- ****89;38;49(text:p)print GetAttr( "c:\test\autoexec.sav" ) print GetAttr( "c:\test\autoexec.sav" ) ------------------------------- ****90;38;3(text:p)end end ------------------------------- ****91;38;13(text:p)ErrorHandler: FoutBehandelaar: ------------------------------- ****92;38;11(text:p)Print Error Print Error ------------------------------- ****93;38;3(text:p)end end ------------------------------- ****94;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03020415.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;29(subject)FileExists Function [Runtime] FileExists functie [Runtime] ------------------------------- ****66;58;29(help:link)FileExists Function [Runtime] FileExists functie [Runtime] ****67;39;73(text:p)Determines whether a file or a directory is available on the data medium. Bepaalt of een bestand of een map beschikbaar is op het gegevensmedium. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;57(text:p)FileExists(FileName As String | DirectoryName As String) FileExists(BestandsNaam as String | MapNaam as String ) ****70;118;10(keyword)FileExists FileExists ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;4(text:p)Bool Bool ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;101(text:p)FileName | DirectoryName: Any string expression that contains an unambiguous file specification. The BestandsNaam | MapNaam: Elke String-uitdrukking die een ondubbelzinnige bestandsspecificatie bevat . De ****74;177;12(help:link)URL notation URL notatie ****74;201;23() can also be used here. kan hier ook worden gebruikt. ------------------------------- ****75;32;8(text:p)Example: Voorbeeld: ------------------------------- ****76;38;21(text:p)sub ExampleFileExists sub VoorbeeldFileExists ------------------------------- ****78;38;46(text:p)msgbox FileExists("C:\autoexec.bat") msgbox FileExists("C:\autoexec.bat") ------------------------------- ****79;38;54(text:p)msgbox FileExists("file:///d|/bookmark.htm") msgbox FileExists("file:///d|/bladwijzer.htm") ------------------------------- ****80;38;49(text:p)msgbox FileExists("file:///d|/private") msgbox FileExists("file:///d|/prive") ------------------------------- ****81;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03030000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;23(subject)Date and Time Functions Datum en Tijd functies ------------------------------- ****76;58;23(help:link)Date and Time Functions Datum en Tijd functies ****77;39;194(text:p)The statements and functions described here are used to perform date and time calculations. With the aid of these functions, for example, you can calculate the difference between times or dates. De argumenten en functies hier beschreven worden gebruikt om datum en tijd berekeningen uit te voeren. Met behulp van deze functies kunt u, bijvoorbeeld, het verschil tussen tijden of datums berekenen. ------------------------------- ****79;39;254(text:p)Normally, it is not possible to calculate differences with either time or date functions. If you subtract the string "12:30:45" from "12:45:21" to determine the difference between the two values, this would lead to incorrect results. Normaal is het niet mogelijk om verschillen te berekenen, noch met tijd-, noch met datumfuncties. Als u de tekenreeks "12:30:45" van "12:45:21" aftrekt om het verschil tussen de twee waarden te bepalen, zou dit zou leiden tot onjuiste resultaten. ****79;311;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****79;342;243() Basic, however, makes this possible by converting time (or date) values to continuous numeric values, thus enabling normal calculation. After calculation, special functions are used to reconvert the values to the standard time or date format. BASIC echter, maakt dit mogelijk door het omzetten van tijd- (of datum) waarden naar continue numerieke waarden, aldus normale berekening mogelijk makend. Na berekening, worden speciale functies gebruikt om de waarden weer terug te zetten naar het BASIC tijd- of datumformaat. ------------------------------- ****89;45;244(text:p)Date and time values can be combined. Converted date values never have decimal places; whereas time values consist only of decimal places. This enables date and time values to be combined by simple addition to a single floating-decimal number. Datum- en tijdwaarden kunnen worden gecombineerd. Geconverteerde datumwaarden hebben nooit decimale plaatsen; terwijl tijdwaarden alleen uit decimale plaatsen bestaan. Dit maakt het mogelijk datum- en tijdwaarden te worden gecombineerd door eenvoudige optelling naar een enkel verplaatsende-komma-getal. ****89;307;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****89;338;114() Basic supports the variable type Date, which can contain a time specification consisting of both a date and time. BASIC ondersteunt het variabeletype Date, dat een tijdspecificatie, bestaande uit een datum en een tijd, kan bevatten. ####Text\SBASIC\COMMON\03030100.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)Converting Date Values Omzetten datumwaarden ------------------------------- ****57;58;22(help:link)Converting Date Values Omzetten datumwaarden ****58;39;96(text:p)Here you will find all functions used for converting date values to calculable numbers and back. Hier zult u alle functies vinden gebruikt voor het omzetten van datumwaarden naar berekenbare getallen en terug. ####Text\SBASIC\COMMON\03030101.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;29(subject)DateSerial Function [Runtime] DateSerial functie [Runtime] ------------------------------- ****68;80;29(help:link)DateSerial Function [Runtime] DateSerial functie [Runtime] ****69;39;10(text:p)Returns a Geeft weer een ****69;81;4(text:span)Date Datum ****69;97;44() value for a specified year, month, and day. waarde voor een gespecificeerd jaar, maand en dag. ------------------------------- ****71;71;6(text:span)Syntax Syntaxis ****71;89;1(): : ------------------------------- ****72;39;30(text:p)DateSerial (year, month, day) DateSerial (jaar, maand, dag) ****72;91;10(keyword)DateSerial DateSerial ------------------------------- ****73;71;12(text:span)Return value Resultaatwaarde ****73;95;1(): : ------------------------------- ****74;39;4(text:p)Date Date ------------------------------- ****75;71;9(text:span)Parameter Parameter ****75;92;1(): : ------------------------------- ****76;39;175(text:p)Year: Integer expression that indicates the year. All values between 0 and 99 are interpreted as the years 1900?1999. For other year arguments, you must enter all four digits. Jaar: Integer-uitdrukking die het jaar aangeeft. Alle waarden tussen 0 en 99 worden opgevat als de jaren 1900?1999. Voor andere jaarargumenten moet u alle vier cijfers intoetsen. ------------------------------- ****77;39;113(text:p)Month: Integer expression that indicates the month of the specified year. The accepted range is between 1 and 12. Maand: Integer- uitdrukking die de maand van het gespecificeerde jaar aangeeft. Het geaccepteerde bereik ligt tussen 1 en 12. ------------------------------- ****78;39;177(text:p)Day: Integer expression that indicates the day of the specified month. The accepted range is between 1 and 28, 29, 30 or 31 (depending on the number of days in the given month). Dag: Integer-uitdrukking die de dag van de gespecificeerde maand aangeeft. Het geaccepteerde bereik ligt tussen 1 en 28, 29, 30 of 31 (afhankelijk van het aantal dagen in de opgegeven maand). ------------------------------- ****79;39;4(text:p)The De ****79;75;19(text:span)DateSerial function DateSerial functie ****79;106;145() returns the number of days between December 30,1899 and the given date. You can use this function to calculate the difference between two dates. geeft het aantal dagen tussen 30 December 1899 en de opgegeven datum weer. U kunt deze functie gebruiken om het verschil tussen twee datums te berekenen. ------------------------------- ****80;39;234(text:p)The function returns the data type Variant with VarType 7 (Date); internally, this value is stored as a Double value. Thus, 1.1.1900 results in the value 2. Negative values correspond to dates before December 30, 1899 (not inclusive). De functie geeft het datatype Variant met VarType 7 (Date) weer; intern wordt deze waarde opgeslagen als een Double-waarde. Daarom resulteert 1.1.1900 in de waarde 2. Negatieve waarden komen overeen met datums vóór 30 December 1899 (niet inclusief). ------------------------------- ****81;39;63(text:p)If a date is defined which lies outside of the accepted range, Als een datum wordt gedefinieerd die buiten het geaccepteerd bereik ligt , ****81;120;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****81;151;32() Basic returns an error message. BASIC geeft een foutboodschap weer. ------------------------------- ****82;39;22(text:p)The difference to the Het verschil met de ****82;93;18(text:span)DateValue function DateValue functie ****82;123;102() is that there you define the function argument as a string which contains the date. In contrast, the is dat u daar het functieargument als een tekenreeks definieert, welke de datum bevat. In tegenstelling daaraan, de ****82;257;19(text:span)DateSerial function DateSerial functie ****82;288;85() evaluates each of the parameters (year, month, day) as separate numeric expressions. evalueert elk van de parameters (jaar, maand, dag) als gescheiden numerieke uitdrukkingen. ------------------------------- ****83;32;8(text:p)Example: Voorbeeld: ------------------------------- ****84;38;21(text:p)Sub ExampleDateSerial Sub VoorbeeldDateSerial ------------------------------- ****85;38;17(text:p)Dim lDate as Long Dim lDate as Long ------------------------------- ****86;38;19(text:p)Dim sDate as String Dim sDate as String ------------------------------- ****87;38;30(text:p)lDate = DateSerial(1964, 4, 9) lDate = DateSerial(1964, 4, 9) ------------------------------- ****88;38;30(text:p)sDate = DateSerial(1964, 4, 9) sDate = DateSerial(1964, 4, 9) ------------------------------- ****89;38;30(text:p)msgbox lDate REM returns 23476 msgbox lDate REM geeft weer 23476 ------------------------------- ****90;38;44(text:p)msgbox sDate REM returns 09.04.1964 00:00:00 msgbox sDate REM geeft weer 09.04.1964 00:00:00 ------------------------------- ****91;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03030102.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;28(subject)DateValue Function [Runtime] DateValue functie [Runtime] ------------------------------- ****68;58;28(help:link)DateValue Function [Runtime] DateValue functie [Runtime] ****69;39;174(text:p)Returns a number from a date string, which represents a complete date in a single numeric value. You can use this serial number to determine the difference between two dates. Geeft een getal uit een datum-tekenreeks weer, die een complete datum in een enkele numerieke waarde voorstelt. U kunt dit seriële getal gebruiken om het verschil tussen twee datums te bepalen. ------------------------------- ****71;71;6(text:span)Syntax Syntaxis ****71;89;1(): : ------------------------------- ****72;39;19(text:p)DateValue [(date)] DateValue [(datum)] ****72;80;9(keyword)DateValue DateValue ------------------------------- ****73;71;12(text:span)Return value Resultaatwaarde ****73;95;1(): : ------------------------------- ****74;39;4(text:p)Long Long ------------------------------- ****75;71;9(text:span)Parameter Parameter ****75;92;1(): : ------------------------------- ****76;39;200(text:p)Date: String expression that contains the date to be calculated, and can be specified in almost any format. For example, the date "06.12.1995" can be defined in any of the following formats: Datum: Long Integer-uitdrukking die bevat de datum om te berekenen en kan worden gespecificeerd in bijna elke opmaak. Bijvoorbeeld, de datum "06.12.1995" kan worden gedefinieerd in elke van de volgende formaten: ------------------------------- ****77;39;10(text:p)06.12.1995 06.12.1995 ------------------------------- ****78;39;7(text:p)6.12.95 6.12.95 ------------------------------- ****79;39;9(text:p)6.12.1995 6.12.1995 ------------------------------- ****80;39;10(text:p)6.12, 1995 6.12, 1995 ------------------------------- ****81;39;11(text:p)06.12, 1995 06.12, 1995 ------------------------------- ****82;39;8(text:p)06,12.95 06,12.95 ------------------------------- ****83;39;9(text:p)6,12.1995 6,12.1995 ------------------------------- ****84;39;13(text:p)June 12, 1995 Juni 12, 1995 ------------------------------- ****85;39;9(text:p)Jun 12 95 Jun 12 95 ------------------------------- ****86;39;12(text:p)Jun 12, 1995 Jun 12, 1995 ------------------------------- ****87;39;10(text:p)Jun 12, 95 Jun 12, 95 ------------------------------- ****88;39;10(text:p)06/12/1995 06/12/1995 ------------------------------- ****89;39;9(text:p)Jun/12/95 Jun/12/95 ------------------------------- ****90;39;248(text:p)With this function, you can also convert a date between December 1, 1582 and December 31, 9999 to a single integer value, which can then be used to calculate the difference between two dates. If the date argument lies outside the acceptable range, Met deze functie kunt u ook een datum tussen 1 December 1582 en 31 December 9999 omzetten naar een enkele Integer-waarde, welke dan kan worden gebruikt om het verschil tussen twee datums te berekenen. Als het datum-argument buiten het acceptabele bereik ligt, ****90;305;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****90;336;32() Basic returns an error message. BASIC geeft een foutboodschap weer. ------------------------------- ****91;39;208(text:p)In contrast to the DateSerial function where year, month and day are passed as separate numeric values, for the DateValue function a string expression is passed in the format "month.[,]day.[,]year". In tegenstelling tot de DateSerial-functie waar jaar, maand en dag worden doorgegeven als gescheiden numerieke waarden, wordt voor de DateValue-functie een tekenreeks uitdrukking doorgegeven in de opmaak "maand.[,]dag.[,]jaar". ------------------------------- ****92;32;8(text:p)Example: Voorbeeld: ------------------------------- ****93;38;20(text:p)Sub ExampleDateValue Sub VoorbeeldDateValue ------------------------------- ****94;38;64(text:p)msgbox DateValue("12/02/1997") REM 12.12.1997 00:00:00 msgbox DateValue("12/02/1997") REM 12-12-1997 ------------------------------- ****95;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03030103.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)Day Function [Runtime] Day functie [Runtime] ------------------------------- ****66;58;22(help:link)Day Function [Runtime] Day functie [Runtime] ****67;39;95(text:p)Returns a value representing the day of the month based on a serial date number generated with Geeft een waarde weer die de dag van de maand vertegenwoordigd, gebaseerd op een serieel datum-getal gegenereerd met ****67;166;10(text:span)DateSerial DateSerial ****67;188;4() or of ****67;224;9(text:span)DateValue DateValue ****67;245;1(). . ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;13(text:p)Day (Number) Day (Getal) ****70;74;3(keyword)Day Day ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;7(text:p)Integer Integer ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;106(text:p)Number: A numeric expression containing a serial date number from which to determine the day of the month. Getal: Een numerieke uitdrukking die een serieel datum-getal bevat waaruit de dag van de maand wordt bepaald. ------------------------------- ****75;39;145(text:p)This function is basically the reverse of the DateSerial function, and returns the day of the month from a serial date number generated with the Deze functie is, simpel gezegd, het omgekeerde van de DateSerial-functie, en geeft de dag van de maand uit een serieel datum-getal weer, gegenereerd met de ****75;216;10(text:span)DateSerial DateSerial ****75;238;4() or of ****75;274;9(text:span)DateValue DateValue ****75;295;31() function. Thus, the expression functie. Daarom, de uitdrukking ------------------------------- ****76;39;35(text:p)Print Day(DateSerial(1994, 12, 20)) Print Day(DateSerial(1994, 12, 20)) ------------------------------- ****77;39;21(text:p)returns the value 20. geeft de waarde 20 weer. ------------------------------- ****78;32;8(text:p)Example: Voorbeeld: ------------------------------- ****79;38;14(text:p)sub ExampleDay sub VoorbeeldDay ------------------------------- ****80;38;90(text:p)Print "Day " & Day(DateSerial(1994, 12, 20)) & " of the month" Print "Dag " & Day(DateSerial(1994, 12, 20)) & " van de maand" ------------------------------- ****81;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03030104.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;24(subject)Month Function [Runtime] Month functie [Runtime] ------------------------------- ****66;58;24(help:link)Month Function [Runtime] Month functie [Runtime] ****67;39;86(text:p)Returns the month of the year from a serial date generated by DateSerial or DateValue. Geeft de maand van het jaar weer, gegenereerd uit een seriële datum door DateSerial of DateValue. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;15(text:p)Month (Number) Month (Getal) ****70;76;5(keyword)Month Month ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;7(text:p)Integer Integer ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;110(text:p)Number: Numeric expression that contains the serial date number from which to determine the month of the year. Getal: Numerieke uitdrukking die het seriële datum-getal bevat waaruit de maand van het jaar wordt bepaald. ------------------------------- ****75;39;41(text:p)This function is the inverse function of Deze functie is de afgeleide functie van ****75;112;10(text:span)DateSerial DateSerial ****75;134;77(). It returns the month in a year of a correpsonding serial date generated by . Het geeft de maand in een jaar weer van een corresponderende seriële datum gegenereerd door ****75;243;10(text:span)DateSerial DateSerial ****75;265;4() or of ****75;301;9(text:span)DateValue DateValue ****75;322;22(). Thus, the expression . Daarom, de uitdrukking ------------------------------- ****76;39;37(text:p)Print Month(DateSerial(1994, 12, 20)) print Month(DateSerial(1994, 12, 20)) ------------------------------- ****77;39;21(text:p)returns the value 12. geeft de waarde 12 weer. ------------------------------- ****78;32;8(text:p)Example: Voorbeeld: ------------------------------- ****79;38;16(text:p)Sub ExampleMonth Sub VoorbeeldMonth ------------------------------- ****80;38;70(text:p)MsgBox "" & Month(Now) ,64,"The current month" MsgBox "" & Month(Now) ,64,"De actuele maand" ------------------------------- ****81;38;7(text:p)End sub end sub ####Text\SBASIC\COMMON\03030105.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;26(subject)WeekDay Function [Runtime] WeekDay functie [Runtime] ------------------------------- ****66;58;26(help:link)WeekDay Function [Runtime] WeekDay functie [Runtime] ****67;39;113(text:p)Returns the number corresponding to the weekday from a serial date number generated with DateSerial or DateValue. Geeft het getal weer overeenkomend met de weekdag van een serieel datum-getal gegenereerd met DateSerial of DateValue. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;17(text:p)WeekDay (Number) WeekDay (Getal) ****70;78;7(keyword)WeekDay WeekDay ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;7(text:p)Integer Integer ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;106(text:p)Number: Integer expression that contains the serial date number from which to calculate the weekday (1-7). Getal: Integer-uitdrukking die het serieel datum-getal bevat waaruit de weekdag (1-7) wordt berekend. ------------------------------- ****75;39;106(text:p)The following example enables you to enter a date, and it calculates the weekday via the WeekDay function. Het volgende voorbeeld maakt het u mogelijk om een datum in te voeren en het berekent de weekdag via de WeekDay-functie. ------------------------------- ****76;32;8(text:p)Example: Voorbeeld: ------------------------------- ****77;38;18(text:p)Sub ExampleWeekDay Sub VoorbeeldWeekDay ------------------------------- ****78;38;18(text:p)Dim sDay As String Dim sDay as String ------------------------------- ****79;38;42(text:p)REM Return and display the day of the week REM Bereken en geef de dag van de week weer ------------------------------- ****80;38;26(text:p)Select Case WeekDay( Now ) Select Case WeekDay( Now ) ------------------------------- ****81;38;6(text:p)case 1 case 1 ------------------------------- ****82;38;23(text:p)sDay="Sunday" sDay="Zondag" ------------------------------- ****83;38;6(text:p)case 2 case 2 ------------------------------- ****84;38;23(text:p)sDay="Monday" sDay="Maandag" ------------------------------- ****85;38;6(text:p)case 3 case 3 ------------------------------- ****86;38;24(text:p)sDay="Tuesday" sDay="Dinsdag" ------------------------------- ****87;38;6(text:p)case 4 case 4 ------------------------------- ****88;38;26(text:p)sDay="Wednesday" sDay="Woensdag" ------------------------------- ****89;38;6(text:p)case 5 case 5 ------------------------------- ****90;38;25(text:p)sDay="Thursday" sDay="Donderdag" ------------------------------- ****91;38;6(text:p)case 6 case 6 ------------------------------- ****92;38;23(text:p)sDay="Friday" sDay="Vrijdag" ------------------------------- ****93;38;6(text:p)case 7 case 7 ------------------------------- ****94;38;25(text:p)sDay="Saturday" sDay="Zaterdag" ------------------------------- ****95;38;10(text:p)End Select End Select ------------------------------- ****96;38;50(text:p)msgbox "" + sDay,64,"Today is" msgbox "" + sDay,64,"Vandaag is het" ------------------------------- ****97;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03030106.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;23(subject)Year Function [Runtime] Year functie [Runtime] ------------------------------- ****66;58;23(help:link)Year Function [Runtime] Year functie [Runtime] ****67;39;82(text:p)Returns the year from a serial date number generated with DateSerial or DateValue. Geeft het jaar uit een serieel datum-getal weer, gegenereerd met DateSerial of DateValue. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;14(text:p)Year (Number) Year (Getal) ****70;75;4(keyword)Year Year ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;7(text:p)Integer Integer ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;97(text:p)Number: Integer expression that contains the serial date number from which to calculate the year. Getal: Integer-uitdrukking die het serieel datum-getal bevat waaruit het jaar wordt berekend. ------------------------------- ****75;39;49(text:p)This function represents the inverse function of Deze functie stelt de afgeleide functie voor van ****75;120;10(text:span)DateSerial DateSerial ****75;142;66(). The function returns the year from a serial date generated with . De functie geeft het jaar van een seriële datum weer, gegenereerd met ****75;240;10(text:span)DateSerial DateSerial ****75;262;4() or of ****75;298;9(text:span)DateValue DateValue ****75;319;29(). For example, the expression . Bijvoorbeeld, de uitdrukking ------------------------------- ****76;39;36(text:p)Print Year(DateSerial(1994, 12, 20)) print Year(DateSerial(1994, 12, 20)) ------------------------------- ****77;39;23(text:p)returns the value 1994. geeft de waarde 1994 weer. ------------------------------- ****78;32;8(text:p)Example: Voorbeeld: ------------------------------- ****79;38;15(text:p)Sub ExampleYear Sub VoorbeeldYear ------------------------------- ****80;38;64(text:p)MsgBox "" & Year(Now) ,64,"Current year" MsgBox "" & Year(Now) ,64,"Het actuele jaar is:" ------------------------------- ****81;38;7(text:p)End sub end sub ####Text\SBASIC\COMMON\03030107.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;29(subject)CDateToIso Function [Runtime] CDateToIso functie [Runtime] ------------------------------- ****66;59;29(help:link)CDateToIso Function [Runtime] CDateToIso functie [Runtime] ****67;40;105(text:p)Returns the date in ISO format from a serial date number that was generated with DateSerial or DateValue. Geeft de datum in ISO-formaat weer uit een serieel datum-getal dat was gegenereerd met DateSerial of DateValue. ------------------------------- ****69;72;6(text:span)Syntax Syntaxis ****69;90;1(): : ------------------------------- ****70;40;19(text:p)CDateToIso(Number) CDateToIso(Getal) ****70;81;10(keyword)CDateToIso CDateToIso ------------------------------- ****71;72;12(text:span)Return value Resultaatwaarde ****71;96;1(): : ------------------------------- ****72;40;6(text:p)String String ------------------------------- ****73;72;9(text:span)Parameter Parameter ****73;93;1(): : ------------------------------- ****74;40;54(text:p)Number : Integer that contains the serial date number. Getal : Integer die het seriële datum-getal bevat. ------------------------------- ****75;33;8(text:p)Example: Voorbeeld: ------------------------------- ****76;39;21(text:p)Sub ExampleCDateToIso Sub VoorbeeldCDateToIso ------------------------------- ****77;39;66(text:p)MsgBox "" & CDateToIso(Now) ,64,"ISO Date" MsgBox "" & CDateToIso(Now) ,64,"ISO Datumformaat" ------------------------------- ****78;39;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03030108.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;31(subject)CDateFromIso Function [Runtime] CDateFromIso functie [Runtime] ------------------------------- ****66;59;31(help:link)CDateFromIso Function [Runtime] CDateFromIso functie [Runtime] ****67;40;79(text:p)Returns the internal date number from a string containing a date in ISO format. Geeft het interne datum-getal uit een tekenreeks die een datum in ISO-formaat bevat. ------------------------------- ****69;72;6(text:span)Syntax Syntaxis ****69;90;1(): : ------------------------------- ****70;40;21(text:p)CDateFromIso(String) CDateFromIso(String) ****70;83;12(keyword)CDateFromIso CDateFromIso ------------------------------- ****71;72;12(text:span)Return value Resultaatwaarde ****71;96;1(): : ------------------------------- ****72;40;20(text:p)Internal date number Intern datum-getal ------------------------------- ****73;72;9(text:span)Parameter Parameter ****73;93;1(): : ------------------------------- ****74;40;80(text:p)String : a string containing an ISO date. The year may have two or four figures. String : een tekenreeks waarin een ISO-datum. Het jaar mag twee of vier cijfers hebben. ------------------------------- ****75;33;8(text:p)Example: Voorbeeld: ------------------------------- ****76;39;44(text:p)dateval = CDateFromIso("20021231") dateval = CDateFromIso("20021231") ------------------------------- ****77;39;52(text:p)returns 12/31/2002 in the date format of your system geeft 31/12/2002 weer in het datumformaat van uw systeem. ####Text\SBASIC\COMMON\03030200.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)Converting Time Values Omzetten tijdwaarden ------------------------------- ****57;58;22(help:link)Converting Time Values Omzetten tijdwaarden ****58;39;88(text:p)The following describes the functions used to convert time values to calculable numbers. Het volgende beschrijft de functies, gebruikt om tijdwaarden te converteren naar berekenbare getallen. ####Text\SBASIC\COMMON\03030201.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;23(subject)Hour Function [Runtime] Hour functie [Runtime] ------------------------------- ****66;58;23(help:link)Hour Function [Runtime] Hour functie [Runtime] ****67;39;72(text:p)Returns the hour from a time value generated by TimeSerial or TimeValue. Geeft het uur van een tijdwaarde weer, gegenereerd door TimeSerial of TimeValue. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;14(text:p)Hour (Number) Hour (Getal) ****70;75;4(keyword)Hour Hour ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;7(text:p)Integer Integer ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;99(text:p)Number: Numeric expression that contains the serial time value from which to return the hour value. Getal: Numerieke uitdrukking die de seriële tijdwaarde bevat waaruit de uurwaarde wordt weergegeven. ------------------------------- ****75;39;36(text:p)This function is the inverse of the Deze functie is de afgeleide van de ****75;107;10(text:span)TimeSerial TimeSerial ****75;129;86() function. It returns an integer representing the hour from a time value generated by functie. Het geeft een Integer-waarde weer die het uur van een tijdwaarde voorstelt, gegenereerd door ****75;247;10(text:span)TimeSerial TimeSerial ****75;269;4() or of ****75;305;9(text:span)TimeValue TimeValue ****75;326;22(). Thus, the expression . Daarom, de uitdrukking ------------------------------- ****76;39;32(text:p)Print Hour(TimeSerial(12:30:41)) print Hour(TimeSerial(12:30:41)) ------------------------------- ****77;39;21(text:p)returns the value 12. geeft de waarde 12 weer. ------------------------------- ****78;32;8(text:p)Example: Voorbeeld: ------------------------------- ****79;38;15(text:p)Sub ExampleHour Sub VoorbeeldHour ------------------------------- ****80;38;45(text:p)Print "The current hour is " & print "Het actuele uur is: " & ****80;92;11(text:p)Hour( Now ) Hour( Now ) ------------------------------- ****81;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03030202.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;25(subject)Minute Function [Runtime] Minute functie [Runtime] ------------------------------- ****66;58;25(help:link)Minute Function [Runtime] Minute functie [Runtime] ****67;39;105(text:p)Returns the minute of the hour corresponding to a serial time value generated by TimeSerial or TimeValue. Geeft de minuut van het uur overeenkomend meteen seriële tijdwaarde, gegenereerd door TimeSerial of TimeValue. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;16(text:p)Minute (Number) Minute (Getal) ****70;77;6(keyword)Minute Minute ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;7(text:p)Integer Integer ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;95(text:p)Number: Numeric expression that contains the serial time value from which to return the minute. Getal: Numerieke uitdrukking die de seriële tijdwaarde bevat, waaruit de minuut wordt weergegeven. ------------------------------- ****75;39;41(text:p)This function is the inverse function of Deze functie is de afgeleide functie van ****75;112;10(text:span)TimeSerial TimeSerial ****75;134;70(). It returns the minute of a specified serial time value generated by . Het geeft de minuut weer uit een gespecificeerde seriële tijdwaarde, gegenereerd door ****75;236;10(text:span)TimeSerial TimeSerial ****75;258;4() or of ****75;294;9(text:span)TimeValue TimeValue ****75;315;22(). Thus, the expression . Daarom, de uitdrukking ------------------------------- ****76;39;34(text:p)Print Minute(TimeSerial(12:30:41)) print Minute(TimeSerial(12:30:41)) ------------------------------- ****77;39;21(text:p)returns the value 30. geeft de waarde 30 weer. ------------------------------- ****78;32;8(text:p)Example: Voorbeeld: ------------------------------- ****79;38;17(text:p)Sub ExampleMinute Sub VoorbeeldMinute ------------------------------- ****80;38;77(text:p)MsgBox "The current minute is "& Minute(Now)& "." MsgBox "De actuele minuut is: "& Minute(Now)& "." ------------------------------- ****81;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03030203.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)Now Function [Runtime] Now functie [Runtime] ------------------------------- ****66;58;22(help:link)Now Function [Runtime] Now functie [Runtime] ****67;39;46(text:p)Returns the current system date and time as a Geeft de huidige systeemdatum en tijd als een ****67;117;4(text:span)Date Date ****67;133;7() value. waarde. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;4(text:p)Now Now ****70;65;3(keyword)Now Now ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;4(text:p)Date Date ------------------------------- ****73;32;8(text:p)Example: Voorbeeld: ------------------------------- ****74;38;14(text:p)Sub ExampleNow Sub VoorbeeldNow ------------------------------- ****75;38;39(text:p)msgbox "It is now " & Now msgbox "Het is nu: " & Now ------------------------------- ****76;38;7(text:p)End sub end sub ####Text\SBASIC\COMMON\03030204.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;25(subject)Second Function [Runtime] Second functie [Runtime] ------------------------------- ****66;58;25(help:link)Second Function [Runtime] Second functie [Runtime] ****67;39;108(text:p)Returns an integer representing the second from the serial time number generated by TimeSerial or TimeValue. Geeft een Integer voorstellende de seconde van het seriële tijd-getal, gegenereerd door TimeSerial of TimeValue. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;16(text:p)Second (Number) Second (Getal) ****70;77;6(keyword)Second Second ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;7(text:p)Integer Integer ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;98(text:p)Number: Numeric expresion that contains the serial time number from which to calculate the second. Getal: Numerieke expressie die het seriële tijd-getal bevat waaruit de seconde wordt berekend. ------------------------------- ****75;39;41(text:p)This function is the inverse function of Deze functie is de afgeleide functie van ****75;112;10(text:span)TimeSerial TimeSerial ****75;134;70(). It returns the second of a specified serial time value generated by . Het geeft de seconde uit een gespecificeerde seriële tijdwaardeweer, gegenereerd door ****75;236;10(text:span)TimeSerial TimeSerial ****75;258;4() or of ****75;294;9(text:span)TimeValue TimeValue ****75;315;22(). Thus, the expression . Daarom, de uitdrukking ------------------------------- ****76;39;34(text:p)Print Second(TimeSerial(12,30,41)) print Second(TimeSerial(12,30,41)) ------------------------------- ****77;39;21(text:p)returns the value 41. geeft de waarde 41 weer. ------------------------------- ****78;32;8(text:p)Example: Voorbeeld: ------------------------------- ****79;38;17(text:p)Sub ExampleSecond Sub VoorbeeldSecond ------------------------------- ****80;38;73(text:p)MsgBox "The exact second of the current time is "& Second( MsgBox "De exacte seconde van de huidige tijd is: "& Second( ****80;120;5(text:p)Now ) Now ) ------------------------------- ****81;38;7(text:p)End sub end sub ####Text\SBASIC\COMMON\03030205.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;29(subject)TimeSerial Function [Runtime] TimeSerial functie [Runtime] ------------------------------- ****66;58;29(help:link)TimeSerial Function [Runtime] TimeSerial functie [Runtime] ****67;39;232(text:p)Calculates a serial time value from the specified hour, minute, and second - parameters passed as numeric values - that represents the time in a single numeric value. This value can be used to calculate the difference between times. Berekent een seriële tijdwaarde uit de gespecificeerde uur, minuut, en seconde - parameters doorgegeven als numerieke waarden - die de tijd in een enkele numerieke waarde voorstellen. Deze waarde kan worden gebruikt om het verschil tussen tijden te berekenen. ------------------------------- ****69;39;10(text:p)See also: Zie ook: ****69;88;19(help:link)DateSerial Function DateSerial functie ****69;119;2(), , ****69;159;18(help:link)TimeValue Function TimeValue functie ****69;189;2(), , ****69;229;18(help:link)DateValue Function DateValue functie ****69;259;1(). . ------------------------------- ****70;71;6(text:span)Syntax Syntaxis ****70;89;1(): : ------------------------------- ****71;39;34(text:p)TimeSerial (hour, minute, second) TimeSerial (uur, minuut, seconde) ****71;95;10(keyword)TimeSerial TimeSerial ------------------------------- ****72;71;12(text:span)Return value Resultaatwaarde ****72;95;1(): : ------------------------------- ****73;39;4(text:p)Date Date ------------------------------- ****74;71;9(text:span)Parameter Parameter ****74;92;1(): : ------------------------------- ****75;39;132(text:p)hour: Any integer expression that indicates the hour of the time, from which to determine the serial time value. Valid values: 0-23. uur: Elke Integer-uitdrukking die het uur van de tijd aangeeft, waaruit de seriële tijdwaarde wordt berekend. Geldige waarden: 0-23. ------------------------------- ****76;39;269(text:p)minute: Any integer expression that indicates the minute of the time, from which to determine the serial time value. Normally you can use values between 0 and 59 here. However, values outside of this range are also possible. In this case the minute influences the hour. minuut: Elke Integer-uitdrukking die de minuut van de tijd aangeeft, waaruit de seriële tijdwaarde wordt berekend. Normaal kunt u hier waarden tussen 0 en 59 gebruiken. Echter, waarden buiten dit bereik zijn ook mogelijk. In dat geval beïnvloedt de minuut het uur. ------------------------------- ****77;39;271(text:p)second: Any integer expression that indicates the second of the time, from which to determine the serial time value. Normally you can use values between 0 and 59 here. However, values outside of this range are also possible. In this case the second influences the minute. tweede: Elke Integer-uitdrukking die x de seconde van de tijd aangeeft, waaruit de seriële tijdwaarde wordt berekend. Normaal kunt u hier waarden tussen 0 en 59 gebruiken. Echter, waarden buiten dit bereik zijn ook mogelijk. In dat geval beïnvloedt de seconde de minuut. ------------------------------- ****78;39;9(text:p)Examples: Voorbeelden: ------------------------------- ****79;39;36(text:p)12, -5, 45 corresponds to 11, 55, 45 12, -5, 45 komt overeen met 11, 55, 45 ------------------------------- ****80;39;35(text:p)12, 61, 45 corresponds to 13, 2, 45 12, 61, 45 komt overeen met 13, 2, 45 ------------------------------- ****81;39;36(text:p)12, 20, -2 corresponds to 12, 19, 58 12, 20, -2 komt overeen met 12, 19, 58 ------------------------------- ****82;39;35(text:p)12, 20, 63 corresponds to 12, 21, 4 12, 20, 63 komt overeen met 12, 21, 4 ------------------------------- ****83;39;112(text:p)With this function, you can convert any time into a single value, with which you can calculate time differences. Met deze functie kunt u een willekeurige tijd omzetten in een enkele waarde, waarmee u tijdverschillen kunt berekenen. ------------------------------- ****84;39;396(text:p)The TimeSerial function returns the type Variant with VarType 7 (Date); this value is stored internally as a double-precision number between 0 and 0.9999999999. As opposed to the DateSerial or DateValue function, in which serial date values are calculated resulting in days relative to a fixed date, you can calculate with values returned by the TimeSerial function, but you cannot evaluate them. De TimeSerial-functie geeft het type Variant weer met VarType 7 (Date); deze waarde wordt intern opgeslagen als een double-precision getal tussen 0 en 0,9999999999. Als tegengestelde aan de DateSerial- of DateValue-functie, waarin seriële datumwaarden worden berekend resulterend in dagen, relatief naar een vaste datum, kunt u waarden, weergegeven door de TimeSerial -functie, berekenen, maar u kunt ze niet evalueren. ------------------------------- ****85;39;217(text:p)In the TimeValue function, you can pass a string as a parameter containing the time. For the TimeSerial function, however, you can pass the individual parameters (hour, minute, second) as separate numeric expressions. In de TimeValue-functie kunt u een tekenreeks opgeven als een parameter die de tijd bevat. Voor de TimeSerial-functie, echter, kunt u de individuele parameters (uur, minuut, seconde) opgeven als gescheiden numerieke uitdrukkingen. ------------------------------- ****86;32;8(text:p)Example: Voorbeeld: ------------------------------- ****87;38;21(text:p)Sub ExampleTimeSerial Sub VoorbeeldTimeSerial ------------------------------- ****88;38;36(text:p)Dim dDate As Double, sDate As String Dim dDate as Double, sDate as String ------------------------------- ****89;38;27(text:p)dDate = TimeSerial(8,30,15) dDate = TimeSerial(8,30,15) ------------------------------- ****90;38;27(text:p)sDate = TimeSerial(8,30,15) sDate = TimeSerial(8,30,15) ------------------------------- ****91;38;44(text:p)MsgBox dDate,64,"Time as a number" MsgBox dDate,64,"Tijd als een getal" ------------------------------- ****92;38;42(text:p)MsgBox sDate,64,"Formatted time" MsgBox sDate,64,"Opgemaakte tijd" ------------------------------- ****93;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03030206.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;28(subject)TimeValue Function [Runtime] TimeValue functie [Runtime] ------------------------------- ****66;58;28(help:link)TimeValue Function [Runtime] TimeValue functie [Runtime] ****67;39;225(text:p)Calculates a serial time value from the specified hour, minute, and second - parameters passed as strings - that represents the time in a single numeric value. This value can be used to calculate the difference between times. Berekent een seriële tijdwaarde uit de gespecificeerde uur, minuut en seconde - parameters opgegeven als tekenreeksen - die de tijd in een enkele numerie waarde voorstellen. Deze waarde kan worden gebruikt om het verschil tussen tijden te berekenen. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;27(text:p)TimeValue (Text As String) TimeValue (Tekst as String) ****70;88;9(keyword)TimeValue TimeValue ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;4(text:p)Date Date ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;103(text:p)Text: Any string expression that contains the time to be calculated in the format "HH:MM:SS". Tekst: Elke String-uitdrukking die de te berekenen tijd bevat in het formaat "UU:MM:SS". ------------------------------- ****75;39;112(text:p)With this function, you can convert any time into a single value, with which you can calculate time differences. Met deze functie, kunt u een willekeurige tijd omzetten in een enkele waarde, waarmee u tijdverschillen kunt berekenen. ------------------------------- ****76;39;4(text:p)The De ****76;75;9(text:span)TimeValue TimeValue ****76;96;146() function returns the type Variant with VarType 7 (Date); this value is stored internally as a double-precision number between 0 and 0.9999999999. functie geeft het type Variant weer met VarType 7 (Date); deze waarde wordt intern opgeslagen als een double-precision getal tussen 0 en 0,9999999999. ------------------------------- ****77;39;18(text:p)As opposed to the Als tegengestelde aan de ****77;89;10(text:span)DateSerial DateSerial ****77;111;4() or of ****77;147;9(text:span)DateValue DateValue ****77;168;144() function, in which serial date values are calculated resulting in days relative to a fixed date, you can calculate with values returned by the functie, waarin seriële datumwaarden worden berekend, resulterend in dagen relatief naar een vaste datum, kunt u berekenen met waarden, weergegeven door de ****77;353;9(text:span)TimeValue TimeValue ****77;374;40() function, but you cannot evaluate them. functie, maar u kunt ze niet evalueren. ------------------------------- ****78;39;7(text:p)In the In de ****78;78;10(text:span)TimeSerial TimeSerial ****78;100;114() function, you can pass the individual parameters (hour, minute, second) as separate numeric expressions. For the functie kunt u de individuele parameters (uur, minuut, seconde) opgeven als gescheiden numerieke uitdrukkingen. Voor de ****78;246;9(text:span)TimeValue TimeValue ****78;267;77() function, however, you can pass a string as a parameter containing the time. functie, echter, kunt u een tekenreeks opgeven als een parameter die de tijd bevat. ------------------------------- ****79;32;8(text:p)Example: Voorbeeld: ------------------------------- ****80;38;21(text:p)Sub ExampleTimerValue Sub VoorbeeldTimerValue ------------------------------- ****81;38;16(text:p)Dim daDT as Date Dim daDT as Date ------------------------------- ****82;38;36(text:p)Dim a1, b1, c1, a2, b2, c2 as String Dim a1, b1, c1, a2, b2, c2 as String ------------------------------- ****83;38;27(text:p)a1 = "start time" a1 = "start tijd" ------------------------------- ****84;38;25(text:p)b1 = "end time" b1 = "eind tijd" ------------------------------- ****85;38;27(text:p)c1 = "total time" c1 = "totale tijd" ------------------------------- ****87;38;21(text:p)a2 = "8:34" a2 = "8:34" ------------------------------- ****88;38;22(text:p)b2 = "18:12" b2 = "18:12" ------------------------------- ****89;38;36(text:p)daDT = TimeValue(b2) - TimeValue(a2) daDT = TimeValue(b2) - TimeValue(a2) ------------------------------- ****90;38;51(text:p)c2 = a1 & ": " & a2 & chr(13) c2 = a1 & ": " & a2 & chr(13) ------------------------------- ****91;38;60(text:p)c2 = c2 & b1 & ": " & b2 & chr(13) c2 = c2 & b1 & ": " & b2 & chr(13) ------------------------------- ****92;38;165(text:p)c2 = c2 & c1 & ": " & trim(Str(Hour(daDT))) & ":" & trim(Str(Minute(daDT))) & ":" & trim(Str(Second(daDT))) c2 = c2 & c1 & ": " & trim(Str(Hour(daDT))) & ":" & trim(Str(Minute(daDT))) & ":" & trim(Str(Second(daDT))) ------------------------------- ****93;38;9(text:p)Msgbox c2 Msgbox c2 ------------------------------- ****94;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03030300.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;20(subject)System Date and Time Systeemdatum en tijd ------------------------------- ****57;58;20(help:link)System Date and Time Systeemdatum en tijd ****58;39;98(text:p)Here you will find the functions and statements for setting or returning the system date and time. Hier vindt u de functies en argumenten voor het instellen of weergeven van de systeemdatum en tijd. ####Text\SBASIC\COMMON\03030301.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;24(subject)Date statement [Runtime] Date argument [Runtime] ------------------------------- ****66;58;24(help:link)Date statement [Runtime] Date argument [Runtime] ****67;39;135(text:p)Returns the current system date as a string, or resets the date. The date format is recognized according to your local system settings. Geeft de huidige systeemdatum als een tekenreeks weer, of herstelt de datum. Het datumformaat wordt herkend volgens uw lokale systeeminstellingen. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;29(text:p)Date ; Date = Text As String Date ; Date = Tekst as String ****70;90;4(keyword)Date Date ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;157(text:p)Text: Only required in order to reset the system date. In this case, the string expression must correspond to the date format defined in your local settings. Tekst: Alleen nodig om de systeemdatum te herstellen. In dit geval moet de String-uitdrukking overeenkomen met de datumopmaak, gedefinieerd in uw lokale instellingen. ------------------------------- ****73;32;8(text:p)Example: Voorbeeld: ------------------------------- ****74;38;15(text:p)Sub ExampleDate Sub VoorbeeldDate ------------------------------- ****75;38;42(text:p)msgbox "The date is " & Date msgbox "De datum is :" & Date ------------------------------- ****76;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03030302.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;24(subject)Time statement [Runtime] Time argument [Runtime] ------------------------------- ****66;58;24(help:link)Time statement [Runtime] Time argument [Runtime] ****67;39;93(text:p)This function returns the current system time as a string in the format "HH:MM:SS". Deze functie geeft de huidige systeemtijd als een tekenreeks weer in de opmaak "UU:MM:SS". ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;5(text:p)Time Time ****70;66;4(keyword)Time Time ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;91(text:p)Text: Any string expression that specifies the new time in the format "HH:MM:SS". Tekst: Elke String-uitdrukking die de nieuwe tijd specificeert in het formaat "UU:MM:SS". ------------------------------- ****73;32;8(text:p)Example: Voorbeeld: ------------------------------- ****74;38;15(text:p)Sub ExampleTime Sub VoorbeeldTime ------------------------------- ****75;38;37(text:p)MsgBox Time,0,"The time is" MsgBox Time,0,"De tijd is nu :" ------------------------------- ****76;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03030303.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;24(subject)Timer Function [Runtime] Timer functie [Runtime] ------------------------------- ****84;58;24(help:link)Timer Function [Runtime] Timer functie [Runtime] ****85;39;86(text:p)Returns a value that specifies the number of seconds that have elapsed since midnight. Geeft een waarde weer die het aantal seconden, die zijn verlopen sinds middernacht, specificeert. ------------------------------- ****96;45;122(text:p)You must first declare the variable used to call the Timer function as data type Long, otherwise a Date value is returned. U moet eerst de variabele benoemen die wordt gebruikt om de Timer-functie als gegevenstype Long aan te roepen, anders wordt een Date-waarde weergegeven. ------------------------------- ****102;71;6(text:span)Syntax Syntaxis ****102;89;1(): : ------------------------------- ****103;39;6(text:p)Timer Timer ****103;67;5(keyword)Timer Timer ------------------------------- ****104;71;12(text:span)Return value Resultaatwaarde ****104;95;1(): : ------------------------------- ****105;39;4(text:p)Date Date ------------------------------- ****106;32;8(text:p)Example: Voorbeeld: ------------------------------- ****107;38;16(text:p)Sub ExampleTimer Sub VoorbeeldTimer ------------------------------- ****108;38;43(text:p)Dim lSec as long,lMin as long,lHour as long Dim lSec as Long,lMin as Long,lUur as Long ------------------------------- ****109;38;12(text:p)lSec = Timer lSec = Timer ------------------------------- ****110;38;48(text:p)MsgBox lSec,0,"Seconds since midnight" MsgBox lSec,0,"Aantal seconden sinds middernacht :" ------------------------------- ****111;38;16(text:p)lMin = lSec / 60 lMin = lSec / 60 ------------------------------- ****112;38;18(text:p)lSec = lSec Mod 60 lSec = lSec Mod 60 ------------------------------- ****113;38;17(text:p)lHour = lMin / 60 lUur = lMin / 60 ------------------------------- ****114;38;18(text:p)lMin = lMin Mod 60 lMin = lMin Mod 60 ------------------------------- ****115;38;70(text:p)MsgBox Right("00" & lHour , 2) & ":"& MsgBox Right("00" & lUur , 2) & ":"& ****115;117;63(text:p)Right("00" & lMin , 2) & ":" & Right("00" & lMin , 2) & ":" & ****115;189;63(text:p)Right("00" & lSec , 2) ,0,"The time is" Right("00" & lSec , 2) ,0,"De tijd is :" ------------------------------- ****116;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03050000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;24(subject)Error-Handling Functions Error-Handling functies ------------------------------- ****58;58;24(help:link)Error-Handling Functions Error-Handling functies ****59;39;55(text:p)With these statements and functions you can define how Met deze argumenten en functies kunt u definiëren hoe ****59;112;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****59;143;59() Basic should react to errors during the program execution. BASIC moet reageren op fouten gedurende de uitvoering van het programma. ------------------------------- ****61;57;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****61;88;259() Basic offers various methods for reacting to errors that occur during program execution. In error handling routines you can evaluate these errors and decide how the program should react. This prevents the program from being terminated after a run time error. BASIC biedt verschillende methoden om te reageren op fouten die voorkomen gedurende de uitvoering van het programma. In Foutbehandeling-routines kunt u deze fouten evalueren en beslissen hoe het programma moet reageren. Dit voorkomt dat het programma wordt beëindigd na een Runtime-fout. ------------------------------- ****62;39;72(text:p)The following functions and statements for error handling are supported: de volgende functies en argumenten voor Error-handling (Foutbehandeling) worden ondersteund: ####Text\SBASIC\COMMON\03050100.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)Erl Function [Runtime] Erl functie [Runtime] ------------------------------- ****84;58;22(help:link)Erl Function [Runtime] Erl functie [Runtime] ****85;39;76(text:p)Returns the line number in which an error occurred during program execution. Geeft het regelnummer waarin een fout voorkwam gedurende de uitvoering van het programma. ------------------------------- ****87;71;6(text:span)Syntax Syntaxis ****87;89;1(): : ------------------------------- ****88;39;4(text:p)Erl Erl ****88;65;3(keyword)Erl Erl ------------------------------- ****89;71;12(text:span)Return value Resultaatwaarde ****89;95;1(): : ------------------------------- ****90;39;7(text:p)Integer Integer ------------------------------- ****91;71;9(text:span)Parameter Parameter ****91;92;1(): : ------------------------------- ****102;45;62(text:p)The Erl function returns only a line number, not a line label. De Erl-functie geeft alleen een regelnummer weer, niet een regellabel. ------------------------------- ****108;32;8(text:p)Example: Voorbeeld: ------------------------------- ****109;38;16(text:p)sub ExampleError sub VoorbeeldError ------------------------------- ****110;38;27(text:p)on error goto ErrorHandler on error goto FoutBehandelaar ****110;74;24(text:p)REM Set up error handler REM Stel de Fout-behandeling in ------------------------------- ****111;38;19(text:p)Dim iVar as Integer Dim iVar as Integer ------------------------------- ****112;38;18(text:p)Dim sVar As String Dim sVar as String ------------------------------- ****113;38;37(text:p)REM Error caused by non-existent file REM Fout veroorzaakt door niet-bestaand bestand ------------------------------- ****114;38;15(text:p)iVar = Freefile iVar = Freefile ------------------------------- ****115;38;49(text:p)Open "\file9879.txt" for Input as #iVar Open "\file9879.txt" for Input as #iVar ------------------------------- ****116;38;22(text:p)Line Input #iVar, sVar Line Input #iVar, sVar ------------------------------- ****117;38;11(text:p)Close #iVar Close #iVar ------------------------------- ****118;38;8(text:p)exit sub exit sub ------------------------------- ****119;38;13(text:p)ErrorHandler: FoutBehandelaar: ------------------------------- ****120;38;161(text:p)MsgBox "Error " & err & ": " & error$ + chr(13) + "In line : " + Erl + chr(13) + Now , 16 ,"An error occured" MsgBox "Fout " & err & ": " & error$ + chr(13) + "In regel : " + Erl + chr(13) + Now , 16 ,"Een fout gevonden" ------------------------------- ****121;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03050200.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)Err Function [Runtime] Err functie [Runtime] ------------------------------- ****66;58;22(help:link)Err Function [Runtime] Err functie [Runtime] ****67;39;83(text:p)Returns an error code identifying the error that occurred during program execution. Geeft een foutcode weer die de fout die voorkwam gedurende de uitvoering van het programma identificeert. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;4(text:p)Err Err ****70;65;3(keyword)Err Err ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;7(text:p)Integer Integer ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;101(text:p)The Err function is used in error-handling routines to determine the error and the corrective action. De Err-functie wordt gebruikt in foutbehandeling-routines om de fout en de herstelactie te bepalen. ------------------------------- ****75;32;8(text:p)Example: Voorbeeld: ------------------------------- ****76;38;16(text:p)sub ExampleError sub VoorbeeldError ------------------------------- ****77;38;27(text:p)on error goto ErrorHandler on error goto FoutBehandelaar ****77;74;24(text:p)REM Set up error handler REM Stel Foutbehandeling in ------------------------------- ****78;38;19(text:p)Dim iVar as Integer Dim iVar as Integer ------------------------------- ****79;38;18(text:p)Dim sVar As String Dim sVar as String ------------------------------- ****80;38;41(text:p)REM Error occurs due to non-existent file REM Fout kwam voor vanwege een niet-bestaand bestand ------------------------------- ****81;38;15(text:p)iVar = Freefile iVar = Freefile ------------------------------- ****82;38;49(text:p)Open "\file9879.txt" for Input as #iVar Open "\file9879.txt" for Input as #iVar ------------------------------- ****83;38;22(text:p)Line Input #iVar, sVar Line Input #iVar, sVar ------------------------------- ****84;38;11(text:p)Close #iVar Close #iVar ------------------------------- ****85;38;8(text:p)exit sub exit sub ------------------------------- ****86;38;13(text:p)ErrorHandler: FoutBehandelaar: ------------------------------- ****87;38;162(text:p)MsgBox "Error " & Err & ": " & Error$ + chr(13) + "At line : " + Erl + chr(13) + Now , 16 ,"an error occurred" MsgBox "Fout " & Err & ": " & Error$ + chr(13) + "Op regel : " + Erl + chr(13) + Now , 16 ,"Een fout gevonden" ------------------------------- ****88;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03050300.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;24(subject)Error Function [Runtime] Error functie [Runtime] ------------------------------- ****66;58;24(help:link)Error Function [Runtime] Error functie [Runtime] ****67;39;62(text:p)Returns the error message corresponding to a given error code. Geeft de foutboodschap weer overeenkomstig een bepaalde foutcode. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;19(text:p)Error (Expression) Error (Expressie) ****70;80;5(keyword)Error Error ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;6(text:p)String String ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;100(text:p)Expression: Any numeric expression that contains the error code of the error message to be returned. Expressie: Elke numerieke uitdrukking die de foutcode bevat van de foutboodschap die moet worden weergegeven. ------------------------------- ****75;39;137(text:p)If no parameters are passed, the Error function returns the error message of the most recent error that occured during program execution. Als er geen parameters worden opgegeven, geeft de Error-functie de foutboodschap van de meeste recente fout weer, die voorkwam gedurende de uitvoering van het programma. ------------------------------- ****76;32;8(text:p)Example: Voorbeeld: ------------------------------- ****77;38;16(text:p)sub ExampleError sub VoorbeeldError ------------------------------- ****78;38;51(text:p)on error goto ErrorHandler REM Set up error handler on error goto FoutBehandelaar REM Stel Foutbehandeling in ------------------------------- ****79;38;19(text:p)Dim iVar as Integer Dim iVar as Integer ------------------------------- ****80;38;18(text:p)Dim sVar As String Dim sVar as String ------------------------------- ****81;38;44(text:p)REM An error occurs due to non-existent file REM Een fout kwam voor vanwege een niet-bestaand bestand ------------------------------- ****82;38;15(text:p)iVar = Freefile iVar = Freefile ------------------------------- ****83;38;49(text:p)Open "\file9879.txt" for Input as #iVar Open "\file9879.txt" for Input as #iVar ------------------------------- ****84;38;22(text:p)Line Input #iVar, sVar Line Input #iVar, sVar ------------------------------- ****85;38;11(text:p)Close #iVar Close #iVar ------------------------------- ****86;38;8(text:p)exit sub exit sub ------------------------------- ****87;38;13(text:p)ErrorHandler: FoutBehandelaar: ------------------------------- ****88;38;159(text:p)MsgBox "Error " & err & ": " & error$ + chr(13) + "In line : " + Erl + chr(13) + Now , 16 ,"error occurred" MsgBox "Fout " & err & ": " & error$ + chr(13) + "In regel : " + Erl + chr(13) + Now , 16 ,"Fout gevonden" ------------------------------- ****89;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03050400.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;25(subject)Error-statement [Runtime] Error-argument [Runtime] ------------------------------- ****63;58;25(help:link)Error-statement [Runtime] Error-argument [Runtime] ****64;39;62(text:p)Simulates the occurrence of an error during program execution. Simuleert dat een fout gebeurt gedurende de uitvoering van het programma. ------------------------------- ****66;71;6(text:span)Syntax Syntaxis ****66;89;1(): : ------------------------------- ****67;61;5(keyword)Error Error ****67;85;28(text:p)Error errornumber As Integer Error Foutnummer as Integer ------------------------------- ****68;71;9(text:span)Parameter Parameter ****68;92;1(): : ------------------------------- ****69;39;87(text:p)Errornumber: Integer expression that specifies the number of the error to be simulated. Foutnummer: Integer-uitdrukking die het nummer van de fout die moet worden gesimuleerd specificeert. ------------------------------- ****70;39;217(text:p)The Error statement simulates the occurrence of an error during program execution. An error intercepted by an error-handling routine will not be reported, regardless of whether correcitve action was taken or not. The Het Error-argument simuleert dat een fout voorkwam gedurende de uitvoering van het programma. Een fout, onderschept door een foutbehandeling-routine, zal niet worden gerapporteerd, zonder te letten op het feit of de herstelactie was uitgevoerd of niet. Het ****70;288;15(text:span)Error statement Error-argument ****70;315;25() is used report an error wordt gebruikt om een fout te rapporteren ****70;349;70()when no error-handling routine is enabled, and stop program execution. als er geen foutbehandeling-routine is ingesteld en stopt de programmauitvoering. ------------------------------- ****71;39;8(text:p)Example: Voorbeeld: ------------------------------- ****72;38;16(text:p)sub ExampleError sub VoorbeeldError ------------------------------- ****73;38;27(text:p)on error goto ErrorHandler on error goto FoutBehandelaar ****73;74;24(text:p)REM Set up error handler REM Stel de Foutbehandeling in ------------------------------- ****74;38;19(text:p)Dim iVar as Integer Dim iVar as Integer ------------------------------- ****75;38;18(text:p)Dim sVar As String Dim sVar as String ------------------------------- ****76;38;44(text:p)REM An error occurs due to non-existent file REM Een fout kwam voor vanwege een niet-bestaand bestand ------------------------------- ****77;38;15(text:p)iVar = Freefile iVar = Freefile ------------------------------- ****78;38;49(text:p)Open "\file9879.txt" for Input as #iVar Open "\file9879.txt" for Input as #iVar ------------------------------- ****79;38;22(text:p)Line Input #iVar, sVar Line Input #iVar, sVar ------------------------------- ****80;38;11(text:p)Close #iVar Close #iVar ------------------------------- ****81;38;8(text:p)exit sub exit sub ------------------------------- ****82;38;13(text:p)ErrorHandler: FoutBehandelaar: ------------------------------- ****83;38;159(text:p)MsgBox "Error " & err & ": " & error$ + chr(13) + "At line : " + Erl + chr(13) + Now , 16 ,"error occurred" MsgBox "Fout " & err & ": " & error$ + chr(13) + "Op regel : " + Erl + chr(13) + Now , 16 ,"Fout gevonden" ------------------------------- ****84;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03050500.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;42(subject)On Error GoTo...Resume statement [Runtime] On Error GoTo...Resume argument [Runtime] ------------------------------- ****66;58;22(keyword)On Error GoTo...Resume On Error GoTo...Resume ****66;121;42(help:link)On Error GoTo...Resume statement [Runtime] On Error GoTo...Resume argument [Runtime] ****67;39;86(text:p)Enables an error-handling routine after an error occurs, or resumes program execution. Stelt een foutbehandelingsroutine in nadat een fout voorkomt of hervat de programmauitvoering. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;56(text:p)On [Local] {Error GoTo Labelname | GoTo 0 | Resume Next} On [Local] {Error GoTo Labelnaam | GoTo 0 | Resume Next} ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;143(text:p)Local: Defines a local error-handling routine for a procedure. If this parameter is omitted, the error-handling is valid for the entire module. Local: Definieert een lokale foutbehandelingsroutine voor een procedure. Als deze parameter wordt weggelaten, is de foutbehandeling geldig voor de gehele module. ------------------------------- ****73;39;117(text:p)GoTo Labelname: If an error occurs, enables the error-handling routine that starts at the line "Labelname". GoTo Labelnaam: Als een fout voorkomt, activeert de foutafhandelingsroutine die begint bij de regel "Labelnaam". ------------------------------- ****74;39;132(text:p)Resume Next: If an error occurs, program execution continues with the statement following the statement in which the error occurred. Resume Next: Als een fout voorkomt, wordt de programmauitvoering vervolgd met de uitdrukking volgend op de uitdrukking waarin de fout voorkwam. ------------------------------- ****75;39;60(text:p)GoTo 0: Disables the error handler in the current procedure. GoTo 0: Deactiveert de foutbehandeling in de huidige procedure. ------------------------------- ****76;39;207(text:p)The On Error GoTo statement is used to react to errors that may occur in a macro. The statement must be inserted at the start of a procedure (in a local error-handling routine) or at the start of the module. Het On Error GoTo-argument wordt gebruikt om te reageren op fouten die kunnen voorkomen in een macro. Het argument moet worden ingevoegd aan het begin van een procedure (in een lokale foutbehandelingsroutine) of aan het begin van de module. ------------------------------- ****77;32;8(text:p)Example: Voorbeeld: ------------------------------- ****78;38;16(text:p)Sub ExampleReset Sub VoorbeeldReset ------------------------------- ****79;38;26(text:p)On Error Goto ErrorHandler On Error Goto FoutBehandelaar ------------------------------- ****80;38;22(text:p)Dim iNumber As Integer Dim iNumber as Integer ------------------------------- ****81;38;21(text:p)Dim iCount As Integer Dim iCount as Integer ------------------------------- ****82;38;19(text:p)Dim sLine As String Dim sLine as String ------------------------------- ****83;38;19(text:p)Dim aFile As String Dim aFile as String ------------------------------- ****84;38;31(text:p)aFile = "c:\data.txt" aFile = "c:\data.txt" ------------------------------- ****86;38;18(text:p)iNumber = Freefile iNumber = Freefile ------------------------------- ****87;38;33(text:p)Open aFile For Output As #iNumber Open aFile for output as #iNumber ------------------------------- ****88;38;50(text:p)Print #iNumber, "This is a line of text" print #iNumber, "Dit is een tekstregel" ------------------------------- ****89;38;14(text:p)Close #iNumber Close #iNumber ------------------------------- ****91;38;18(text:p)iNumber = Freefile iNumber = Freefile ------------------------------- ****92;38;31(text:p)Open aFile For Input As iNumber Open aFile for input as iNumber ------------------------------- ****93;38;19(text:p)For iCount = 1 to 5 for iCount = 1 to 5 ------------------------------- ****94;38;26(text:p)Line Input #iNumber, sLine Line Input #iNumber, sLine ------------------------------- ****95;38;34(text:p)If sLine <>"" then If sLine <>"" then ------------------------------- ****96;38;3(text:p)rem rem ------------------------------- ****97;38;6(text:p)end if end if ------------------------------- ****98;38;11(text:p)Next iCount Next iCount ------------------------------- ****99;38;14(text:p)Close #iNumber Close #iNumber ------------------------------- ****100;38;8(text:p)Exit Sub exit Sub ------------------------------- ****101;38;13(text:p)ErrorHandler: FoutBehandelaar: ------------------------------- ****102;38;5(text:p)Reset Reset ------------------------------- ****103;38;63(text:p)MsgBox "All files will be closed",0,"Error" MsgBox "Alle bestanden zullen worden gesloten",0,"FOUT" ------------------------------- ****104;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03060000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;17(subject)Logical Operators Logische operatoren ------------------------------- ****58;58;17(help:link)Logical Operators Logische operatoren ****59;39;65(text:p)The following describes which logical operators are supported by Het volgende beschrijft welke logische operatoren worden ondersteund door ****59;122;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****59;153;7() Basic. BASIC. ------------------------------- ****61;39;161(text:p)Logical operators combine (bitwise) the contents of two expressions or variables. They are used, for example, to test whether specific bits have been set or not. Logische operatoren combineren (bit-gewijze) de inhoud van twee uitdrukkingen of variabelen. Zij worden, bijvoorbeeld, gebruikt om te testen of specifieke bits zijn ingesteld of niet. ------------------------------- ****62;39;41(text:p)These logical operators are supported in Deze logische operatoren worden ondersteund in ****62;98;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****62;129;7() Basic: BASIC: ####Text\SBASIC\COMMON\03060100.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)And-Operator [Runtime] And-operator [Runtime] ------------------------------- ****66;58;22(help:link)And-Operator [Runtime] And-operator [Runtime] ****67;39;57(text:p)Used to perform a logical combination of two expressions. Gebruikt voor het uitvoeren van een logische combinatie van twee uitdrukkingen. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;37(text:p)Result = Expression1 And Expression2 Resultaat = Expressie1 and Expressie2 ****70;98;3(keyword)And And ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;73(text:p)Result : Any numeric variable that records the result of the combination. Resultaat : Elke numerieke variabele die het resultaat van de combinatie geeft. ------------------------------- ****73;39;58(text:p)Expression1, Expression2 : Any expressions to be combined. Expressie1, Expressie2 : Elke uitdrukking die moet worden gecombineerd. ------------------------------- ****74;39;60(text:p)Boolean expressions combined with AND only return the value Boolean-uitdrukkingen, gecombineerd met AND geven alleen de resultaatwaarde weer. ****74;131;4(text:span)True True ****74;147;33() if both expressions evaluate to als beide uitdrukkingen evalueren naar ****74;212;4(text:span)True True ****74;228;1(): : ------------------------------- ****75;71;4(text:span)True True ****75;87;5() AND AND ****75;124;4(text:span)True True ****75;140;9() returns geeft weer ****75;181;4(text:span)True True ****75;197;43(); for all other combinations the result is ; voor alle andere combinaties is het resultaat ****75;272;5(text:span)False False ****75;289;1(). . ------------------------------- ****76;39;110(text:p)The AND operator also performs a bitwise comparison of identically positioned bits in two numeric expressions. De AND-operator voert ook een bit-gewijze vergelijking uit van identiek geplaatste bits in twee numerieke uitdrukkingen. ------------------------------- ****77;32;8(text:p)Example: Voorbeeld: ------------------------------- ****78;38;14(text:p)Sub ExampleAnd Sub VoorbeeldAnd ------------------------------- ****79;38;62(text:p)Dim vA as Variant, vB as Variant, vC as Variant, vD as Variant Dim vA as Variant, vB as Variant, vC as Variant, vD as Variant ------------------------------- ****80;38;22(text:p)Dim vVarOut as Variant Dim vVarOut as Variant ------------------------------- ****81;38;30(text:p)A = 10: B = 8: C = 6: D = Null A = 10: B = 8: C = 6: D = 0 ------------------------------- ****82;38;32(text:p)vVarOut = A > B And B > C vVarOut = A > B and B > C ****82;90;14(text:p)REM returns -1 REM geeft weer -1 ------------------------------- ****83;38;32(text:p)vVarOut = B > A And B > C vVarOut = B > A and B > C ****83;90;13(text:p)REM returns 0 REM keert terug 0 ------------------------------- ****84;38;32(text:p)vVarOut = A > B And B > D vVarOut = A > B and B > D ****84;90;14(text:p)REM returns -1 REM geeft weer -1 ------------------------------- ****85;38;47(text:p)vVarOut = (B > D And B > A) REM returns 0 vVarOut = (B > D and B > A) REM geeft weer 0 ------------------------------- ****86;38;18(text:p)vVarOut = B And A vVarOut = B and A ****86;77;66(text:p)REM returns 8 due to the bitwise AND combination of both arguments REM geeft weer 8, vanwege de bit-gewijze AND-combinatie van beide argumenten ------------------------------- ****87;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03060200.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)Eqv-Operator [Runtime] Eqv-operator [Runtime] ------------------------------- ****66;73;22(help:link)Eqv-Operator [Runtime] Eqv-operator [Runtime] ****67;39;50(text:p)Calculates a logic equivalence on two expressions. Berekent een logisch equivalent op twee uitdrukkingen. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;37(text:p)Result = Expression1 Eqv Expression2 Resultaat = Expressie1 eqv Expressie2 ****70;98;3(keyword)Eqv Eqv ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;69(text:p)Result: Any numeric variable containing the result of the comparison. Resultaat: Elke numerieke variabele die het resultaat van de vergelijking bevat. ------------------------------- ****73;39;58(text:p)Expression1, expression2 : Any expressions to be compared. Expressie1, expressie2 : Elke uitdrukking die moet worden vergeleken. ------------------------------- ****74;39;72(text:p)When testing for equivalence between boolean expressions, the result is Als getest wordt voor equivalent tussen Boolean-uitdrukkingen is het resultaat ****74;143;4(text:span)True True ****74;159;32() if either both expressions are als óf beide uitdrukkingen zijn ****74;223;4(text:span)True True ****74;239;13() or both are óf beide zijn ****74;284;5(text:span)False False ****74;301;1(). . ------------------------------- ****75;39;148(text:p)In a bit-wise comparison, the Eqv operator sets the corresponding bit in the result only if a bit is set in both expressions, or neither expression. In een bit-gewijze vergelijking, stelt de Eqv-operator de overeenkomstige bit in het resultaat alleen in, als een bit is ingesteld in beide uitdrukkingen of geen van beide uitdrukkingen. ------------------------------- ****76;32;8(text:p)Example: Voorbeeld: ------------------------------- ****77;38;14(text:p)Sub ExampleEqv Sub VoorbeeldEqv ------------------------------- ****78;38;62(text:p)Dim vA as Variant, vB as Variant, vC as Variant, vD as Variant Dim vA as Variant, vB as Variant, vC as Variant, vD as Variant ------------------------------- ****79;38;19(text:p)Dim vOut as Variant Dim vOut as Variant ------------------------------- ****80;38;34(text:p)vA = 10: vB = 8: vC = 6: vD = Null vA = 10: vB = 8: vC = 6: vD = 0 ------------------------------- ****81;38;29(text:p)vOut = A > B Eqv B > C vOut = A > B eqv B > C ****81;87;14(text:p)REM returns -1 REM geeft weer -1 ------------------------------- ****82;38;29(text:p)vOut = B > A Eqv B > C vOut = B > A eqv B > C ****82;87;14(text:p)REM returns -1 REM geeft weer -1 ------------------------------- ****83;38;29(text:p)vOut = A > B Eqv B > D vOut = A > B eqv B > D ****83;87;14(text:p)REM returns -1 REM geeft weer -1 ------------------------------- ****84;38;44(text:p)vOut = (B > D Eqv B > A) REM returns 0 vOut = (B > D eqv B > A) REM geeft weer 0 ------------------------------- ****85;38;15(text:p)vOut = B Eqv A vOut = B eqv A ****85;74;14(text:p)REM returns -1 REM geeft weer -1 ------------------------------- ****86;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03060300.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)Imp-Operator [Runtime] Imp-operator [Runtime] ------------------------------- ****66;58;22(help:link)Imp-Operator [Runtime] Imp-operator [Runtime] ****67;39;50(text:p)Performs a logical implication on two expressions. Voert een logische implicatie uit op twee uitdrukkingen. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;37(text:p)Result = Expression1 Imp Expression2 Resultaat = Expressie1 Imp Expressie2 ****70;98;3(keyword)Imp Imp ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;73(text:p)Result: Any numeric variable that contains the result of the implication. Resultaat: Elke numerieke variabele die het resultaat van de implicatie bevat. ------------------------------- ****73;39;81(text:p)Expression1, Expression2 : Any expressions to be evaluated with the Imp operator. Expressie1, Expressie2 : Elke uitdrukking die moet worden geëvalueerd met de Imp-operator. ------------------------------- ****74;39;141(text:p)If you use the Imp operator in boolean expressions, False is returned only if the first expression evaluates to True and the second to False. Als u de Imp-operator in boolean uitdrukkingen gebruikt, wordt FALSE weergegeven alleen als de eerste uitdrukking evalueert naar TRUE en de tweede naar FALSE. ------------------------------- ****75;39;204(text:p)If you use the Imp operator in bit expressions, a bit will be deleted from the result if the corresponding bit is set in the first expression and the corresponding bit is deleted in the second expression. Als u de Imp-operator in bit-uitdrukkingen gebruikt, zal een bit zal wordenn verwijderd uit het resultaat als het overeenkomstige bit is ingesteld in de eerste uitdrukking en het overeenkomstige bit is verwijderd uit de tweede uitdrukking. ------------------------------- ****76;32;8(text:p)Example: Voorbeeld: ------------------------------- ****77;38;14(text:p)Sub ExampleImp Sub VoorbeeldImp ------------------------------- ****78;38;62(text:p)Dim vA as Variant, vB as Variant, vC as Variant, vD as Variant Dim vA as Variant, vB as Variant, vC as Variant, vD as Variant ------------------------------- ****79;38;19(text:p)Dim vOut as Variant Dim vOut as Variant ------------------------------- ****80;38;30(text:p)A = 10: B = 8: C = 6: D = 0l A = 10: B = 8: C = 6: D = 0 ------------------------------- ****81;38;29(text:p)vOut = A > B Imp B > C vOut = A > B Imp B > C ****81;87;14(text:p)REM returns -1 REM geeft weer -1 ------------------------------- ****82;38;29(text:p)vOut = B > A Imp B > C vOut = B > A Imp B > C ****82;87;13(text:p)REM returns 0 REM geeft weer 0 ------------------------------- ****83;38;29(text:p)vOut = A > B Imp B > D vOut = A > B Imp B > D ****83;87;14(text:p)REM returns -1 REM geeft weer -1 ------------------------------- ****84;38;44(text:p)vOut = (B > D Imp B > A) REM returns 0 vOut = (B > D Imp B > A) REM geeft weer 0 ------------------------------- ****85;38;15(text:p)vOut = B Imp A vOut = B Imp A ****85;74;14(text:p)REM returns -3 REM geeft weer -3 ------------------------------- ****86;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03060400.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)Not-Operator [Runtime] Not-operator [Runtime] ------------------------------- ****66;58;22(help:link)Not-Operator [Runtime] Not-operator [Runtime] ****67;39;57(text:p)Used to negate an expression by inverting the bit values. Gebruikt om een ontkennende uitdrukking te creëeren door de bit-waarden tegengesteld te gebruiken. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;24(text:p)Result = Not Expression Resultaat = Not Expressie ****70;85;3(keyword)Not Not ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;70(text:p)Result: Any numeric variable that contains the result of the negation. Resultaat: Elke numerieke variabele die het resultaat van de ontkennende uitdrukking bevat. ------------------------------- ****73;39;46(text:p)Not Expression : Any expression to be negated. Not Expressie : Elke uitdrukking die als ontkennend, moet worden opgevat. ------------------------------- ****74;39;81(text:p)When negating a Boolean expression, the value True becomes False, and vice versa. In een ontkennende Boolean-uitdrukking, wordt de waarde True False, en andersom. ------------------------------- ****75;39;54(text:p)In a bitwise negation each individual bit is inverted. In een bit-gewijze ontkenning wordt elke individueel bit omgekeerd. ------------------------------- ****76;32;8(text:p)Example: Voorbeeld: ------------------------------- ****77;38;14(text:p)Sub ExampleNot Sub VoorbeeldNot ------------------------------- ****78;38;62(text:p)Dim vA as Variant, vB as Variant, vC as Variant, vD as Variant Dim vA as Variant, vB as Variant, vC as Variant, vD as Variant ------------------------------- ****79;38;19(text:p)Dim vOut as Variant Dim vOut as Variant ------------------------------- ****80;38;34(text:p)vA = 10: vB = 8: vC = 6: vD = Null vA = 10: vB = 8: vC = 6: vD = 0 ------------------------------- ****81;38;29(text:p)vOut = Not vA REM Returns -11 vOut = Not vA REM Geeft weer: -11 ------------------------------- ****82;38;36(text:p)vOut = Not(vC > vD) REM Returns 0 vOut = Not(vC > vD) REM Geeft weer: 0 ------------------------------- ****83;38;37(text:p)vOut = Not(vB > vA) REM Returns -1 vOut = Not(vB > vA) REM Geeft weer: -1 ------------------------------- ****84;38;36(text:p)vOut = Not(vA > vB) REM Returns 0 vOut = Not(vA > vB) REM Geeft weer: 0 ------------------------------- ****85;38;7(text:p)end Sub end Sub ####Text\SBASIC\COMMON\03060500.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;21(subject)Or-Operator [Runtime] Or-operator [Runtime] ------------------------------- ****66;58;21(help:link)Or-Operator [Runtime] Or-operator [Runtime] ****67;39;53(text:p)Performs a logical OR disjunction on two expressions. Voert een logische OR vergelijking uit van twee uitdrukkingen. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;36(text:p)Result = Expression1 Or Expression2 Resultaat = Expressie1 or Expressie2 ****70;97;2(keyword)Or Or ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;73(text:p)Result: Any numeric variable that contains the result of the disjunction. Resultaat: Elke numerieke variabele die het resultaat van de vergelijking bevat. ------------------------------- ****73;39;65(text:p)Expression1, Expression2: Any numeric expressions to be compared. Expressie1, Expressie2: Alle numerieke uitdrukkingen die moeten worden vergeleken. ------------------------------- ****74;39;111(text:p)A logical OR disjunction of two boolean expressions returns True if at least one comparison expression is True. Een logische OR-vergelijking van twee Boolean-uitdrukkingen geeft weer True als tenminste één vergelijkingsuitdrukking waar is. ------------------------------- ****75;39;118(text:p)A bit-wise comparison sets a bit in the result if the corresponding bit is set in at least one of the two expressions. Een bit-gewijze vergelijking stelt een bit in het resultaat in als het overeenkomstige bit is ingesteld in tenminste één van de twee uitdrukkingen. ------------------------------- ****76;32;8(text:p)Example: Voorbeeld: ------------------------------- ****77;38;13(text:p)Sub ExampleOr Sub VoorbeeldOr ------------------------------- ****78;38;62(text:p)Dim vA as Variant, vB as Variant, vC as Variant, vD as Variant Dim vA as Variant, vB as Variant, vC as Variant, vD as Variant ------------------------------- ****79;38;19(text:p)Dim vOut as Variant Dim vOut as Variant ------------------------------- ****80;38;34(text:p)vA = 10: vB = 8: vC = 6: vD = Null vA = 10: vB = 8: vC = 6: vD = 0 ------------------------------- ****81;38;32(text:p)vOut = vA > vB Or vB > vC vOut = vA > vB or vB > vC ****81;90;6(text:p)REM -1 REM -1 ------------------------------- ****82;38;32(text:p)vOut = vB > vA Or vB > vC vOut = vB > vA or vB > vC ****82;90;6(text:p)REM -1 REM -1 ------------------------------- ****83;38;32(text:p)vOut = vA > vB Or vB > vD vOut = vA > vB or vB > vD ****83;90;6(text:p)REM -1 REM -1 ------------------------------- ****84;38;40(text:p)vOut = (vB > vD Or vB > vA) REM -1 vOut = (vB > vD or vB > vA) REM -1 ------------------------------- ****85;38;16(text:p)vOut = vB Or vA vOut = vB or vA ****85;75;6(text:p)REM 10 REM 10 ------------------------------- ****86;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03060600.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)Xor-Operator [Runtime] Xor-operator [Runtime] ------------------------------- ****66;58;22(help:link)Xor-Operator [Runtime] Xor-operator [Runtime] ****67;39;63(text:p)Performs a logical Exclusive-Or combination of two expressions. Voert een logisch Exclusief-Or combinatie van twee uitdrukkingen. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;37(text:p)Result = Expression1 Xor Expression2 Resultaat = Expressie1 Xor Expressie2 ****70;98;3(keyword)Xor Xor ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;73(text:p)Result: Any numeric variable that contains the result of the combination. Resultaat: Elke numerieke variabele die het resultaat van de combinatie bevat. ------------------------------- ****73;39;66(text:p)Expression1, Expression2 : Any numeric expressions to be combined. Expressie1, Expressie2 : Alle numerieke uitdrukkingen die moeten worden gecombineerd. ------------------------------- ****74;39;70(text:p)A logical Exclusive-Or conjunction of two Boolean expressions returns Een logische Exclusief-Or vergelijking van twee Boolean uitdrukkingen geeft weer ****74;141;4(text:span)True True ****74;157;56() only if both expressions are different from each other. alleen als beide uitdrukkingen verschillend van elkaar zijn. ------------------------------- ****75;39;116(text:p)A bitwise Exclusive-Or conjunction returns a bit if the corresponding bit is set in only one of the two expressions. Een bit-gewijze Exclusief-Or vergelijking geeft een bit weer als het overeenkomstige bit is ingesteld in slechts één van de twee uitdrukkingen. ------------------------------- ****76;32;8(text:p)Example: Voorbeeld: ------------------------------- ****77;38;14(text:p)Sub ExampleXor Sub VoorbeeldXor ------------------------------- ****78;38;62(text:p)Dim vA as Variant, vB as Variant, vC as Variant, vD as Variant Dim vA as Variant, vB as Variant, vC as Variant, vD as Variant ------------------------------- ****79;38;19(text:p)Dim vOut as Variant Dim vOut as Variant ------------------------------- ****80;38;34(text:p)vA = 10: vB = 8: vC = 6: vD = Null vA = 10: vB = 8: vC = 6: vD = 0 ------------------------------- ****81;38;33(text:p)vOut = vA > vB Xor vB > vC vOut = vA > vB Xor vB > vC ****81;91;13(text:p)REM returns 0 REM Geeft weer: 0 ------------------------------- ****82;38;33(text:p)vOut = vB > vA Xor vB > vC vOut = vB > vA Xor vB > vC ****82;91;14(text:p)REM returns -1 REM Geeft weer: -1 ------------------------------- ****83;38;33(text:p)vOut = vA > vB Xor vB > vD vOut = vA > vB Xor vB > vD ****83;91;13(text:p)REM returns 0 REM Geeft weer: 0 ------------------------------- ****84;38;49(text:p)vOut = (vB > vD Xor vB > vA) REM returns -1 vOut = (vB > vD Xor vB > vA) REM Geeft weer: -1 ------------------------------- ****85;38;17(text:p)vOut = vB Xor vA vOut = vB Xor vA ****85;76;13(text:p)REM returns 2 REM Geeft weer: 2 ------------------------------- ****86;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03070000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)Mathematical Operators Wiskundige operatoren ------------------------------- ****58;58;22(help:link)Mathematical Operators Wiskundige operatoren ****59;39;54(text:p)The following mathematical operators are supported in De volgende wiskundige operatoren worden ondersteund in ****59;111;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****59;142;7() Basic. BASIC. ------------------------------- ****61;39;121(text:p)This chapter provides a short overview of all arithmetical operators that you may need for calculations within a program. Dit hoofdstuk biedt een kort overzicht van alle rekenkundige operatoren die u nodig kunt hebben voor berekeningen binnen een programma. ------------------------------- ****62;39;3(text:p)In In ****62;60;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****62;91;59() Basic, you will find the following mathematical operators: BASIC zult u de volgende wiskundige operatoren aantreffen: ####Text\SBASIC\COMMON\03070100.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;32(subject)"-" Operator [Runtime] "-" -operator [Runtime] ------------------------------- ****66;58;32(help:link)"-" Operator [Runtime] "-" -operator [Runtime] ****67;39;21(text:p)Subtracts two values. Trekt twee waarden van elkaar af. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;35(text:p)Result = Expression1 - Expression2 Resultaat = Expressie1 - Expressie2 ****70;96;1(keyword)- - ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;79(text:p)result : Any numerical expression, that contains the result of the subtraction. Resultaat : Elke numeriek uitdrukking die het resultaat van het aftrekken bevat. ------------------------------- ****73;39;70(text:p)Expression1, Expression2 : Any numerical expressions to be subtracted. Expressie1, Expressie2 : Elke numerieke uitdrukking die moet worden afgetrokken. ------------------------------- ****74;32;8(text:p)Example: Voorbeeld: ------------------------------- ****75;38;23(text:p)Sub ExampleSubtraction1 Sub VoorbeeldAftrekken1 ------------------------------- ****76;38;11(text:p)Print 5 - 5 Print 5 - 5 ------------------------------- ****77;38;7(text:p)End sub end sub ------------------------------- ****79;38;23(text:p)Sub ExampleSubtraction2 Sub VoorbeeldAftrekken2 ------------------------------- ****80;38;22(text:p)Dim iValue1 as Integer Dim iValue1 as Integer ------------------------------- ****81;38;22(text:p)Dim iValue2 as Integer Dim iValue2 as Integer ------------------------------- ****82;38;11(text:p)iValue1 = 5 iValue1 = 5 ------------------------------- ****83;38;12(text:p)iValue2 = 10 iValue2 = 10 ------------------------------- ****84;38;23(text:p)Print iValue1 - iValue2 Print iValue1 - iValue2 ------------------------------- ****85;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03070200.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;32(subject)"*" Operator [Runtime] "*" -operator [Runtime] ------------------------------- ****66;58;32(help:link)"*" Operator [Runtime] "*" -operator [Runtime] ****67;39;22(text:p)Multiplies two values. Vermenigvuldigt twee waarden. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;35(text:p)Result = Expression1 * Expression2 Resultaat = Expressie1 * Expressie2 ****70;96;1(keyword)* * ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;75(text:p)result: Any numeric expression that records the result of a multiplication. Resultaat: Elke numerieke uitdrukking die het resultaat van een vermenigvuldiging vormt. ------------------------------- ****73;39;67(text:p)expression1, expression2: Any numeric expressions to be multiplied. Expressie1, Expressie2: Elke numerieke uitdrukking die moet worden vermenigvuldigd. ------------------------------- ****74;32;8(text:p)Example: Voorbeeld: ------------------------------- ****75;38;26(text:p)Sub ExampleMultiplication1 Sub VoorbeeldVermenigvuldiging1 ------------------------------- ****76;38;11(text:p)Print 5 * 5 Print 5 * 5 ------------------------------- ****77;38;7(text:p)End sub end sub ------------------------------- ****79;38;26(text:p)Sub ExampleMultiplication2 Sub VoorbeeldVermenigvuldiging2 ------------------------------- ****80;38;22(text:p)Dim iValue1 as Integer Dim iValue1 as Integer ------------------------------- ****81;38;22(text:p)Dim iValue2 as Integer Dim iValue2 as Integer ------------------------------- ****82;38;11(text:p)iValue1 = 5 iValue1 = 5 ------------------------------- ****83;38;12(text:p)iValue2 = 10 iValue2 = 10 ------------------------------- ****84;38;23(text:p)Print iValue1 * iValue2 Print iValue1 * iValue2 ------------------------------- ****85;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03070300.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;32(subject)"+" Operator [Runtime] "+" -operator [Runtime] ------------------------------- ****66;58;32(help:link)"+" Operator [Runtime] "+" -operator [Runtime] ****67;39;33(text:p)Adds or combines two expressions. Telt op of combineert twee uitdrukkingen. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;35(text:p)Result = Expression1 + Expression2 Resultaat = Expressie1 + Expressie2 ****70;96;1(keyword)+ + ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;74(text:p)Result: Any numerical expression that contains the result of the addition. Resultaat: Elke numeriek uitdrukking die het resultaat van de optelling bevat. ------------------------------- ****73;39;77(text:p)Expression1, Expression2 : Any numerical expressions to be combined or added. Expressie1, Expressie2 : Elke numeriek uitdrukking die moet worden gecombineerd of opgeteld. ------------------------------- ****74;32;8(text:p)Example: Voorbeeld: ------------------------------- ****75;38;20(text:p)Sub ExampleAddition1 Sub VoorbeeldOptelling1 ------------------------------- ****76;38;11(text:p)Print 5 + 5 Print 5 + 5 ------------------------------- ****77;38;7(text:p)End sub end sub ------------------------------- ****79;38;20(text:p)Sub ExampleAddition2 Sub VoorbeeldOptelling2 ------------------------------- ****80;38;22(text:p)Dim iValue1 as Integer Dim iValue1 as Integer ------------------------------- ****81;38;22(text:p)Dim iValue2 as Integer Dim iValue2 as Integer ------------------------------- ****82;38;11(text:p)iValue1 = 5 iValue1 = 5 ------------------------------- ****83;38;12(text:p)iValue2 = 10 iValue2 = 10 ------------------------------- ****84;38;23(text:p)Print iValue1 + iValue2 Print iValue1 + iValue2 ------------------------------- ****85;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03070400.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;32(subject)"/" Operator [Runtime] "/" -operator [Runtime] ------------------------------- ****66;58;32(help:link)"/" Operator [Runtime] "/" -operator [Runtime] ****67;39;19(text:p)Divides two values. Deelt twee waarden. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;35(text:p)Result = Expression1 / Expression2 Resultaat = Expressie1 / Expressie2 ****70;96;1(keyword)/ / ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;69(text:p)Result: Any numerical value that contains the result of the division. Resultaat: Elke numerieke waarde die het resultaat van de deling bevat. ------------------------------- ****73;39;66(text:p)Expression1, Expression2: Any numerical expressions to be divided. Expressie1, Expressie2: Elke numerieke uitdrukking die moet worden gedeeld. ------------------------------- ****74;32;8(text:p)Example: Voorbeeld: ------------------------------- ****75;38;20(text:p)Sub ExampleDivision1 Sub VoorbeeldDeling1 ------------------------------- ****76;38;11(text:p)Print 5 / 5 Print 5 / 5 ------------------------------- ****77;38;7(text:p)End sub end sub ------------------------------- ****79;38;20(text:p)Sub ExampleDivision2 Sub VoorbeeldDeling2 ------------------------------- ****80;38;22(text:p)Dim iValue1 as Integer Dim iValue1 as Integer ------------------------------- ****81;38;22(text:p)Dim iValue2 as Integer Dim iValue2 as Integer ------------------------------- ****82;38;11(text:p)iValue1 = 5 iValue1 = 5 ------------------------------- ****83;38;12(text:p)iValue2 = 10 iValue2 = 10 ------------------------------- ****84;38;23(text:p)Print iValue1 / iValue2 Print iValue1 / iValue2 ------------------------------- ****85;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03070500.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;32(subject)"^" Operator [Runtime] "^" -operator [Runtime] ------------------------------- ****66;58;32(help:link)"^" Operator [Runtime] "^" -operator [Runtime] ****67;39;27(text:p)Raises a number to a power. Verhoogt een getal naar een macht. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;31(text:p)Result = Expression ^ Exponent Resultaat = Expressie ^ Exponent ****70;92;1(keyword)^ ^ ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;91(text:p)Result : Any numerical expression that contains the result of the number raised to a power. Resultaat : Elke numerieke uitdrukking die het resultaat van het getal, verhoogd naar een macht, bevat . ------------------------------- ****73;39;53(text:p)Expression : Numerical value to be raised to a power. Expressie : Numerieke waarde die moet worden verhoogd naar een macht. ------------------------------- ****74;39;74(text:p)Exponent : The exponent value to which the specified Expression is raised. Exponent : De waarde-exponent, waartoe de gespecificeerde Expressie is verhoogd. ------------------------------- ****75;32;8(text:p)Example: Voorbeeld: ------------------------------- ****76;38;11(text:p)Sub Example Sub VoorbeeldMachtverheffen ------------------------------- ****77;38;21(text:p)Print ( 12.345 ^ 23 ) Print ( 12.345 ^ 23 ) ------------------------------- ****78;38;66(text:p)Print Exp ( 23 * Log( 12.345 ) ) REM Raises by forming a logarithm Print Exp ( 23 * Log( 12.345 ) ) REM Machtverheffen door een logaritme te maken ------------------------------- ****79;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03070600.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)Mod-Operator [Runtime] Mod-operator [Runtime] ------------------------------- ****66;58;22(help:link)Mod-Operator [Runtime] Mod-operator [Runtime] ****67;39;44(text:p)Returns the integer remainder of a division. Geeft weer het Integer restgetal van een deling. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;37(text:p)Result = Expression1 MOD Expression2 Resultaat = Expressie1 MOD Expressie2 ****70;98;3(keyword)MOD MOD ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;7(text:p)Integer Integer ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;76(text:p)Result: Any numberic variable that contains the result of the MOD operation. Resultaat: Elke nummer-variabele die het resultaat van de MOD-bewerking bevat. ------------------------------- ****75;39;64(text:p)Expression1, Expression2: Any numeric expressions to be divided. Expressie1, Expressie2: Elke numerieke uitdrukking die moet worden gedeeld. ------------------------------- ****76;32;8(text:p)Example: Voorbeeld: ------------------------------- ****77;38;14(text:p)sub ExampleMod sub VoorbeeldMod ------------------------------- ****78;38;30(text:p)print 10 mod 2.5 REM returns 0 print 10 mod 2.5 REM Geeft weer: 1 ------------------------------- ****79;38;15(text:p)print 10 / 2.5 print 10 / 2.5 ****79;73;13(text:p)REM returns 4 REM Geeft weer: 4 ------------------------------- ****80;38;15(text:p)print 10 mod 5 print 10 mod 5 ****80;73;13(text:p)REM returns 0 REM Geeft weer: 0 ------------------------------- ****81;38;13(text:p)print 10 / 5 print 10 / 5 ****81;71;13(text:p)REM returns 2 REM Geeft weer: 2 ------------------------------- ****82;38;15(text:p)print 5 mod 10 print 5 mod 10 ****82;73;13(text:p)REM returns 5 REM Geeft weer: 5 ------------------------------- ****83;38;13(text:p)print 5 / 10 print 5 / 10 ****83;71;15(text:p)REM returns 0.5 REM Geeft weer: 0.5 ------------------------------- ****84;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03080000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;17(subject)Numeric Functions Numerieke functies ------------------------------- ****56;58;17(help:link)Numeric Functions Numerieke functies ****57;39;354(text:p)Here you will find all functions that can execute numeric calculations. Mathematical and boolean operators are not included here, as they will be addressed in a separate section. Functions differ from operators as follows: With functions, arguments are passed and return a result. Operators, however, return a result by combining two numeric expressions. Hier zult u alle functies vinden die numerieke berekeningen kunnen uitvoeren. Wiskundige en Boolean operatoren zijn hier niet inbegrepen, zij zullen worden behandeld in een apart gedeelte. Functies verschillen als volgt van operatoren: Met functies worden argumenten ingesteld en die geven een resultaat weer. Operatoren, echter, geven een resultaat weer door het combineren van twee numerieke uitdrukkingen. ------------------------------- ****59;39;60(text:p)This section describes the following mathematical functions: Dit gedeelte beschrijft de volgende wiskundige functies: ####Text\SBASIC\COMMON\03080100.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;23(subject)Trigonometric Functions Trigonometrische functies ------------------------------- ****58;58;23(help:link)Trigonometric Functions Trigonometrische functies ****59;39;60(text:p)Here you will find all trigonometric functions supported in Hier vindt u alle trigonometrische functies (driehoeksmeting) ondersteund in ****59;117;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****59;148;7() Basic. BASIC. ####Text\SBASIC\COMMON\03080101.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)Atn-Function [Runtime] Atn functie [Runtime] ------------------------------- ****66;58;22(help:link)Atn-Function [Runtime] Atn functie [Runtime] ****67;39;124(text:p)Trigonometric function that returns the arctangent of a numeric expression. The return value is in the range -Pi/2 to +Pi/2. Trigonometrische functie die de boogtangens van een numerieke uitdrukking weergeeft. De Resultaatwaarde ligt in het bereik van -Pi/2 tot +Pi/2. ------------------------------- ****69;39;288(text:p)The arctangent is the inverse of the tangent function. This means that the Atn Function returns the angle Alpha in radians using the tangent of this angle or the ratio of the length of the side opposite the angle to the length of the side adjacent to the angle in a right-angled triangle. De boogtangens is de afgeleide van de Tangens-functie. Dit betekent dat de Atn-functie de hoek Alfa in radialen weergeeft met behulp van de tangens van deze hoek of de verhouding van de lengte van de zijkant tegenoverliggend aan de hoek met de lengte van de aangelegen zijkant van de hoek in een rechthoekige driehoek. ------------------------------- ****70;39;58(text:p)Atn(side opposite the angle/side adjacent to angle)= Alpha Atn(zijde tegenoverliggend aan de hoek / zijde naastgelegen aan de hoek)= Alfa ------------------------------- ****71;71;6(text:span)Syntax Syntaxis ****71;89;1(): : ------------------------------- ****72;39;13(text:p)Atn (Number) Atn (getal) ****72;74;3(keyword)Atn Atn ------------------------------- ****73;71;12(text:span)Return value Resultaatwaarde ****73;95;1(): : ------------------------------- ****74;39;6(text:p)Double Double ------------------------------- ****75;71;9(text:span)Parameter Parameter ****75;92;1(): : ------------------------------- ****76;39;173(text:p)Number: Any numeric expression that represents the ratio of two sides of a right triangle. The Atn function returns the arctangent, i.e., the corresponding angle in radians. Getal: Elke numerieke uitdrukking die de verhouding van twee zijkanten van een rechthoekige driehoek voorstelt. De Atn-functie geeft de boogtangens weer, d.w.z. de overeenkomstige hoek in radialen. ------------------------------- ****77;39;58(text:p)To convert radians to degrees, multiply radians by 180/pi. Om radialen naar graden om te zetten, vermenigvuldig de radialen met 180 / Pi. ------------------------------- ****78;39;22(text:p)degree=(radian*180)/pi graad=(radiaal*180)/pi ------------------------------- ****79;39;22(text:p)radian=(degree*pi)/180 radiaal=(graad*pi)/180 ------------------------------- ****80;39;68(text:p)Pi is here the fixed circle constant with the value 3.141592657... . Pi is hier de vaste cirkelconstante met de waarde 3.141592657... . ------------------------------- ****81;32;8(text:p)Example: Voorbeeld: ------------------------------- ****82;38;64(text:p)REM The following example calculates for a right-angled triangle REM Het volgende voorbeeld rekent met een rechthoekige driehoek ------------------------------- ****83;38;56(text:p)REM the angle Alpha from the tangent of the angle Alpha: REM de hoek Alfa uit de tangens van de hoek Alfa: ------------------------------- ****84;38;14(text:p)Sub ExampleATN Sub VoorbeeldATN ------------------------------- ****85;38;43(text:p)REM Pi = 3.1415926 is a predefined constant REM Pi = 3.1415926 is een voorgedefinieerde constante ------------------------------- ****86;38;16(text:p)Dim d1 As Double Dim d1 As Double ------------------------------- ****87;38;16(text:p)Dim d2 As Double Dim d2 As Double ------------------------------- ****88;38;102(text:p)d1 = InputBox$ ("Enter the length of the side adjacent to the angle: ","Adjacent") d1 = InputBox$ ("Voer de lengte van de zijde, naastgelegen aan de hoek, in: ","Aanliggend: ") ------------------------------- ****89;38;105(text:p)d2 = InputBox$ (""Enter the length of the side opposite the angle: ","Opposite") d2 = InputBox$ (""Voer de lengte van de zijde, tegenoverliggend aan de hoek, in: ","Tegenoverliggend: ") ------------------------------- ****90;38;84(text:p)Print "The Alpha angle is"; (atn (d2/d1) * 180 / Pi); " degrees" Print "De Alfa hoek is"; (atn (d2/d1) * 180 / Pi); " graden" ------------------------------- ****91;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03080102.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)Cos-Function [Runtime] Cos functie [Runtime] ------------------------------- ****66;58;22(help:link)Cos-Function [Runtime] Cos functie [Runtime] ****67;39;103(text:p)Calculates the cosine of an angle. The angle is specified in radians. The result lies between -1 and 1. Berekent de cosinus van een hoek. De hoek is gespecificeerd in radialen. Het resultaat ligt tussen -1 en 1. ------------------------------- ****69;39;177(text:p)Using the angle Alpha, the Cos-Function calculates the ratio of the length of the side adjacent to the angle, divided by the length of the hypotenuse in a right-angled triangle. Met behulp van de hoek Alfa, berekent de Cos-functie de verhouding van de lengte van de aanliggende zijde van de hoek, gedeeld door de lengte van de hypotenusa (schuine zijde in een rechthoekige driehoek) in een rechthoekige driehoek. ------------------------------- ****70;39;32(text:p)Cos(Alpha) = Adjacent/Hypotenuse Cos(Alfa) = Aanliggend/Hypotenusa ------------------------------- ****71;71;6(text:span)Syntax Syntaxis ****71;89;1(): : ------------------------------- ****72;39;13(text:p)Cos (Number) Cos (getal) ****72;74;3(keyword)Cos Cos ------------------------------- ****73;71;12(text:span)Return value Resultaatwaarde ****73;95;1(): : ------------------------------- ****74;39;6(text:p)Double Double ------------------------------- ****75;71;9(text:span)Parameter Parameter ****75;92;1(): : ------------------------------- ****76;39;97(text:p)Number: Numeric expression that specifies an angle in radians, for which to calculate the cosine. Getal: Numerieke uitdrukking die een hoek in radialen specificeert, waaruit de cosinus te berekenen. ------------------------------- ****77;39;117(text:p)To convert degrees to radians, multiply degrees by pi/180. To convert radians to degrees, multiply radians by 180/pi. Om graden naar radialen om te zetten, vermenigvuldig graden met Pi / 180. Om radialen naar graden om te zetten, vermenigvuldig radialen met 180 / Pi. ------------------------------- ****78;39;22(text:p)degree=(radian*180)/pi graad=(radiaal*180)/pi ------------------------------- ****79;39;22(text:p)radian=(degree*pi)/180 radiaal=(graad*pi)/180 ------------------------------- ****80;39;68(text:p)Pi is here the fixed circle constant with the value 3.141592657... . Pi is hier de vaste cirkelconstante met de waarde 3.141592657... . ------------------------------- ****81;32;8(text:p)Example: Voorbeeld: ------------------------------- ****82;38;73(text:p)REM The following example allows for a right-angled triangle the input of REM Het volgende voorbeeld laat voor een rechthoekige driehoek de invoer toe van ------------------------------- ****83;38;77(text:p)REM secant and angle (in degrees) and calucates the length of the hypotenuse: REM secans en hoek (in graden) en berekent de lengte van de hypotenusa: ------------------------------- ****84;38;18(text:p)Sub ExampleCosinus Sub VoorbeeldCosinus ------------------------------- ****85;38;18(text:p)REM Pi = 3.1415926 REM Pi = 3.1415926 ------------------------------- ****86;38;34(text:p)Dim d1 as Double, dAngle as Double Dim d1 as Double, dHoek as Double ------------------------------- ****87;38;95(text:p)d1 = InputBox$ (""Enter the length of the adjacent side: ","Adjacent") d1 = InputBox$ ("Voer de lengte van de aanliggende zijde in: ","Aanliggend: ") ------------------------------- ****88;38;87(text:p)dAngle = InputBox$ ("Enter the angle Alpha (in degrees): ","Alpha") dHoek = InputBox$ ("Voer de hoek Alfa (in graden) in: ","Alfa") ------------------------------- ****89;38;82(text:p)Print "The length of the hypothenuse is"; (d1 / cos (dAngle * Pi / 180)) Print "De lengte van de hypothenusa is: "; (d1 / cos (dHoek * Pi / 180)) ------------------------------- ****90;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03080103.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)Sin-Function [Runtime] Sin functie [Runtime] ------------------------------- ****66;58;22(help:link)Sin-Function [Runtime] Sin functie [Runtime] ****67;39;98(text:p)Returns the sine of an angle. The angle is specified in radians. The result lies between -1 and 1. Geeft de sinus van een hoek weer. De hoek wordt gespecificeerd in radialen. Het resultaat ligt tussen -1 en 1. ------------------------------- ****69;39;164(text:p)Using the angle Alpha, the Sin Function returns the ratio of the length of the opposite side of an angle to the length of the hypotenuse in a right-angled triangle. Met behulp van de hoek Alfa, geeft de Sin-functie de verhouding van de lengte van de tegenoverliggende zijde van een hoek met de lengte van de hypotenusa in een rechthoekige driehoek. ------------------------------- ****70;39;47(text:p)Sin(Alpha) = side opposite the angle/hypotenuse Sin(Alfa) = zijde tegenoverliggend aan de hoek/hypotenusa ------------------------------- ****71;71;6(text:span)Syntax Syntaxis ****71;89;1(): : ------------------------------- ****72;39;13(text:p)Sin (Number) Sin (Getal) ****72;74;3(keyword)Sin Sin ------------------------------- ****73;71;12(text:span)Return value Resultaatwaarde ****73;95;1(): : ------------------------------- ****74;39;6(text:p)Double Double ------------------------------- ****75;71;9(text:span)Parameter Parameter ****75;92;1(): : ------------------------------- ****76;39;94(text:p)Number: Numeric expression that defines the angle in radians, for which to calculate the sine. Getal: Numerieke uitdrukking die de hoek in radialen definieert, waaruit de sinus te berekenen. ------------------------------- ****77;39;121(text:p)To convert degrees to radians, multiply degrees by Pi/180, and to convert radians to degrees, multiply radians by 180/Pi. Om graden naar radialen om te zetten, vermenigvuldig graden met Pi / 180. Om radialen naar graden om te zetten, vermenigvuldig radialen met 180 / Pi. ------------------------------- ****78;39;21(text:p)grad=(radiant*180)/pi graad=(radiaal*180)/pi ------------------------------- ****79;39;21(text:p)radiant=(grad*pi)/180 radiaal=(graad*pi)/180 ------------------------------- ****80;39;29(text:p)Pi is approximately 3.141593. Pi is bij benadering 3.141593. ------------------------------- ****81;32;8(text:p)Example: Voorbeeld: ------------------------------- ****82;38;81(text:p)REM In this example, the following entry is possible for a right-angled triangle: REM In dit voorbeeld is de volgende invoer mogelijk voor een rechthoekige driehoek: ------------------------------- ****83;38;101(text:p)REM The side opposite the angle and the angle (in degrees) to calculate the length of the hypotenuse: REM De tegenoverliggende zijde van de hoek en de hoek (in graden) om de lengte van de hypotenusa te berekenen: ------------------------------- ****84;38;15(text:p)Sub ExampleSine Sub VoorbeeldSine ------------------------------- ****85;38;43(text:p)REM Pi = 3.1415926 is a predefined variable REM Pi = 3.1415926 is een voorgedefinieerde variabele ------------------------------- ****86;38;16(text:p)Dim d1 as Double Dim d1 as Double ------------------------------- ****87;38;20(text:p)Dim dAlpha as Double Dim dAlfa as Double ------------------------------- ****88;38;3(text:p)d1 d1 ****88;50;91(text:p)= InputBox$ ("Enter the length of the opposite side: ","Opposite Side") = InputBox$ ("Voer de lengte van de tegenoverliggende zijde in: ","Tegenoverliggende zijde: ") ------------------------------- ****89;38;86(text:p)dAlpha = InputBox$ "Enter the angle Alpha (in degrees): ","Alpha") dAlfa = InputBox$ ("Voer de hoek Alfa (in graden) in: ","Alfa") ------------------------------- ****90;38;81(text:p)Print "The length of the hypotenuse is"; (d1 / sin (dAlpha * Pi / 180)) Print "De lengte van de hypotenusa is"; (d1 / sin (dAlfa * Pi / 180)) ------------------------------- ****91;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03080104.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)Tan Function [Runtime] Tan functie [Runtime] ------------------------------- ****66;58;22(help:link)Tan Function [Runtime] Tan functie [Runtime] ****67;39;74(text:p)Determines the tangent of an angle. The angle will be returned in radians. Bepaalt de tangens van een hoek. De hoek zal worden in radialen weergegeven. ------------------------------- ****69;39;181(text:p)Using the angle Alpha, the Tan Function calculates the ratio of the length of the side opposite the angle to the length of the side adjacent to the angle in a right-angled triangle. Met behulp van de hoek Alfa, berekent de Tan-functie de verhouding van de lengte van de tegenoverliggende zijde van de hoek met de lengte van de aanliggende zijde van de hoek in een rechthoekige driehoek. ------------------------------- ****70;39;59(text:p)Tan(Alpha) = side opposite the angle/side adjacent to angle Tan(Alfa) = tegenoverliggende zijde van de hoek/aanliggende zijde van de hoek ------------------------------- ****71;71;6(text:span)Syntax Syntaxis ****71;89;1(): : ------------------------------- ****72;39;13(text:p)Tan (Number) Tan (Getal) ****72;74;3(keyword)Tan Tan ------------------------------- ****73;71;12(text:span)Return value Resultaatwaarde ****73;95;1(): : ------------------------------- ****74;39;6(text:p)Double Double ------------------------------- ****75;71;9(text:span)Parameter Parameter ****75;92;1(): : ------------------------------- ****76;39;77(text:p)Number: Any numeric expression for which to calculate the tangent in radians. Getal: Elke numerieke uitdrukking waaruit de tangens in radialen te berekenen. ------------------------------- ****77;39;101(text:p)To convert degrees to radians, multiply by Pi/180. To convert radians to degrees, multiply by 180/Pi. Om graden naar radialen om te zetten, vermenigvuldig graden met Pi / 180. Om radialen naar graden om te zetten, vermenigvuldig radialen met 180 / Pi. ------------------------------- ****78;39;21(text:p)grad=(radiant*180)/pi graad=(radiaal*180)/pi ------------------------------- ****79;39;21(text:p)radiant=(grad*pi)/180 radiaal=(graad*pi)/180 ------------------------------- ****80;39;29(text:p)Pi is approximately 3.141593. Pi is bij benadering 3.141593. ------------------------------- ****81;32;8(text:p)Example: Voorbeeld: ------------------------------- ****82;38;81(text:p)REM In this example, the following entry is possible for a right-angled triangle: REM In dit voorbeeld is de volgende invoer mogelijk voor een rechthoekige driehoek: ------------------------------- ****83;38;117(text:p)REM The side opposite the angle and the angle (in degrees) to calculate the length of the side adjacent to the angle: REM De tegenoverliggende zijde van de hoek en de hoek (in graden) om de lengte van de aanliggende zijkant van de hoek te berekenen: ------------------------------- ****84;38;18(text:p)Sub ExampleTangens Sub VoorbeeldTangens ------------------------------- ****85;38;44(text:p)REM Pi = 3.1415926 is a pre-defined variable REM Pi = 3.1415926 is een voorgedefinieerde variabele ------------------------------- ****86;38;16(text:p)Dim d1 as Double Dim d1 as Double ------------------------------- ****87;38;20(text:p)Dim dAlpha as Double Dim dAlfa as Double ------------------------------- ****88;38;99(text:p)d1 = InputBox$ ("Enter the length of the side opposite the angle: ","opposite") d1 = InputBox$ ("Voer de lengte van de tegenoverliggende zijde van de hoek: ","Tegenoverliggend: ") ------------------------------- ****89;38;87(text:p)dAlpha = InputBox$ ("Enter the Alpha angle (in degrees): ","Alpha") dAlfa = InputBox$ ("Voer de Alfa hoek (in graden) in: ","Alfa") ------------------------------- ****90;38;94(text:p)Print "the length of the side adjacent the angle is"; (d1 / tan (dAlpha * Pi / 180)) Print "De lengte van de aanliggende zijde van de hoek is: "; (d1 / tan (dAlfa * Pi / 180)) ------------------------------- ****91;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03080200.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;37(subject)Exponential and Logarithmic Functions Exponentiele en Logarithmische functies ------------------------------- ****58;58;37(help:link)Exponential and Logarithmic Functions Exponentiele en Logarithmische functies ****59;39;69(text:p)The following exponential and logarithmic functions are supported in De volgende exponentiele en logaritmische functies worden ondersteund in ****59;126;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****59;157;7() Basic. BASIC. ####Text\SBASIC\COMMON\03080201.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)Exp-Function [Runtime] Exp functie [Runtime] ------------------------------- ****68;58;22(help:link)Exp-Function [Runtime] Exp functie [Runtime] ****69;39;75(text:p)Returns the base of the natural logarithm (e = 2.718282) raised to a power. Geeft de basis van het natuurlijke logaritme (e = 2.718282) verhoogd tot een macht. ------------------------------- ****71;71;6(text:span)Syntax Syntaxis ****71;89;1(): : ------------------------------- ****72;39;13(text:p)Exp (Number) Exp (Getal) ****72;74;3(keyword)Exp Exp ------------------------------- ****73;71;12(text:span)Return value Resultaatwaarde ****73;95;1(): : ------------------------------- ****74;39;6(text:p)Double Double ------------------------------- ****75;71;9(text:span)Parameter Parameter ****75;92;1(): : ------------------------------- ****76;39;232(text:p)Number: Any numeric expression that specifies the power by which to raise e (the base of natural logarithms). The power must be for bothsingle-precision numbers <= 88.02969 and double-precision numbers <= 709.782712893, since Getal: Elke numerieke uitdrukking die de macht specificeert waarmee e (de basis van natuurlijke logarithmen) moet worden verhoogd. De macht moet voor zowel enkel-precisie getallen <= 88.02969 en dubbel-precisie getallen <= 709.782712893 zijn, aangezien ****76;289;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****76;320;68() Basic returns an Overflow error for numbers exceeding these values. BASIC een Overflow-fout weergeeft voor getallen die deze waarden overschrijden. ------------------------------- ****77;32;8(text:p)Example: Voorbeeld: ------------------------------- ****78;38;17(text:p)Sub ExampleLogExp Sub VoorbeeldLogExp ------------------------------- ****79;38;20(text:p)Dim dValue as Double Dim dWaarde as Double ------------------------------- ****80;38;18(text:p)const b1=12.345e12 const b1=12.345e12 ------------------------------- ****81;38;17(text:p)const b2=1.345e34 const b2=1.345e34 ------------------------------- ****82;38;29(text:p)dValue=Exp( Log(b1)+Log(b2) ) dWaarde=Exp( Log(b1)+Log(b2) ) ------------------------------- ****83;38;103(text:p)MsgBox "" & dValue & chr(13) & (b1*b2) ,0,"Multiplication by logarithm" MsgBox "" & dWaarde & chr(13) & (b1*b2) ,0,"Vermenigvuldiging met logaritmen" ------------------------------- ****84;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03080202.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)Log Function [Runtime] Log functie [Runtime] ------------------------------- ****66;58;22(help:link)Log Function [Runtime] Log functie [Runtime] ****67;39;42(text:p)Returns the natural logarithm of a number. Geeft het natuurlijke logaritme van een getal weer. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;13(text:p)Log (Number) Log (Getal) ****70;74;3(keyword)Log Log ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;6(text:p)Double Double ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;76(text:p)Number: Any numeric expression for which to calculate the natural logarithm. Getal: Elke numerieke uitdrukking waaruit het natuurlijke logaritme te berekenen. ------------------------------- ****75;39;113(text:p)The natural logarithm is the logarithm to the base e. Base e is a constant with the approximate value 2.718282... Het natuurlijk logaritme is het logaritme naar de basis e. Basis e is een constante met de benaderde waarde 2.718282... ------------------------------- ****76;39;145(text:p)You can calculate logarithms to any base (n) for any number (x) by dividing the natural logarithm of x by the natural logarithm of n, as follows: U kunt logaritmen berekenen naar een willekeurige basis (n) voor een willekeurig getal (x) door het natuurlijke logaritme van x door het natuurlijke logaritme van n te delen, als volgt: ------------------------------- ****77;39;26(text:p)Log n(x) = Log(x) / Log(n) Log n(x) = Log(x) / Log(n) ------------------------------- ****78;32;8(text:p)Example: Voorbeeld: ------------------------------- ****79;38;17(text:p)Sub ExampleLogExp Sub VoorbeeldLogExp ------------------------------- ****80;38;15(text:p)Dim a as Double Dim A as Double ------------------------------- ****81;38;22(text:p)Dim const b1=12.345e12 Dim const b1=12.345e12 ------------------------------- ****82;38;21(text:p)Dim const b2=1.345e34 Dim const b2=1.345e34 ------------------------------- ****83;38;24(text:p)a=Exp( Log(b1)+Log(b2) ) A=Exp( Log(b1)+Log(b2) ) ------------------------------- ****84;38;107(text:p)MsgBox "" & a & chr(13) & (b1*b2) ,0,"Multiplication by logarithm function" MsgBox "" & A & chr(13) & (b1*b2) ,0,"Vermenigvuldiging met logaritmische functie" ------------------------------- ****85;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03080300.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;25(subject)Generating Random Numbers Genereren willekeurige getallen ------------------------------- ****56;58;25(help:link)Generating Random Numbers Genereren willekeurig getallen ****57;39;78(text:p)The following statements and functions are used for generating random numbers. De volgende argumenten en functies worden gebruikt voor het genereren van willekeurige getallen. ####Text\SBASIC\COMMON\03080301.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;29(subject)Randomize statement [Runtime] Randomize statement [Runtime] ------------------------------- ****66;58;29(help:link)Randomize statement [Runtime] Randomize argument [Runtime] ****67;39;40(text:p)Initializes the random-number generator. Initialiseert de willekeurige-getallen generator. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;19(text:p)Randomize [Number] Randomize [Getal] ****70;80;9(keyword)Randomize Randomize ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;140(text:p)Number: Any integer value that initializes the random-number generator. If Number is omitted, the current value of the system timer is used. Getal: Elke Integer-waarde die de willekeurige-getallen generator initialiseert. Als Getal is weggelaten, wordt de actuele waarde van de systeemtimer gebruikt. ------------------------------- ****73;32;8(text:p)Example: Voorbeeld: ------------------------------- ****74;38;20(text:p)Sub ExampleRandomize Sub VoorbeeldRandomize ------------------------------- ****75;38;36(text:p)Dim iVar As Integer, sText As String Dim iVar as Integer, sText as String ------------------------------- ****76;38;28(text:p)Dim iSpectral(10) As Integer Dim iSpectral(10) as Integer ------------------------------- ****78;38;16(text:p)Randomize 2^14-1 Randomize 2^14-1 ------------------------------- ****79;38;22(text:p)For iCount = 1 To 1000 For iCount = 1 to 1000 ------------------------------- ****80;38;47(text:p)iVar = Int((10 * Rnd) ) REM Bereich von 0 bis 9 iVar = Int((10 * Rnd) ) REM Bereik van 0 tot 9 ------------------------------- ****81;38;36(text:p)iSpectral(iVar) = iSpectral(iVar) +1 iSpectral(iVar) = iSpectral(iVar) +1 ------------------------------- ****82;38;11(text:p)Next iCount Next iCount ------------------------------- ****84;38;23(text:p)sText = " | " sText = " | " ------------------------------- ****85;38;19(text:p)For iCount = 0 To 9 For iCount = 0 to 9 ------------------------------- ****86;38;59(text:p)sText = sText & iSpectral(iCount) & " | " sText = sText & iSpectral(iCount) & " | " ------------------------------- ****87;38;11(text:p)Next iCount Next iCount ------------------------------- ****88;38;48(text:p)MsgBox sText,0,"Spectral Distribution" MsgBox sText,0,"Spectrale Distributie" ------------------------------- ****89;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03080302.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)Rnd Function [Runtime] Rnd functie [Runtime] ------------------------------- ****66;58;22(help:link)Rnd Function [Runtime] Rnd functie [Runtime] ****67;39;40(text:p)Returns a random number between 0 and 1. Geeft een willekeurig getal tussen 0 en 1 weer. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;19(text:p)Rnd [(Expression)] Rnd [(Expressie)] ****70;80;3(keyword)Rnd Rnd ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;6(text:p)Double Double ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;85(text:p)Expression: Any numeric expression that defines how random numbers will be generated. Expressie: Elke numerieke uitdrukking die definieert hoe willekeurige getallen zullen worden gegenereerd. ------------------------------- ****75;39;54(text:p)Less than zero: Always returns the same random number. Minder dan nul: Geeft altijd hetzelfde willekeurige getal. ------------------------------- ****76;39;66(text:p)Greater than zero: Returns the next random number in the sequence. Groter dan nul: Geeft het volgende willekeurige getal in de volgorde. ------------------------------- ****77;39;47(text:p)Zero: Returns the random number last generated. 0: Geeft het laatste gegenereerde willekeurige getal. ------------------------------- ****78;39;56(text:p)Omitted: Returns the next random number in the sequence. Weggelaten: Geeft het volgende willekeurige getal in de volgorde. ------------------------------- ****79;39;202(text:p)If the same number is passed for each successive call to the Rnd function, the same random-number sequence is generated, because the Expression parameter is used as a starting point for the next number. Als hetzelfde getal is doorgegeven voor iedere opvolgende aanroep van de Rnd-functie, wordt dezelfde willekeurige-getallenreeks gegenereerd, omdat de Expressie-parameter is gebruikt als een beginpunt voor het volgende getal. ------------------------------- ****80;39;4(text:p)The De ****80;75;3(text:span)Rnd Rnd ****80;90;138() function only returns values ranging from 0 to 1. To generate random integers in a given range, use the formula in the following example: functie geeft alleen waarden weer in het bereik van 0 tot 1. Om willekeurige gehele getallen in een gegeven bereik te genereren, gebruik de formule in het volgende voorbeeld: ------------------------------- ****81;32;8(text:p)Example: Voorbeeld: ------------------------------- ****82;38;23(text:p)Sub ExampleRandomSelect Sub VoorbeeldRandomSelect ------------------------------- ****83;38;19(text:p)Dim iVar As Integer Dim iVar as Integer ------------------------------- ****84;38;25(text:p)iVar = Int((15 * Rnd) -2) iVar = Int((15 * Rnd) -2) ------------------------------- ****85;38;16(text:p)Select Case iVar Select Case iVar ------------------------------- ****86;38;11(text:p)Case 1 To 5 Case 1 to 5 ------------------------------- ****87;38;36(text:p)Print "Number from 1 to 5" Print "Getal van 1 tot 5" ------------------------------- ****88;38;12(text:p)Case 6, 7, 8 Case 6, 7, 8 ------------------------------- ****89;38;36(text:p)Print "Number from 6 to 8" Print "Getal van 6 tot 8" ------------------------------- ****90;38;31(text:p)Case Is > 8 And iVar < 11 Case is > 8 and iVar < 11 ------------------------------- ****91;38;32(text:p)Print "Greater than 8" Print "Groter dan 8" ------------------------------- ****92;38;9(text:p)Case Else Case else ------------------------------- ****93;38;39(text:p)Print "Outside range 1 to 10" Print "Buiten bereik van 1 tot 10" ------------------------------- ****94;38;10(text:p)End Select End Select ------------------------------- ****95;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03080400.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;23(subject)Square Root Calculation Vierkantswortel berekening ------------------------------- ****56;58;23(help:link)Square Root Calculation Vierkantswortel berekening ****57;39;51(text:p)With this function, you can calculate square roots. Met deze functie kunt u vierkantswortels berekenen. ####Text\SBASIC\COMMON\03080401.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)Sqr Function [Runtime] Sqr functie [Runtime] ------------------------------- ****66;58;22(help:link)Sqr Function [Runtime] Sqr functie [Runtime] ****67;39;51(text:p)Calculates the square root of a numeric expression. Berekent de vierkantswortel van een numerieke uitdrukking. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;13(text:p)Sqr (Number) Sqr (Getal) ****70;74;3(keyword)Sqr Sqr ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;6(text:p)Double Double ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;70(text:p)Number: Any numeric expression for which to calculate the square root. Getal: Elke numerieke uitdrukking waarvan de vierkantswortel te berekenen. ------------------------------- ****75;39;146(text:p)The square root is the number to raise to the power 2 in order to get the number c (6^2 is forexample 36; therefore the square root from 36 is 6). De vierkantswortel is het getal verhoogd met de macht 2 om het getal c te krijgen (6^2 is bijvoorbeeld 36; dus de vierkantswortel van 36 is 6). ------------------------------- ****76;32;8(text:p)Example: Voorbeeld: ------------------------------- ****77;38;14(text:p)Sub ExampleSqr Sub VoorbeeldSqr ------------------------------- ****78;38;18(text:p)Dim iVar As Single Dim iVar As Single ------------------------------- ****79;38;9(text:p)iVar = 36 iVar = 36 ------------------------------- ****80;38;16(text:p)Msgbox Sqr(iVar) Msgbox Sqr(iVar) ------------------------------- ****81;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03080500.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;8(subject)Integers Gehele getallen (Integers) ------------------------------- ****56;58;8(help:link)Integers Gehele getallen (Integers) ****57;39;61(text:p)The following functions are used to round values to integers. de volgende functies worden gebruikt om waarden af te ronden tot gehele getallen. ####Text\SBASIC\COMMON\03080501.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)Fix Function [Runtime] Fix functie [Runtime] ------------------------------- ****66;58;22(help:link)Fix Function [Runtime] Fix functie [Runtime] ****67;39;96(text:p)Returns the integer value of a numeric expression by removing the fractional part of the number. Geeft de Integer-waarde van een numerieke uitdrukking door het verwijderen van het breukgedeelte van het getal. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;17(text:p)Fix (Expression) Fix (Expressie) ****70;78;3(keyword)Fix Fix ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;6(text:p)Double Double ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;70(text:p)Expression: Numeric expression from which to return the integer value. Expressie: Numerieke uitdrukking waarvan de Integer-waarde wordt weergegeven. ------------------------------- ****75;32;8(text:p)Example: Voorbeeld: ------------------------------- ****76;38;14(text:p)sub ExampleFix sub VoorbeeldFix ------------------------------- ****77;38;33(text:p)Print Fix(3.14159) REM returns 3. Print Fix(3.14159) REM Geeft weer: 3. ------------------------------- ****78;38;13(text:p)Print Fix(0) Print Fix(0) ****78;71;14(text:p)REM returns 0. REM Geeft weer: 0. ------------------------------- ****79;38;34(text:p)Print Fix(-3.14159)REM returns -3. Print Fix(-3.14159)REM Geeft weer: -3. ------------------------------- ****80;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03080502.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)Int Function [Runtime] Int functie [Runtime] ------------------------------- ****66;58;22(help:link)Int Function [Runtime] Int functie [Runtime] ****67;39;40(text:p)Returns the integer portion of a number. Geeft het Integer-deel van een getal weer. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;13(text:p)Int (Number) Int (Getal) ****70;74;3(keyword)Int Int ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;6(text:p)Double Double ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;109(text:p)Number: Any valid numeric expression. Rounds the fractional part of the number and returns the integer value. Getal: Elke geldige numerieke uitdrukking. Rondt het breukgedeeltel van het getal af en geeft de Integer-waarde weer. ------------------------------- ****75;32;8(text:p)Example: Voorbeeld: ------------------------------- ****76;38;14(text:p)sub ExampleINT sub VoorbeeldINT ------------------------------- ****77;38;43(text:p)Print Int(3.14159) REM returns the value 3. Print Int(3.14159) REM Geeft de waarde 3 weer. ------------------------------- ****78;38;37(text:p)Print Int(0) REM returns the value 0. Print Int(0) REM Geeft de waarde 0 weer. ------------------------------- ****79;38;45(text:p)Print Int(-3.14159) REM returns the value -4. Print Int(-3.14159) REM Geeft de waarde -4 weer. ------------------------------- ****80;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03080600.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;15(subject)Absolute Values Absolute waarden ------------------------------- ****56;58;15(help:link)Absolute Values Absolute waarden ****57;39;52(text:p)This function can be used to return absolute values. Deze functie kan worden gebruikt om absolute waarden weer te geven. ####Text\SBASIC\COMMON\03080601.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)Abs Function [Runtime] Abs functie [Runtime] ------------------------------- ****66;58;22(help:link)Abs Function [Runtime] Abs functie [Runtime] ****67;39;51(text:p)Returns the absolute value of a numeric expression. Geeft de absolute waarde van een numerieke uitdrukking weer. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;13(text:p)Abs (Number) Abs (Getal) ****70;74;3(keyword)Abs Abs ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;6(text:p)Double Double ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;198(text:p)Number: Any numeric expression for which to return the absolute value. Any positive number, including O, will be returned in the original; any negative number will be converted to a positive number. Getal: Een willekeurige numerieke uitdrukking waarvoor de absolute waarde wordt weergegeven. Elk positief getal, met inbegrip van O, zal in het origineel worden weergegeven; elk negatief getal zal worden geconverteerd naar een positief getal. ------------------------------- ****75;39;149(text:p)The following example uses the Absfunction to calculate the difference between two values. It doesnt matter which of the values you enter first; the Het volgende voorbeeld gebruikt de Abs-functie om het verschil tussen twee waarden te berekenen. Het maakt niet uit welke van de waarden u als eerste intoetst; de ****75;220;3(text:span)Abs Abs ****75;235;45() function corrects possible negative results. functie corrigeert mogelijke negatieve resultaten. ------------------------------- ****76;32;8(text:p)Example: Voorbeeld: ------------------------------- ****77;38;21(text:p)Sub ExampleDifference Sub VoorbeeldVerschil ------------------------------- ****78;38;18(text:p)Dim siW1 As Single Dim siW1 As Single ------------------------------- ****79;38;18(text:p)Dim siW2 As Single Dim siW2 As Single ------------------------------- ****80;38;89(text:p)siW1 = Int(InputBox$ ("Please enter the first amount","Value input")) siW1 = Int(InputBox$ ("Toets alstublieft de eerste waarde in:","Waarde invoer")) ------------------------------- ****81;38;90(text:p)siW2 = Int(InputBox$ ("Please enter the second amount","Value input")) siW2 = Int(InputBox$ (" Toets alstublieft de tweede waarde in:","Waarde invoer")) ------------------------------- ****82;38;54(text:p)Print "The difference is "; Abs(siW1 - siW2) Print "Het verschil is: "; Abs(siW1 - siW2) ------------------------------- ****83;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03080700.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;16(subject)Expression Signs Expressie tekens ------------------------------- ****56;58;16(help:link)Expression Signs Expressie tekens ****57;39;71(text:p)Use this function to return the algebraic sign of a numeric expression. Gebruik deze functie om het algebraïsch teken van een numerieke uitdrukking weer te geven. ####Text\SBASIC\COMMON\03080701.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)Sgn Function [Runtime] Sgn functie [Runtime] ------------------------------- ****75;58;22(help:link)Sgn Function [Runtime] Sgn functie [Runtime] ****76;39;127(text:p)Returns an integer number between -1 and 1 indicating whether the number passed to the function is positive, negative, or zero. Geeft een Integer-getal tussen -1 en 1 weer, aangevend of het betreffende getal van de functie positief , negatief of nul is. ------------------------------- ****78;71;6(text:span)Syntax Syntaxis ****78;89;1(): : ------------------------------- ****79;39;13(text:p)Sgn (Number) Sgn (Nummer) ****79;74;3(keyword)Sgn Sgn ------------------------------- ****80;71;12(text:span)Return value Resultaatwaarde ****80;95;1(): : ------------------------------- ****81;39;7(text:p)Integer Integer ------------------------------- ****82;71;9(text:span)Parameter Parameter ****82;92;1(): : ------------------------------- ****83;39;83(text:p)Number: Numeric expression which determines the the value returned by the function. Getal: Numerieke uitdrukking welke de Resultaatwaarde, weergegeven door de functie, bepaalt. ------------------------------- ****89;45;13(text:p)NumExpression NumExpressie ------------------------------- ****92;45;12(text:p)Return value Resultaatwaarde ------------------------------- ****98;44;8(text:p)negative Negatief ------------------------------- ****101;44;15(text:p)Sgn returns -1. Sgn geeft weer -1. ------------------------------- ****106;44;1(text:p)0 0 ------------------------------- ****109;44;14(text:p)Sgn returns 0. Sgn geeft weer 0. ------------------------------- ****114;44;8(text:p)positive Positief ------------------------------- ****117;44;14(text:p)Sgn returns 1. Sgn geeft weer 1. ------------------------------- ****122;32;8(text:p)Example: Voorbeeld: ------------------------------- ****123;38;14(text:p)Sub ExampleSgn Sub VoorbeeldSgn ------------------------------- ****124;38;29(text:p)Print sgn(-10) REM returns -1 Print sgn(-10) REM Geeft weer -1 ------------------------------- ****125;38;13(text:p)Print sgn(0) Print sgn(0) ****125;71;13(text:p)REM returns 0 REM Geeft weer 0 ------------------------------- ****126;38;14(text:p)Print sgn(10) Print sgn(10) ****126;61;13(text:p)REM returns 1 REM Geeft weer 1 ------------------------------- ****127;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03080800.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;18(subject)Converting Numbers Omzetten getallen ------------------------------- ****56;58;18(help:link)Converting Numbers Omzetten getallen ****57;39;89(text:p)The following functions can be used to convert numbers from one number format to another. De volgende functies kunnen worden gebruikt om getallen van één getalformaat naar een ander te converteren. ####Text\SBASIC\COMMON\03080801.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)Hex Function [Runtime] Hex functie [Runtime] ------------------------------- ****68;58;22(help:link)Hex Function [Runtime] Hex functie [Runtime] ****69;39;67(text:p)Returns a string that represents the hexadecimal value of a number. Geeft een tekenreeks weer die de hexadecimale waarde van een getal voorstelt. ------------------------------- ****71;71;6(text:span)Syntax Syntaxis ****71;89;1(): : ------------------------------- ****72;39;13(text:p)Hex (Number) Hex (Getal) ****72;74;3(keyword)Hex Hex ------------------------------- ****73;71;12(text:span)Return value Resultaatwaarde ****73;95;1(): : ------------------------------- ****74;39;6(text:p)String String ------------------------------- ****75;71;9(text:span)Parameter Parameter ****75;92;1(): : ------------------------------- ****76;39;71(text:p)Number: Any numeric expression to be converted to a hexadecimal number. Getal: Elke numerieke uitdrukking die moet worden geconverteerd naar een hexadecimaal getal. ------------------------------- ****77;32;8(text:p)Example: Voorbeeld: ------------------------------- ****78;38;14(text:p)Sub ExampleHex Sub VoorbeeldHex ------------------------------- ****79;38;26(text:p)REM uses BasicFormulas in REM gebruikt Basic-formules in ****79;82;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****79;113;5() Calc Calc ------------------------------- ****80;38;24(text:p)Dim a2, b2, c2 as String Dim a2, b2, c2 as String ------------------------------- ****81;38;26(text:p)a2 = "&H3E8" a2 = "&H3E8" ------------------------------- ****82;38;16(text:p)b2 = Hex2Int(a2) b2 = Hex2Int(a2) ------------------------------- ****83;38;9(text:p)MsgBox b2 MsgBox b2 ------------------------------- ****84;38;16(text:p)c2 = Int2Hex(b2) c2 = Int2Hex(b2) ------------------------------- ****85;38;9(text:p)MsgBox c2 MsgBox c2 ------------------------------- ****86;38;7(text:p)End Sub end sub ------------------------------- ****89;38;42(text:p)Function Hex2Int( sHex As String ) As Long Function Hex2Int( sHex as String ) as Long ------------------------------- ****90;54;52(text:p)REM Returns a Long-Integer from a hexadecimal value. REM Geeft een Long-Integer-waarde weer uit een hexadecimaal waarde. ------------------------------- ****91;38;22(text:p)Hex2Int = clng( sHex ) Hex2Int = clng( sHex ) ------------------------------- ****92;38;12(text:p)End Function end function ------------------------------- ****94;38;42(text:p)Function Int2Hex( iLong As Long) As String Function Int2Hex( iLong as Long) as String ------------------------------- ****95;54;46(text:p)REM Calculates a hexadecimal value in Integer. REM Berekent een hexadecimale waarde in Integer. ------------------------------- ****96;38;47(text:p)Int2Hex = "&H" & Hex( iLong ) Int2Hex = "&H" & Hex( iLong ) ------------------------------- ****97;38;12(text:p)End Function end function ####Text\SBASIC\COMMON\03080802.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)Oct Function [Runtime] Oct functie [Runtime] ------------------------------- ****66;58;22(help:link)Oct Function [Runtime] Oct functie [Runtime] ****67;39;36(text:p)Returns the octal value of a number. Geeft de octale waarde van een getal weer. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;13(text:p)Oct (Number) Oct (Getal) ****70;74;3(keyword)Oct Oct ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;6(text:p)String String ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;65(text:p)Number: Any numeric expression to be converted to an octal value. Getal: Elke numerieke uitdrukking die moet worden geconverteerd naar een octale waarde. ------------------------------- ****75;32;8(text:p)Example: Voorbeeld: ------------------------------- ****76;38;14(text:p)Sub ExampleOkt Sub VoorbeeldOkt ------------------------------- ****77;38;15(text:p)Msgbox Oct(255) Msgbox Oct(255) ------------------------------- ****78;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03090000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;29(subject)Controlling Program Execution Controleren programmauitvoering ------------------------------- ****56;58;29(help:link)Controlling Program Execution Controleren programmauitvoering ****57;39;72(text:p)The following statements are used to control the execution of a program. De volgende argumenten worden gebruikt om de uitvoering van een programma te controleren. ------------------------------- ****59;39;498(text:p)Normally, a program proceeds from top to bottom. However, in some cases you may want to only execute certain procedures within the program if specific conditions are fulfilled. Or you may wish to repeat a section of the program within a subprocedure or function. In this case, you can use so-called "Loops" to repeat parts of a program as many times as necessary, or until a certain condition is met. These type of control statements are classified as Condition, Loop, or Jump statements. Normaal gesproken werkt een programma van boven naar beneden. Echter, in sommige gevallen zou u bepaalde procedures binnen het programma alleen willen uitvoeren als aan specifieke voorwaarden wordt voldaan. Of u zou een gedeelte van het programma binnen een subprocedure of functie wensen te herhalen. In dat geval kunt u gebruik zogenaamde "Loops" gebruiken om delen van een programma net zoveel keer te herhalen als nodig of totdat aan een bepaalde voorwaarde wordt voldaan. Dit soort controle-argumenten worden geklassificeerd als Voorwaarde-, Loop- of Jump-argumenten. ####Text\SBASIC\COMMON\03090100.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;20(subject)Condition statements Voorwaarde argumenten ------------------------------- ****56;58;20(help:link)Condition statements Voorwaarde argumenten ****57;39;49(text:p)The following statements are based on conditions. De volgende argumenten zijn gebaseerd op voorwaarden. ####Text\SBASIC\COMMON\03090101.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;36(subject)If...Then...Else statement [Runtime] If...Then...Else argument [Runtime] ------------------------------- ****86;58;36(help:link)If...Then...Else statement [Runtime] If...Then...Else argument [Runtime] ****87;39;86(text:p)Defines one or more statement blocks to be executed only if a given condition is True. Definieert één of meer argumentblokken die moeten worden uitgevoerd alleen als een bepaalde voorwaarde Waar is. ------------------------------- ****89;71;6(text:span)Syntax Syntaxis ****89;89;1(): : ------------------------------- ****90;39;111(text:p)If condition=true Then statementblock [ElseIf condition=true Then] statementblock [Else] statementblock End If If voorwaarde=waar Then argumentblok [ElseIf voorwaarde=waar Then] argumentblok [Else] argumentblok End If ****90;172;2(keyword)If If ------------------------------- ****91;71;9(text:span)Parameter Parameter ****91;92;1(): : ------------------------------- ****92;39;4(text:p)The Het ****92;75;9(text:span)If...Then If...Then ****92;96;81() statement is used to execute program blocks depending on given conditions. When argument wordt gebruikt om programmablokken afhankelijk van bepaalde voorwaarden uit te voeren. Als ****92;195;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****92;226;21() Basic encounters an BASIC tegenkomt een ****92;279;2(text:span)If If ****92;293;87() statement, the condition is tested. If True, all subsequent statements up to the next argument, wordt de voorwaarde getest. Als Waar, worden alle erop volgende argumenten tot het volgende ****92;412;4(text:span)Else Else ****92;428;4() or of ****92;464;6(text:span)ElseIf ElseIf ****92;482;59() statement are executed. If the condition is False, and an argument uitgevoerd. Als de voorwaarde is Onwaar en een ****92;573;6(text:span)ElseIf ElseIf ****92;591;20() statement follows, argument volgt, ****92;629;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****92;660;149() Basic tests the next condition and executes the following statements if the condition is True. If False, the program continues either with the next BASIC testen de volgende voorwaarde en voert de volgende argumenten uit als de voorwaarde is Waar. Indien Onwaar vervolgt het programma of met het volgende ****92;841;6(text:span)ElseIf ElseIf ****92;859;4() or of ****92;895;4(text:span)Else Else ****92;921;32()statement. statements following argument. Argumenten volgend op ****92;985;4(text:span)Else Else ****92;1001;210() are executed only if none of the previously tested conditions were True. After all conditions have been evaluated, and the corresponding statements executed, the program continues with the statement following worden uitgevoerd alleen als geen van de eerder geteste voorwaarden Waar was. Na alle voorwaarden te hebben geëvalueerd en de overeenkomstige argumenten werden uitgevoerd, vervolgt het programma met de uitdrukking volgend op ****92;1243;5(text:span)EndIf EndIf ****92;1260;1(). . ------------------------------- ****93;39;9(text:p)Multiple Meerdere ****93;80;9(text:span)If...Then If...Then ****93;101;26() statements may be nested. argumenten kunnen worden genest. ------------------------------- ****94;71;4(text:span)Else Else ****94;87;5() and en ****94;124;6(text:span)ElseIf ElseIf ****94;142;25() statements are optional. argumenten zijn optioneel. ------------------------------- ****104;45;12(text:p)You can use U kunt wel gebruiken ****104;89;4(text:span)GoTo GoTo ****104;105;5() and en ****104;142;5(text:span)GoSub GoSub ****104;159;19() to jump out of an om te springen uit een ****104;210;9(text:span)If...Then If...Then ****104;231;32() block, but not to jump into an blok, maar niet om te springen in een ****104;295;9(text:span)If...Then If...Then ****104;316;11() structure. structuur. ------------------------------- ****110;39;128(text:p)The following example enables you to enter the expiration date of a product, and returns whether the expiration date has passed. Het volgende voorbeeld maakt het u mogelijk om de vervaldatum van een produkt in te voeren en geeft aan of de vervaldatum is gepasseerd. ------------------------------- ****111;32;8(text:p)Example: Voorbeeld: ------------------------------- ****112;38;21(text:p)Sub ExampleIfThenDate Sub VoorbeedIfThenDate ------------------------------- ****113;38;19(text:p)Dim sDate as String Dim sDate as String ------------------------------- ****114;38;20(text:p)Dim sToday as String Dim sToday as String ------------------------------- ****116;38;68(text:p)sDate = InputBox("Enter the expiration date (MM.DD.YYYY)") sDate = InputBox("Voer de vervaldatum in : (DD-MM-JJJJ)") ------------------------------- ****117;38;27(text:p)sDate = Right$(sDate, 4) + sDate = Right$(sDate, 4) + ****117;74;18(text:p)Mid$(sDate, 4, 2) Mid$(sDate, 4, 2) ****117;101;17(text:p)+ Left$(sDate, 2) + Left$(sDate, 2) ------------------------------- ****118;38;14(text:p)sToday = Date$ sToday = Date$ ------------------------------- ****119;38;28(text:p)sToday = Right$(sToday, 4)+ sToday = Right$(sToday, 4)+ ****119;86;19(text:p)Mid$(sToday, 4, 2) Mid$(sToday, 4, 2) ****119;114;18(text:p)+ Left$(sToday, 2) + Left$(sToday, 2) ------------------------------- ****120;38;25(text:p)If sDate < sToday Then If sDate < sToday then ------------------------------- ****121;38;49(text:p)MsgBox "The expiration date has passed" MsgBox "De vervaldatum is gepasseerd!" ------------------------------- ****122;38;29(text:p)ElseIf sDate > sToday Then ElseIf sDate > sToday then ------------------------------- ****123;38;57(text:p)MsgBox "The expiration date has not yet passed" MsgBox "De vervaldatum is nog niet gepasseerd !" ------------------------------- ****124;38;4(text:p)Else Else ------------------------------- ****125;38;47(text:p)MsgBox "The expiration date is today" MsgBox "De vervaldatum is VANDAAG !" ------------------------------- ****126;38;6(text:p)End If End If ------------------------------- ****128;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03090102.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;33(subject)Select...Case statement [Runtime] Case argument [Runtime] ------------------------------- ****66;58;33(help:link)Select...Case statement [Runtime] Case argument [Runtime] ****67;39;77(text:p)Defines one or more statement blocks depending on the value of an expression. Definieert één of meer argumentblokken, afhankelijk van de waarde van een uitdrukking. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;123(text:p)Select Case condition Case expression statementBlock[Case expression2 statementBlock][Case Else] statementBlock End Select Select Case voorwaarde Case expressie argumentBlok[Case expressie2 argumentBlok][Case Else] argumentBlok End Select ****70;184;6(keyword)Select Select ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;118(text:p)Condition: Any expression which controls whether the statement block following the respective Case clause is executed. Voorwaarde: Elke uitdrukking die controleert of het argumentblok, volgend op de respectievelijke Case-bijzin, wordt uitgevoerd. ------------------------------- ****73;39;136(text:p)Expression : Any expression compatible with the Condition type expression. The statement block following the Case clause is executed if Expressie : Elke uitdrukking uitwisselbaar met de Voorwaarde-type-uitdrukking. Het argumentblok volgend op de Case-bijzin wordt uitgevoerd als ****73;207;9(text:span)Condition Voorwaarde ****73;228;9() matches overeenkomt met ****73;269;10(text:span)Expression Expressie ****73;291;1(). . ------------------------------- ****74;32;8(text:p)Example: Voorbeeld: ------------------------------- ****75;38;23(text:p)Sub ExampleRandomSelect Sub VoorbeeldRandomSelect ------------------------------- ****76;38;19(text:p)Dim iVar As Integer Dim iVar as Integer ------------------------------- ****77;38;25(text:p)iVar = Int((15 * Rnd) -2) iVar = Int((15 * Rnd) -2) ------------------------------- ****78;38;16(text:p)Select Case iVar Select Case iVar ------------------------------- ****79;38;11(text:p)Case 1 To 5 Case 1 to 5 ------------------------------- ****80;38;36(text:p)Print "Number from 1 to 5" Print "Getal van 1 tot 5" ------------------------------- ****81;38;12(text:p)Case 6, 7, 8 Case 6, 7, 8 ------------------------------- ****82;38;36(text:p)Print "Number from 6 to 8" Print "Getal van 6 tot 8" ------------------------------- ****83;38;31(text:p)Case Is > 8 And iVar < 11 Case is > 8 and iVar < 11 ------------------------------- ****84;38;32(text:p)Print "Greater than 8" Print "Groter dan 8" ------------------------------- ****85;38;9(text:p)Case Else Case Else ------------------------------- ****86;38;38(text:p)Print "Out of range 1 to 10" Print "Buiten bereik van 1 tot 10" ------------------------------- ****87;38;10(text:p)End Select End Select ------------------------------- ****88;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03090103.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;23(subject)IIf statement [Runtime] IIf argument [Runtime] ------------------------------- ****62;58;23(help:link)IIf statement [Runtime] IIf argument [Runtime] ****63;39;105(text:p)Returns one of two possible function results, depending on the logical value of the evaluated expression. Geeft één van twee mogelijke functieresultaten weer, afhankelijk van de logische waarde van de geëvalueerde uitdrukking. ------------------------------- ****65;71;6(text:span)Syntax Syntaxis ****65;89;1(): : ------------------------------- ****66;39;50(text:p)IIf (Expression, ExpressionTrue, ExpressionFalse) IIf (Expressie, ExpressieTrue, ExpressieFalse) ****66;111;3(keyword)IIf IIf ------------------------------- ****67;71;9(text:span)Parameter Parameter ****67;92;1(): : ------------------------------- ****68;39;75(text:p)Expression: Any expression to be evaluated. If the expression evaluates to Expressie: Elke uitdrukking die moet worden geëvalueerd. Als de uitdrukking evalueert naar ****68;146;4(text:span)True True ****68;162;104(), the function returns the result of ExpressionTrue; otherwise it returns the result of ExpressionFalse. , geeft de functie het resultaat van ExpressieTrue weer; anders geeft het het resultaat van ExpressieFalse weer. ------------------------------- ****69;39;141(text:p)ExpressionTrue, ExpressionFalse : Any expressions, one of which will be returned as the function result, depending on the logical evaluation. ExpressieTrue, ExpressieFalse : Elke uitdrukking, waarvan één zal worden weergegeven als het functieresultaat, afhankelijk van de logische evaluatie. ####Text\SBASIC\COMMON\03090200.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;5(subject)Loops Loops ------------------------------- ****56;58;5(help:link)Loops Loops ****57;39;51(text:p)The following statements are used to execute loops. De volgende argumenten worden gebruikt om Loops uit te voeren. ####Text\SBASIC\COMMON\03090201.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;29(subject)Do...Loop statement [Runtime] Do...Loop argument [Runtime] ------------------------------- ****67;58;29(help:link)Do...Loop statement [Runtime] Do...Loop argument [Runtime] ****68;39;125(text:p)Repeats the statements between the Do and the Loop statement while the condition is True or until the condition becomes True. Herhaalt de argumenten tussen het Do- en het Loop-argument terwijl de voorwaarde Waar is of totdat de voorwaarde Waar wordt. ------------------------------- ****70;32;6(text:p)Syntax Syntaxis ------------------------------- ****71;61;2(keyword)Do Do ****71;82;5(text:p)Do [{ Do [{ ****71;109;5(keyword)While While ****71;133;8(text:p)While | While | ****71;163;5(keyword)Until Until ****71;187;24(text:p)Until} condition = Waar] Until} voorwaarde = True] ------------------------------- ****72;39;15(text:p)statement block argumentblok ------------------------------- ****73;32;9(text:p)[Exit Do] [Exit Do] ------------------------------- ****74;39;15(text:p)statement block argumentblok ------------------------------- ****75;61;4(keyword)Loop Loop ****75;84;4(text:p)Loop Loop ------------------------------- ****76;39;2(text:p)or of ------------------------------- ****77;39;2(text:p)Do Do ------------------------------- ****78;39;15(text:p)statement block argumentblok ------------------------------- ****79;39;9(text:p)[Exit Do] [Exit Do] ------------------------------- ****80;39;15(text:p)statement block argumentblok ------------------------------- ****81;39;39(text:p)Loop [{While | Until} condition = True] Loop [{While | Until} voorwaarde = Waar] ------------------------------- ****82;32;14(text:p)Param./Element Param./Element ------------------------------- ****83;39;90(text:p)Condition: A comparison, numeric or string expression that evaluates either True or False. Voorwaarde: Een vergelijking, numerieke of tekenreeks-uitdrukking die evalueert naar Waar of Onwaar. ------------------------------- ****84;39;80(text:p)statement block: statements to be repeated while or until the condition is True. argumentblok: argumenten die worden herhaald terwijl of totdat de voorwaarde Waar is. ------------------------------- ****85;71;13(text:span)The Do...Loop Het Do...Loop ****85;96;160() statement is used to execute a loop as long as (or until) a certain condition is True. The condition for exiting the loop must be entered following either the argument wordt gebruikt om een loop zolang (of totdat) uit te voeren tot een bepaalde voorwaarde Waar is. De voorwaarde voor het beëindigen van de loop moet worden ingevoerd volgend op óf het ****85;288;2(text:span)Do Do ****85;302;8() or the óf het ****85;342;4(text:span)Loop Loop ****85;358;58() statement. The following examples are valid combinations: argument. De volgende voorbeelden zijn geldige combinaties: ------------------------------- ****86;32;6(text:p)Syntax Syntaxis ------------------------------- ****87;39;25(text:p)Do While condition = True Do While voorwaarde = Waar ------------------------------- ****88;39;18(text:p)...statement block ...argumentblok ------------------------------- ****89;32;4(text:p)Loop Loop ------------------------------- ****90;39;101(text:p)The program tests the condition. If the condition is False, the program continues directly after the Het programma test de voorwaarde. Als de voorwaarde Onwaar is, vervolgt het programma direct na het ****90;172;4(text:span)Loop Loop ****90;198;41()statement. If the condition is True, the argument. Als de voorwaarde Waar is, de ****90;271;4(text:span)loop loop ****90;287;49() is activated, and the program jumps back to the is geactiveerd, en het programma springt terug naar het ****90;368;2(text:span)Do Do ****90;392;145()statement. If the condition is still True, the loop will be repeated, otherwise the program execution continues with the statement following the argument. Als de voorwaarde nog steeds Waar is, zal de loop worden herhaald, anders vervolgt de uitvoering van het programma met de uitdrukking volgend op het ****90;569;4(text:span)Loop Loop ****90;585;11() statement. argument. ------------------------------- ****91;39;73(text:p)To summarize: The loop will be repeated as long as the condition is true. Om samen te vatten: De lLoop zal worden herhaald zolang aan de voorwaarde is voldaan. ------------------------------- ****92;39;25(text:p)Do Until condition = True Do Until voorwaarde = Waar ------------------------------- ****93;39;18(text:p)...statement block ...argument blok ------------------------------- ****94;39;4(text:p)Loop Loop ------------------------------- ****95;39;100(text:p)The program tests the condition. If the condition is True, the program continues directly after the Het programma test de voorwaarde. Als de voorwaarde Waar is, vervolgt het programma direct na het ****95;171;4(text:span)Loop Loop ****95;197;45()statement. If the condition is not True, the argument. Als de voorwaarde niet Waar is, de ****95;274;4(text:span)loop loop ****95;290;49() is activated, and the program jumps back to the is geactiveerd en het programma springt terug naar het ****95;371;2(text:span)Do Do ****95;385;150() statement. If the condition is still not True, the loop will be repeated, otherwise the program execution continues with the statement following the argument. Als de voorwaarde nog steeds niet Waar is, zal de lus worden herhaald, anders vervolgt de uitvoering van het programma met de uitdrukking volgend op het ****95;567;4(text:span)Loop Loop ****95;583;11() statement. argument. ------------------------------- ****96;39;124(text:p)To summarize: The loop will only be repeated, if the condition is False at first, and then until the condition becomes true. Om samen te vatten: De loop zal alleen worden herhaald, als de voorwaarde eerst Onwaar is en dan totdat de voorwaarde Waar wordt. ------------------------------- ****97;39;2(text:p)Do Do ------------------------------- ****98;39;18(text:p)...statement block ...argumentblok ------------------------------- ****99;39;27(text:p)Loop While condition = True Loop While voorwaarde = Waar ------------------------------- ****100;39;51(text:p)The program initiates the loop immediately. At the Het programma activeert de loop meteen. Op het ****100;122;4(text:span)Loop Loop ****100;138;110() statement, the condition is tested. If the condition is True, the program repeats the loop starting from the argument, de voorwaarde is getest. Als de voorwaarde Waar is, herhaalt het programma de loop beginnend vanaf het ****100;280;2(text:span)Do Do ****100;294;46() statement. Only when the condition following argument. Alleen wanneer de voorwaarde volgend op ****100;372;4(text:span)Loop Loop ****100;388;45() becomes False,the program will end the loop. wordt Onwaar, zal het programma de lus beëindigen. ------------------------------- ****101;39;45(text:p)To summarize: The statements within the loop Om samen te vatten: De argumenten binnen de loop ****101;93;73(text:p)will be executed once in each case, and as long as the condition is true. zullen in elk geval één keer worden uitgevoerd en dan zolang als aan de voorwaarde is voldaan. ------------------------------- ****102;39;2(text:p)Do Do ------------------------------- ****103;39;18(text:p)...statement block ...argumentblok ------------------------------- ****104;39;27(text:p)Loop Until condition = True Loop Until voorwaarde = Waar ------------------------------- ****105;39;51(text:p)The program initiates the loop immediately. At the Het programma activeert de loop meteen. Op het ****105;122;4(text:span)Loop Loop ****105;138;114() statement, the condition is tested. If the condition is not True, the program repeats the loop starting from the argument, de voorwaarde is getest. Als de voorwaarde niet Waar is, herhaalt het programma de loop beginnend vanaf het ****105;284;2(text:span)Do Do ****105;298;46() statement. Only when the condition following argument. Alleen wanneer de voorwaarde volgend op ****105;376;4(text:span)Loop Loop ****105;402;44()becomes True, the program will end the loop. Waar wordt, zal het programma de lus beëindigen. ------------------------------- ****106;39;118(text:p)To summarize: The statements within the loop will be executed once in each case, and until the condition becomes true. Om samen te vatten: De argumenten binnen de loop zullen in elke geval één keer worden uitgevoerd en totdat de voorwaarde Waar wordt. ------------------------------- ****107;39;190(text:p)The main difference between the above mentioned statements is that in the first two cases, the loop is initiated dependent on the condition. In the last two examples, the statements between Het hoofdverschil tussen de bovengenoemde argumenten is dat in de eerste twee gevallen, de loop, afhankelijk van de voorwaarde, is ingeleid. In de laatste twee voorbeelden, de argumenten tussen ****107;261;2(text:span)Do Do ****107;275;5() und en ****107;312;4(text:span)Loop Loop ****107;328;28() are executed once at least. worden tenminste één keer uitgevoerd. ------------------------------- ****108;39;4(text:p)The Het ****108;75;7(text:span)Exit Do Exit Do ****108;94;85() statement ends the loop unconditionally. This statement is placed anywhere within a argument beëindigt de loop onvoorwaardelijk. Dit argument wordt geplaatst waar dan ook binnen een ****108;211;2(text:span)Do Do ****108;225;3()... ... ****108;260;4(text:span)Loop Loop ****108;276;55() statement. You can define an exit condition using the argument. U kunt een beëindigen-voorwaarde definiëren met behulp van de ****108;363;9(text:span)If...Then If...Then ****108;384;22() structure as follows: structuur als volgt: ------------------------------- ****109;39;5(text:p)Do... Do... ------------------------------- ****110;39;10(text:p)statements argumenten ------------------------------- ****111;39;32(text:p)If condition = True Then Exit Do If voorwaarde = Waar then Exit Do ------------------------------- ****112;39;10(text:p)statements argumenten ------------------------------- ****113;39;7(text:p)Loop... Loop... ------------------------------- ****114;32;7(text:p)Example Voorbeeld ------------------------------- ****116;39;17(text:p)Sub ExampleDoLoop Sub VoorbeeldDoLoop ------------------------------- ****117;39;19(text:p)Dim sFile As String Dim sFile as String ------------------------------- ****118;38;19(text:p)Dim sPath As String Dim sPath as String ------------------------------- ****119;38;23(text:p)sPath = "c:\" sPath = "c:\" ------------------------------- ****120;38;24(text:p)sFile = Dir$( sPath ,22) sFile = Dir$( sPath ,22) ------------------------------- ****121;38;35(text:p)If sFile <> "" Then If sFile <> "" then ------------------------------- ****122;38;2(text:p)Do Do ------------------------------- ****123;38;12(text:p)MsgBox sFile MsgBox sFile ------------------------------- ****124;38;12(text:p)sFile = Dir$ sFile = Dir$ ------------------------------- ****125;38;31(text:p)Loop Until sFile = "" Loop Until sFile = "" ------------------------------- ****126;38;6(text:p)End If End If ------------------------------- ****127;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03090202.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ATTENTIE: In verband met het niet werken van de in dit XML-bestand voorkomende voorbeeldmacro zijn 3 regels verwijderd. Dit betekent dat de laatste 3 zinnen naar boven zijn verplaatst en de foutieve zinnen zijn weggelaten. Bij de laatste drie tekstblokken zijn dus geen vertaalde teksten geplaatst. Deze zijn drie tekstblokken naar boven verplaatst. De macro werkt dan feilloos. ------------------------------- ****6;15;30(subject)For...Next statement [Runtime] For...Next argument [Runtime] ------------------------------- ****69;58;30(help:link)For...Next statement [Runtime] For...Next argument [Runtime] ****70;39;81(text:p)Repeats the statements between the For....Next block a specified number of times. Herhaalt de argumenten tussen het For...Next-blok een gespecificeerd aantal keren. ------------------------------- ****72;32;7(text:p)Syntax: Syntaxis: ------------------------------- ****73;61;3(keyword)For For ****73;83;18(text:p)For counter=start For teller=start ****73;123;2(keyword)To To ****73;144;8(text:p)To end [ To end [ ****73;174;4(keyword)Step Step ****73;197;10(text:p)Step step] Step Stap] ------------------------------- ****74;39;15(text:p)statement block argumentblok ------------------------------- ****75;32;10(text:p)[Exit For] [Exit For] ------------------------------- ****76;39;15(text:p)statement block argumentblok ------------------------------- ****77;61;4(keyword)Next Next ****77;84;14(text:p)Next [counter] Next [teller] ------------------------------- ****78;32;16(text:p)Variables : Task Variabelen : Taak ------------------------------- ****79;39;216(text:p)Counter: Loop counter initially assigned the value to the right of the equal sign (start). Only numeric variables are valid. The loop counter increases or decreases according to the variable Step until End is passed. Teller: Loop-teller in het begin de waarde rechts van het "is gelijk"-teken (Start) toegekend. Alleen numerieke variabelen zijn geldig. De loop-teller vermeerdert of vermindert volgens de variabele Stap totdat Einde is gepasseerd. ------------------------------- ****80;39;82(text:p)Start: Numeric variable that defines the initial value at which to begin the loop. Start: Numerieke variabele die de beginwaarde waarop de loop moet beginnen definieert. ------------------------------- ****81;39;76(text:p)End: Numeric variable that defines the final value at which to end the loop. Einde: Numerieke variabele die de uiteindelijke waarde, waarop de loop moet worden beëindigd, definieert. ------------------------------- ****82;39;237(text:p)Step: Sets the value by which to increase or decrease the loop counter. If Step is not specified, the incremented value is 1. End must be greater than Start in this case. If you want to decrease Counter, End must be less than Start, and Stap: Stelt de waarde in waarmee de loop-teller moet worden vergroot of vermindert. Als Stap niet gespecificeerd wordt, is de vaste waarde 1. Einde moet groter zijn dan Start in dit geval. Als u Teller wilt verminderen, moet Einde minder zijn dan Start en ****82;308;4(text:span)Step Stap ****82;324;35() must be assigned a negative value. moet een negatieve waarde worden toegekend. ------------------------------- ****83;39;4(text:p)The De ****83;75;10(text:span)For...Next For...Next ****83;97;107() loop is used to repeat all statements between these two key words as often as specified by the parameters. loop wordt gebruikt voor het herhalen van alle argumenten tussen deze twee sleutelwoorden zo vaak als wordt gespecificeerd door de parameters. ------------------------------- ****84;39;38(text:p)As the counter variable is decreased, Als de Teller-variabele wordt verminderd, ****84;95;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****84;126;127() Basic proofs whether the end value has been reached. As soon as the counter passes the end value, the loop automatically ends. BASIC test of de eindwaarde is bereikt. Zodra de teller de eindwaarde passeeert, eindigt de loop automatisch. ------------------------------- ****85;39;23(text:p)It is possible to nest Het is mogelijk om te nesten ****85;94;10(text:span)For...Next For...Next ****85;116;60() statements. If you do not specify a variable following the argumenten. Als u niet een variabele specificeert volgend op het ****85;208;4(text:span)Next Next ****85;224;12() statement, argument, ****85;268;4(text:span)Next Next ****85;284;48() always automatically refers to the most recent verwijst altijd automatisch naar het meest recente ****85;364;3(text:span)For For ****85;379;11() statement. argument. ------------------------------- ****86;39;57(text:p)If you specify an increment of 0, the statements between Als u een stap van 0 specificeert, de argumenten tussen ****86;128;3(text:span)For For ****86;143;5() and en ****86;180;4(text:span)Next Next ****86;196;27() are repeated continuously. worden voortdurend herhaald. ------------------------------- ****87;39;41(text:p)When counting down the counter variable, Tijdens het terugtellen van de Teller-variabele, ****87;98;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****87;129;217() Basic checks for overflow or underflow. You need not take care for Counter to equal exactly the value for End. The loop ends when Counter exceeds End (positive Step value) or gets less than End (negative Step value). BASIC controleert op overstromen of ondermaats presteren. U hoeft er niet op te letten of Teller precies de waarde voor Einde heeft. De loop eindigt als Teller groter is dan Einde (positieve Stap-waarde) of minder dan Einde wordt (negatieve Stap-waarde). ------------------------------- ****88;39;10(text:p)Using the Met behulp van het ****88;81;8(text:span)Exit For Exit For ****88;101;84() statement, the loop can be exited unconditionally. This statement must be within a argument, kan de loop onvoorwaardelijk worden beëindigd. Dit argument moet zijn binnen een ****88;217;9(text:span)For..Next For..Next ****88;238;15() loop. Use the loop. Gebruik het ****88;285;9(text:span)If...Then If...Then ****88;306;49() statement to test the exit condition as follows: argument om de beëindigen-voorwaarde te testen als volgt: ------------------------------- ****89;39;6(text:p)For... For... ------------------------------- ****90;39;10(text:p)statements argumenten ------------------------------- ****91;39;33(text:p)If condition = True Then Exit For If voorwaarde = Waar then exit for ------------------------------- ****92;39;10(text:p)statements argumenten ------------------------------- ****93;39;4(text:p)Next Next ------------------------------- ****94;39;16(text:p)Note: In nested Let op: In geneste ****94;87;10(text:span)For...Next For...Next ****94;109;48() loops, if you exit a loop unconditionally with loops, als u een loop onvoorwaardelijk beëindigd met ****94;189;8(text:span)Exit For Exit For ****94;209;26(), only one loop is exited. , wordt alleen één loop beëindigd . ------------------------------- ****95;32;7(text:p)Example Voorbeeld ------------------------------- ****96;39;142(text:p)The following example uses two nested loops to sort a string array with 10 elements ( sEntry() ), that are first filled with various contents: Het volgende voorbeeld gebruikt twee geneste loops om een tekenreeksmatrix met 10 elementen ( sEntry() ), die eerst zijn gevuld met verschillende inhoud, te sorteren: ------------------------------- ****97;39;15(text:p)Sub ExampleSort Sub VoorbeeldSort ------------------------------- ****98;39;24(text:p)Dim sEntry(10) As String Dim sInvoer(10) as String ------------------------------- ****99;39;21(text:p)Dim iCount As Integer Dim iTeller as Integer ------------------------------- ****100;38;22(text:p)Dim iCount2 As Integer Dim iTeller2 as Integer ------------------------------- ****101;38;19(text:p)Dim sTemp As String Dim sTemp as String ------------------------------- ****102;38;29(text:p)sEntry(1) = "Patty" sInvoer(1) = "Patty" ------------------------------- ****103;38;28(text:p)sEntry(2) = "Kurt" sInvoer(2) = "Kurt" ------------------------------- ****104;38;30(text:p)sEntry(3) = "Thomas" sInvoer(3) = "Thomas" ------------------------------- ****105;38;31(text:p)sEntry(4) = "Michael" sInvoer(4) = "Michael" ------------------------------- ****106;38;29(text:p)sEntry(5) = "David" sInvoer(5) = "David" ------------------------------- ****107;38;29(text:p)sEntry(6) = "Cathy" sInvoer(6) = "Cathy" ------------------------------- ****108;38;29(text:p)sEntry(7) = "Susie" sInvoer(7) = "Susie" ------------------------------- ****109;38;30(text:p)sEntry(8) = "Edward" sInvoer(8) = "Edward" ------------------------------- ****110;38;33(text:p)sEntry(9) = "Christine" sInvoer(9) = "Christine" ------------------------------- ****111;38;30(text:p)sEntry(10) = "Jerry" sInvoer(10) = "Jerry" ------------------------------- ****113;38;20(text:p)For iCount = 1 To 10 For iTeller = 1 to 10 ------------------------------- ****114;38;30(text:p)For iCount2 = iCount + 1 To 10 For iTeller2 = iTeller + 1 to 10 ------------------------------- ****115;38;43(text:p)If sEntry(iCount) > sEntry(iCount2) Then If sInvoer(iTeller) > sInvoer(iTeller2) then ------------------------------- ****116;38;22(text:p)sTemp = sEntry(iCount) sTemp = sInvoer(iTeller) ------------------------------- ****117;38;32(text:p)sEntry(iCount) = sEntry(iCount2) sInvoer(iTeller) = sInvoer(iTeller2) ------------------------------- ****118;38;23(text:p)sEntry(iCount2) = sTemp sInvoer(iTeller2) = sTemp ------------------------------- ****119;38;6(text:p)End If End If ------------------------------- ****120;38;12(text:p)Next iCount2 Next iTeller2 ------------------------------- ****121;38;11(text:p)Next iCount Next iTeller ------------------------------- ****123;38;20(text:p)For iCount = 1 To 10 For iTeller = 1 to 10 ------------------------------- ****124;38;20(text:p)Print sEntry(iCount) Print sInvoer(iTeller) ------------------------------- ****125;38;7(text:p)End Sub Next iTeller ------------------------------- ****126;38;20(text:p)For iCount = 1 To 10 end sub ------------------------------- ****127;38;20(text:p)Print sEntry(iCount) ------------------------------- ****128;38;11(text:p)Next iCount ------------------------------- ****129;38;7(text:p)End Sub ####Text\SBASIC\COMMON\03090203.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;31(subject)While...Wend statement[Runtime] While...Wend argument[Runtime] ------------------------------- ****66;58;31(help:link)While...Wend statement[Runtime] While...Wend argument[Runtime] ****67;39;260(text:p)If the program encounters a While statement, it tests the condition. If the condition is False, the program continues directly following the Wend statement. If the condition is True, the loop is executed until the program finds Wend and then jumps back to the Als het programma een While-argument tegenkomt, test het de voorwaarde. Als de voorwaarde Onwaar is, vervolgt het programma direct met het volgende Wend-argument. Als de voorwaarde Waar is, wordt de lus uitgevoerd totdat het programma Wend vindt en springt dan terug naar het ****67;340;6(text:span)While While ****67;367;141()statement. If the condition is still True, the loop will be executed again; otherwise the program continues with the statement following the argument. Als de voorwaarde nog steeds Waar is, zal de lus nogmaals worden uitgevoerd; anders vervolgt het programma met de uitdrukking volgend op het ****67;549;5(text:span)Wend Wend ****67;575;10()statement. argument. ------------------------------- ****69;39;11(text:p)Opposed to Tegengesteld aan ****69;85;9(help:link)Do...Loop Do...Loop ****69;106;4(), a , een ****69;151;12(text:span)While...Wend While...Wend ****69;175;30() loop cannot be canceled with loop kan niet worden geannuleerd met ****69;238;4(help:link)Exit Exit ****69;254;26(). You should never exit a . U moet nooit beëindigen een ****69;312;12(text:span)While...Wend While...Wend ****69;336;11() loop with loop met ****69;380;4(help:link)GoTo GoTo ****69;396;39(), since this can cause a runtime error. , aangezien dit een runtime fout kan veroorzaken. ------------------------------- ****70;39;7(text:p)Use of Gebruik van ****70;78;9(text:span)Do...Loop Do...Loop ****70;99;47() is more flexible and is therefore recommended. is meer flexibel en wordt dus aanbevolen. ------------------------------- ****71;71;6(text:span)Syntax Syntaxis ****71;89;1(): : ------------------------------- ****72;39;33(text:p)While Condition [statement] Wend While voorwaarde [argument] Wend ****72;94;5(keyword)While While ------------------------------- ****73;32;8(text:p)Example: Voorbeeld: ------------------------------- ****74;38;20(text:p)Sub ExampleWhileWend Sub VoorbeeldWhileWend ------------------------------- ****75;38;19(text:p)Dim stext As String Dim stekst as String ------------------------------- ****76;38;19(text:p)Dim iRun As Integer Dim iRun as Integer ------------------------------- ****77;38;39(text:p)sText ="This is a short text" sTekst ="Dit is een korte tekst" ------------------------------- ****78;38;8(text:p)iRun = 1 iRun = 1 ------------------------------- ****79;38;26(text:p)while iRun < Len(sText) While iRun < Len(sTekst) ------------------------------- ****80;54;105(text:p)if Mid(sText,iRun,1 )<> " " then Mid( sText ,iRun, 1, Chr( 1 + Asc( Mid(sText,iRun,1 )) ) If Mid(sTekst,iRun,1 )<> " " then Mid( sTekst ,iRun, 1, Chr( 1 + Asc( Mid(sTekst,iRun,1 )) ) ------------------------------- ****81;54;15(text:p)iRun = iRun + 1 iRun = iRun + 1 ------------------------------- ****82;38;4(text:p)Wend Wend ------------------------------- ****83;38;39(text:p)MsgBox sText,0,"Text encoded" MsgBox sTekst,0,"Gecodeerde Tekst" ------------------------------- ****84;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03090300.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;5(subject)Jumps Sprongen ------------------------------- ****56;58;5(help:link)Jumps Sprongen ****57;39;51(text:p)The following statements are used to execute jumps. De volgende argumenten worden gebruikt om sprongen uit te voeren. ####Text\SBASIC\COMMON\03090301.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;34(subject)GoSub...Return statement [Runtime] GoSub...Return argument [Runtime] ------------------------------- ****102;58;34(help:link)GoSub...Return statement [Runtime] GoSub...Return argument [Runtime] ****103;39;213(text:p)Calls a subroutine within a Sub or Function indicated by a label. The statements following the label are executed until the next Return statement; thereafter the program continues with the statement following the Roept een subroutine binnen een Sub of Functie aan, aangegeven door een label. De argumenten volgend op het label worden uitgevoerd tot het volgende GoSub...Return-argument; daarna vervolgt het programma met de uitdrukking volgend op het ****103;284;6(text:span)GoSub GoSub ****103;311;10()statement. argument. ------------------------------- ****105;71;6(text:span)Syntax Syntaxis ****105;89;1(): : ------------------------------- ****106;39;17(text:p)see Parameter see see Parameter see ------------------------------- ****107;71;9(text:span)Parameter Parameter ****107;92;1(): : ------------------------------- ****108;39;12(text:p)Sub/Function Sub/Function ------------------------------- ****109;39;15(text:p)statement block argumentblok ------------------------------- ****110;61;5(keyword)GoSub GoSub ****110;85;11(text:p)GoSub Label GoSub Label ------------------------------- ****111;39;15(text:p)statement block statement blok ------------------------------- ****112;39;11(text:p)GoSub Label GoSub Label ------------------------------- ****113;39;17(text:p)Exit Sub/Function End Sub/Function ------------------------------- ****114;39;6(text:p)Label: Label: ------------------------------- ****115;39;15(text:p)statement block argumentblok ------------------------------- ****116;39;6(text:p)Return Return ------------------------------- ****117;39;16(text:p)End Sub/Function end Sub/Function ------------------------------- ****118;39;4(text:p)The Het ****118;75;5(text:span)GoSub GoSub ****118;92;222() statement is used to call a local subroutine from within a Sub or Function, indicated by a label that marks the first line of the subroutine. To name of the label must end with a colon (":"). After reaching the argument wordt gebruikt om een lokale subroutine binnen een Sub of Functie, aangegeven door een label dat de eerste regel van de subroutine aangeeft, aan te roepen. De naam van het label moet eindigen met een dubbele punt (":"). Na bereiken van het ****118;346;5(text:span)GoSub GoSub ****118;363;161() statement, the program continues execution with the statement directly following the label. The subsequent statements and functions are executed until the next argument, vervolgt het programma de uitvoering met de uitdrukking direct volgend op het label. De daarop volgende argumenten en functies worden uitgevoerd totdat het volgende ****118;556;6(text:span)Return Return ****118;574;44() statement. The program then returns to the argument. Het programma keert dan terug naar het ****118;650;5(text:span)GoSub GoSub ****118;667;58() statement and continues with the statement following the argument en vervolgt met de uitdrukking volgend op het ****118;757;5(text:span)GoSub GoSub ****118;774;11() statement. argument. ------------------------------- ****128;45;61(text:p)If the program encounters a Return statement not preceded by Als het programma een Return-argument tegenkomt, niet voorafgegaan door ****128;138;5(text:span)GoSub GoSub ****128;155;2(), , ****128;175;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****128;206;37() Basic returns an error message. Use BASIC geeft een foutboodschap weer. Gebruik ****128;284;8(text:span)Exit Sub Exit Sub ****128;304;4() or of ****128;340;13(text:span)Exit Function Exit Function ****128;365;95() to ensure that the program leaves a Sub or Function before reaching the next Return statement. om te verzekeren dat het programma een Sub of Functie verlaat vóór het het volgende Return-argument wordt bereikt. ------------------------------- ****143;45;208(text:p)GoSub and Return are relicts from old BASIC dialects, retained only for compatibility reasons. If you often use GoSub and Return, your program will tend to become unreadable. Subs or Functions are preferable. GoSub en Return zijn overblijfselen van oude BASIC-dialecten, alleen aangehouden voor compatibiliteitsredenen. Als u GoSub en Return vaak gebruikt, zal uw programma er naar neigen om onleesbaar te worden. Subs of Functies hebben de voorkeur. ------------------------------- ****149;39;46(text:p)The following example demonstrates the use of Het volgende voorbeeld demonstreert het gebruik van ****149;117;5(text:span)GoSub GoSub ****149;134;5() and en ****149;171;7(text:span)Return Return ****149;190;114(). By executing a program section twice, the program calculates the square root of two numbers entered by the user. . Door een programmabereik twee keer uit te voeren, berekent het programma de vierkantswortel van twee getallen, ingevoerd door de gebruiker. ------------------------------- ****150;32;8(text:p)Example: Voorbeeld: ------------------------------- ****151;38;16(text:p)Sub ExampleGoSub Sub VoorbeeldGoSub ------------------------------- ****152;38;21(text:p)dim iInputa as Single dim iInvoera as Single ------------------------------- ****153;38;21(text:p)dim iInputb as Single dim iInvoerb as Single ------------------------------- ****154;38;21(text:p)dim iInputc as Single dim iInvoerc as Single ------------------------------- ****155;38;86(text:p)iInputa = Int(InputBox$ "Enter the first number: ","NumberInput")) iInvoera = Int(InputBox$ ("Voer het eerste getal in: ","Getal Invoer")) ------------------------------- ****156;38;87(text:p)iInputb = Int(InputBox$ "Enter the second number: ","NumberInput")) iInvoerb = Int(InputBox$ ("Voer het tweede getal in: ","Getal Invoer")) ------------------------------- ****157;38;15(text:p)iInputc=iInputa iInvoerc=iInvoera ------------------------------- ****158;38;16(text:p)GoSub SquareRoot GoSub Vierkantswortel ------------------------------- ****159;38;68(text:p)Print "The square root of";iInputa;" is";iInputc Print "De vierkantswortel van ";iInvoera;" is";iInvoerc ------------------------------- ****160;38;15(text:p)iInputc=iInputb iInvoerc=iInvoerb ------------------------------- ****161;38;16(text:p)GoSub SquareRoot GoSub Vierkantswortel ------------------------------- ****162;38;68(text:p)Print "The square root of";iInputb;" is";iInputc Print "De vierkantswortel van ";iInvoerb;" is";iInvoerc ------------------------------- ****163;38;8(text:p)Exit Sub Exit Sub ------------------------------- ****164;38;11(text:p)SquareRoot: Vierkantswortel: ------------------------------- ****165;38;20(text:p)iInputc=sqr(iInputc) iInvoerc=sqr(iInvoerc) ------------------------------- ****166;38;6(text:p)Return Return ------------------------------- ****167;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03090302.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;24(subject)GoTo statement [Runtime] GoTo argument [Runtime] ------------------------------- ****102;58;24(help:link)GoTo statement [Runtime] GoTo argument [Runtime] ****103;39;96(text:p)Continues program execution within a Sub or Function at the procedure line indicated by a label. Vervolgt de programmauitvoering binnen een Sub of Functie bij de procedureregel aangegeven door een label. ------------------------------- ****105;71;6(text:span)Syntax Syntaxis ****105;89;1(): : ------------------------------- ****106;39;17(text:p)see Parameter see zie Parameter ------------------------------- ****107;71;9(text:span)Parameter Parameter ****107;92;1(): : ------------------------------- ****108;39;12(text:p)Sub/Function Sub/Function ------------------------------- ****109;39;15(text:p)statement block argumentblok ------------------------------- ****110;61;4(keyword)GoTo GoTo ****110;84;11(text:p)GoTo Label1 GoTo Label1 ------------------------------- ****111;32;7(text:p)Label2: Label2: ------------------------------- ****112;39;15(text:p)statement block argumentblok ------------------------------- ****113;39;8(text:p)Exit Sub Exit Sub ------------------------------- ****114;32;7(text:p)Label1: Label1: ------------------------------- ****115;39;15(text:p)statement block argumentblok ------------------------------- ****116;39;11(text:p)GoTo Label2 GoTo Label2 ------------------------------- ****117;39;16(text:p)End Sub/Function end sub/Function ------------------------------- ****118;39;8(text:p)Use the Gebruik het ****118;79;4(text:span)GoTo GoTo ****118;95;23() statement to instruct argument om te instrueren ****118;136;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****118;167;189() Basic to continue program execution at another place within the procedure. The position must be indicated by a label. To set a label, assign a name and end it with a colon (":"). BASIC om door te gaan met de programmauitvoering op een ander plaats binnen de procedure. De positie moet worden aangegeven door een label. Om een label in te stellen, ken een naam toe en eindig die met een dubbele punt (":"). ------------------------------- ****128;45;67(text:p)You cannot use the GoTo statement to jump out of a Sub or Function. U kunt het GoTo-argument niet gebruiken om te springen uit een Sub of Functie. ------------------------------- ****143;77;4(text:span)GoTo GoTo ****143;93;224() is a relict of BASIC dialects which is retained only for compatibility reasons. If you often use GoTo, your program will tend to become unreadable. For this reason, it is preferable to use Sub procedures, with exception of is een overblijfsel van BASIC-dialecten welke alleen is aangehouden voor compatibiliteitsredenen. Als u GoTo vaak gebruik, zal uw programma er naar neigen onleesbaar te worden. Om deze reden, verdient het voorkeur om Sub-procedures te gebruiken , met uitzondering van ****143;349;9(text:span)On...GoTo On...GoTo ****143;370;5() and en ****143;407;13(text:span)On Error GoTo On Error GoTo ****143;432;1(). . ------------------------------- ****149;32;8(text:p)Example: Voorbeeld: ------------------------------- ****150;38;18(text:p)Sub ExampleOnGosub Sub VoorbeeldOnGosub ------------------------------- ****151;38;19(text:p)Dim iVar As Integer Dim iVar as Integer ------------------------------- ****152;38;18(text:p)Dim sVar As String Dim sVar as String ------------------------------- ****153;38;8(text:p)iVar = 2 iVar = 2 ------------------------------- ****154;38;18(text:p)sVar ="" sVar ="" ------------------------------- ****155;38;24(text:p)On iVar GoSub Sub1, Sub2 On iVar GoSub Sub1, Sub2 ------------------------------- ****156;38;25(text:p)On iVar GoTo Line1, Line2 On iVar GoTo Regel1, Regel2 ------------------------------- ****157;38;8(text:p)Exit Sub Exit Sub ------------------------------- ****158;38;5(text:p)Sub1: Sub1: ------------------------------- ****159;38;17(text:p)sVar =sVar & sVar =sVar & ****159;64;35(text:p)" From Sub 1 to" : Return " Van Sub 1 tot" : Return ------------------------------- ****160;38;5(text:p)Sub2: Sub2: ------------------------------- ****161;38;17(text:p)sVar =sVar & sVar =sVar & ****161;64;35(text:p)" From Sub 2 to" : Return " Van Sub 2 tot" : Return ------------------------------- ****162;38;6(text:p)Line1: Regel1: ------------------------------- ****163;38;17(text:p)sVar =sVar & sVar =sVar & ****163;64;20(text:p)" Label 1" " Label 1" ------------------------------- ****164;38;6(text:p)Line2: Regel2: ------------------------------- ****165;38;17(text:p)sVar =sVar & sVar =sVar & ****165;64;20(text:p)" Label 2" " Label 2" ------------------------------- ****166;38;10(text:p)Print sVar Print sVar ------------------------------- ****167;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03090303.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;51(subject)On...GoSub statement; On...GoTo statement [Runtime] On...GoSub argument; On...GoTo argument [Runtime] ------------------------------- ****84;58;10(keyword)On...GoSub On...GoSub ****84;109;9(keyword)On...GoTo On...GoTo ****84;159;51(help:link)On...GoSub statement; On...GoTo statement [Runtime] On...GoSub argument; On...GoTo argument [Runtime] ****85;39;111(text:p)Branches to one of several specified lines in the program code, depending on the value of a numeric expression. Vertakt naar één van verschillende gespecificeerde regels in de programmacode, afhankelijk van de waarde van een numerieke uitdrukking. ------------------------------- ****87;71;6(text:span)Syntax Syntaxis ****87;89;1(): : ------------------------------- ****88;39;43(text:p)On N GoSub Label1[, Label2[, Label3[,...]]] On N GoSub Label1[, Label2[, Label3[,...]]] ------------------------------- ****89;39;54(text:p)On NumExpression GoTo Label1[, Label2[, Label3[,...]]] On NumExpressie GoTo Label1[, Label2[, Label3[,...]]] ------------------------------- ****90;71;9(text:span)Parameter Parameter ****90;92;1(): : ------------------------------- ****91;39;343(text:p)NumExpression: Any numeric expression between 0 and 255 that determines which of the lines the program branches to. If NumExpression is 0, the statement will not be executed. If NumExpression is greater than 0, the program jumps to the respective label with a position number corresponding to the expression (1 = First label; 2 = Second label) NumExpressie: Elke numerieke uitdrukking tussen 0 en 255 die bepaalt naar welke van de regels het programma vertakt. Als NumExpressie is 0, zal de uitdrukking niet worden uitgevoerd. Als NumExpressie groter is dan 0, springt het programma naar het respectievelijke label met een positiegetal overeenkomstig de uitdrukking (1 = Eerste label; 2 = Tweede label) ------------------------------- ****92;39;32(text:p)Label: Target line according to Label: Bestemmingsregel volgens ****92;112;5(text:span)GoTo GoTo ****92;138;3()or of ****92;173;5(text:span)GoSub GoSub ****92;190;11() structure. structuur. ------------------------------- ****102;45;4(text:p)The De ****102;81;4(text:span)GoTo GoTo ****102;97;4() or of ****102;133;6(text:span)GoSub GoSub ****102;160;22()conventions are valid. regels zijn geldig. ------------------------------- ****108;32;8(text:p)Example: Voorbeeld: ------------------------------- ****110;38;18(text:p)Sub ExampleOnGosub Sub VoorbeeldOnGosub ------------------------------- ****111;38;19(text:p)Dim iVar As Integer Dim iVar as Integer ------------------------------- ****112;38;18(text:p)Dim sVar As String Dim sVar as String ------------------------------- ****113;38;8(text:p)iVar = 2 iVar = 2 ------------------------------- ****114;38;18(text:p)sVar ="" sVar ="" ------------------------------- ****115;38;24(text:p)On iVar GoSub Sub1, Sub2 On iVar GoSub Sub1, Sub2 ------------------------------- ****116;38;25(text:p)On iVar GoTo Line1, Line2 On iVar GoTo Regel1, Regel2 ------------------------------- ****117;38;8(text:p)Exit Sub Exit Sub ------------------------------- ****118;38;5(text:p)Sub1: Sub1: ------------------------------- ****119;38;17(text:p)sVar =sVar & sVar =sVar & ****119;64;35(text:p)" From Sub 1 to" : Return " Van Sub 1 tot" : Return ------------------------------- ****120;38;5(text:p)Sub2: Sub2: ------------------------------- ****121;38;17(text:p)sVar =sVar & sVar =sVar & ****121;64;35(text:p)" From Sub 2 to" : Return " Van Sub 2 tot" : Return ------------------------------- ****122;38;6(text:p)Line1: Regel1: ------------------------------- ****123;38;17(text:p)sVar =sVar & sVar =sVar & ****123;64;32(text:p)" Label 1" : GoTo Ende " Label 1" : GoTo Einde ------------------------------- ****124;38;6(text:p)Line2: Regel2: ------------------------------- ****125;38;17(text:p)sVar =sVar & sVar =sVar & ****125;64;20(text:p)" Label 2" " Label 2" ------------------------------- ****126;38;5(text:p)Ende: Einde: ------------------------------- ****127;38;36(text:p)MsgBox sVar,0,"On...Gosub" MsgBox sVar,0,"On...Gosub" ------------------------------- ****128;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03090400.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;18(subject)Further statements Meer argumenten ------------------------------- ****56;58;18(help:link)Further statements Meer argumenten ****57;39;99(text:p)Here you will find additional statements that do not belong to any of the other runtime categories. Hier vindt u aanvullende argumenten die niet horen bij een willekeurige van de andere runtime categorieën. ####Text\SBASIC\COMMON\03090401.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;24(subject)Call statement [Runtime] Call argument [Runtime] ------------------------------- ****84;58;24(help:link)Call statement [Runtime] Call argument [Runtime] ****85;39;62(text:p)Transfers program control to a sub, function or DLL procedure. Verplaatst programmabeheer naar een sub, functie of DLL-procedure. ------------------------------- ****87;71;6(text:span)Syntax Syntaxis ****87;89;1(): : ------------------------------- ****88;39;24(text:p)[Call] Name [Parameter] [Call] Naam [Parameter] ****88;85;4(keyword)Call Call ------------------------------- ****89;71;9(text:span)Parameter Parameter ****89;92;1(): : ------------------------------- ****90;39;46(text:p)Name: Name of the sub, function or DLL to call Naam: Naam van de sub, functie of DLL om aan te roepen ------------------------------- ****91;39;119(text:p)Parameter: Parameters to pass to the procedure. The type and number of parameters is dependent on the executed routine. Parameter: Parameters om de procedure uit te voeren. Het type en aantal parameters is afhankelijk van de uitgevoerde routine. ------------------------------- ****101;45;210(text:p)A keyword is optional when calling a procedure. If a function is executed as an expression, the parameters must be enclosed in parenthesis in the function. If a DLL is called, it must first be specified in the Een sleutelwoord is optioneel wanneer een procedure wordt aangeroepen. Als een functie wordt uitgevoerd als een uitdrukking, moeten de parameters zijn gevat in ronde haakjes in de functie. Als een DLL wordt aangeroepen, moet het eerst worden gespecificeerd in de ****101;296;18(text:span)Declare-Anweisung Declare-aanwijzing ****101;326;1(). . ------------------------------- ****107;32;8(text:p)Example: Voorbeeld: ------------------------------- ****108;38;15(text:p)Sub ExampleCall Sub VoorbeeldCall ------------------------------- ****109;38;18(text:p)Dim sVar As String Dim sVar as String ------------------------------- ****110;38;25(text:p)sVar = "Office" sVar = "Office" ------------------------------- ****111;38;19(text:p)Call f_callFun sVar Call f_callFun sVar ------------------------------- ****112;38;7(text:p)end Sub end Sub ------------------------------- ****114;38;31(text:p)Sub f_callFun (sText as String) Sub f_callFun (sTekst as String) ------------------------------- ****115;38;12(text:p)Msgbox sText Msgbox sTekst ------------------------------- ****116;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03090402.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;25(subject)Choose Function [Runtime] Choose functie [Runtime] ------------------------------- ****66;58;25(help:link)Choose Function [Runtime] Choose functie [Runtime] ****67;39;50(text:p)Returns a selected value from a list of arguments. Geeft een geselecteerde waarde uit een lijst van argumenten weer. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;61(text:p)Choose (Index, Selection1[, Selection2, ... [,Selection_n]]) Choose (Index, Selectie1[, Selectie2, ... [,Selectie_n]]) ****70;122;6(keyword)Choose Choose ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;63(text:p)Index: A numeric expression that specifies the value to return. Index: Een numerieke uitdrukking die de waarde specificeert om weer te geven. ------------------------------- ****73;39;66(text:p)Selection1: Any expression containing one of the possible choices. Selectie1: Elke uitdrukking die één van de mogelijke keuzes bevat. ------------------------------- ****74;39;4(text:p)The De ****74;75;6(text:span)Choose Kies ****74;93;209() function returns a value from the list of expressions based on the index value. If Index = 1, the function returns the first expression in the list; if index i= 2, it returns the second expression, and so on. functie geeft een waarde weer uit de lijst van uitdrukkingen gebaseerd op de indexwaarde. Als Index = 1, geeft de functie de eerste uitdrukking in de lijst weer; als Index = 2, geeft het de tweede uitdrukking weer, enzovoort. ------------------------------- ****75;39;118(text:p)If the index value is less than 1 or greater than the number of expressions listed, the function returns a Null value. Als de indexwaarde minder is dan 1 of groter dan het aantal vermelde uitdrukkingen, geeft de functie een Nulwaarde weer. ------------------------------- ****76;39;31(text:p)The following example uses the Het volgende voorbeeld gebruikt de ****76;102;6(text:span)Choose Choose ****76;120;66() function to select a string from several which constitute a menu: functie om een tekenreeks uit verschillende, welke een menu samenstellen, te selecteren : ------------------------------- ****77;32;8(text:p)Example: Voorbeeld: ------------------------------- ****78;38;17(text:p)Sub ExampleChoose Sub VoorbeeldChoose ------------------------------- ****79;38;21(text:p)Dim sReturn As String Dim sWeergeven as String ------------------------------- ****80;38;23(text:p)sReturn = ChooseMenu(2) sWeergeven = ChooseMenu(2) ------------------------------- ****81;38;13(text:p)Print sReturn Print sWeergeven ------------------------------- ****82;38;7(text:p)end sub end sub ------------------------------- ****85;38;37(text:p)Function ChooseMenu(Index As Integer) Function ChooseMenu(Index as Integer) ------------------------------- ****86;38;104(text:p)ChooseMenu = Choose(Index, "Quick Format", "Save Format", "System Format") ChooseMenu = Choose(Index, "Snel Opmaak", "Opslaan Opmaak", "Systeem Opmaak") ------------------------------- ****87;38;12(text:p)End Function end function ####Text\SBASIC\COMMON\03090403.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;27(subject)Declare statement [Runtime] Declare argument [Runtime] ------------------------------- ****87;58;27(help:link)Declare statement [Runtime] Declare argument [Runtime] ****88;39;45(text:p)Used to declare and define a subroutine in a Gebruikt om een subroutine te declareren en te definiëren in een ****88;106;26(keyword)DLL (Dynamic Link Library) DLL (Dynamic Link Library) ****88;151;47(text:p)DLL (Dynamic Link Library) to be executed from DLL (Dynamic Link Library) die moet worden uitgevoerd uit ****88;216;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****88;247;7() Basic. BASIC. ------------------------------- ****90;39;10(text:p)See also: Zie ook: ****90;89;11(help:link)FreeLibrary FreeLibrary ------------------------------- ****91;71;6(text:span)Syntax Syntaxis ****91;89;1(): : ------------------------------- ****92;39;105(text:p)Declare {Sub | Function} Name Lib "Libname" [Alias "Aliasname"] [Parameter] [As Typ] Declare {Sub | Function} Naam Lib "Bibliotheeknaam" [Alias "Aliasnaam"] [Argumentenlijst] [As Type] ****92;166;7(keyword)Declare Declare ------------------------------- ****93;71;9(text:span)Parameter Parameter ****93;92;1(): : ------------------------------- ****94;32;17(text:p)Parameter/Element Parameter/Element ------------------------------- ****95;39;87(text:p)Name: A different name than defined in the DLL, used to call the subroutine from Basic. Naam: Een andere naam dan gedefinieerd is in de DLL, gebruikt om de subroutine uit BASIC aan te roepen. ------------------------------- ****96;39;56(text:p)Aliasname: Name of the subroutine as defined in the DLL. Aliasnaam: Naam van de subroutine zoals gedefinieerd in de DLL. ------------------------------- ****97;39;114(text:p)Libname: File or system name of the DLL. This library is automatically loaded the first time the function is used. Bibliotheeknaam: Bestands- of systeemnaam van de DLL. Deze bibliotheek wordt, de eerste keer dat de functie wordt gebruikt, automatisch geladen. ------------------------------- ****98;39;181(text:p)Argumentlist: List of parameters representing arguments that are passed to the procedure when it is called. The type and number of parameters is dependent on the executed procedure. Argumentenlijst: Lijst van parameters voorstellende de argumenten die geldig zijn voorr de procedure wanneer die wordt aangeroepen. Het type en aantal parameters is afhankelijk van de uitgevoerde procedure. ------------------------------- ****99;39;154(text:p)Type: Defines the data type of the value returned by a Function procedure. This can be excluded if a type-declaration character is entered after the name. Type: Definieert het datatype van de waarde weergegeven door een Functie-procedure. Dit kan worden uitgesloten als een typedeclaratieteken werd ingevoerd na de naam. ------------------------------- ****109;45;44(text:p)Parameters must be indicated by the keyword Parameters moeten worden aangegeven door het sleutelwoord ****109;121;5(text:span)ByVal ByVal ****109;138;71() if they are to be passed to the subroutine as a value instead of as a als zij geldig zijn in de subroutine als een waarde in plaats van als een ****109;218;10()reference. verwijzing. ------------------------------- ****115;32;8(text:p)Example: Voorbeeld: ------------------------------- ****116;38;91(text:p)Declare Sub MyMessageBeep Lib "user32.dll" Alias "MessageBeep" ( long ) Declare Sub MyMessageBeep Lib "user32.dll" Alias " MessageBeep " ( long ) ------------------------------- ****118;38;18(text:p)Sub ExampleDeclare Sub VoorbeeldDeclare ------------------------------- ****119;54;18(text:p)Dim lValue As Long Dim lValue as Long ------------------------------- ****120;54;13(text:p)lValue = 5000 lValue = 5000 ------------------------------- ****121;54;23(text:p)MyMessageBeep( lValue ) MyMessageBeep ( lValue ) ------------------------------- ****122;54;36(text:p)FreeLibrary("user32.dll" ) FreeLibrary("user32.dll" ) ------------------------------- ****123;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03090404.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;23(subject)End statement [Runtime] End argument [Runtime] ------------------------------- ****66;58;23(help:link)End statement [Runtime] End argument [Runtime] ****67;39;26(text:p)Ends a procedure or block. Beeindigt een procedure of blok. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;47(text:p)End, End Function, End If, End Select, End Sub End, end function, End If, End Select, end sub ****70;108;3(keyword)End End ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;33(text:p)Use the End statement as follows: Gebruik het End argument als volgt: ------------------------------- ****73;32;9(text:p)statement argument ------------------------------- ****74;39;98(text:p)End: Is not required, but can be entered anywhere within a procedure to end the program execution. End: Is niet nodig, maar kan worden ingevoerd waar dan ook binnen een procedure om de uitvoering van het programma te beëindigen. ------------------------------- ****75;39;21(text:p)End Function: Ends a end function: Beeindigt een ****75;92;8(text:span)Function Function ****75;112;11() statement. argument. ------------------------------- ****76;39;27(text:p)End If: Marks the end of a End If: Markeert het einde van een ****76;98;16(text:span)If...Then...Else If...Then...Else ****76;126;7() block. blok. ------------------------------- ****77;39;31(text:p)End Select: Marks the end of a End Select: Markeert het einde van een ****77;102;11(text:span)Select Case Select Case ****77;125;7() block. blok. ------------------------------- ****78;39;16(text:p)End Sub: Ends a end sub: Beeindigt een ****78;87;3(text:span)Sub Sub ****78;102;11() statement. argument. ------------------------------- ****79;32;8(text:p)Example: Voorbeeld: ------------------------------- ****80;38;23(text:p)Sub ExampleRandomSelect Sub VoorbeeldRandomSelect ------------------------------- ****81;38;19(text:p)Dim iVar As Integer Dim iVar as Integer ------------------------------- ****82;38;25(text:p)iVar = Int((15 * Rnd) -2) iVar = Int((15 * Rnd) -2) ------------------------------- ****83;38;16(text:p)Select Case iVar Select Case iVar ------------------------------- ****84;38;11(text:p)Case 1 To 5 Case 1 to 5 ------------------------------- ****85;38;36(text:p)Print "Number from 1 to 5" Print "Getal van 1 tot 5" ------------------------------- ****86;38;12(text:p)Case 6, 7, 8 Case 6, 7, 8 ------------------------------- ****87;38;36(text:p)Print "Number from 6 to 8" Print "Getal van 6 tot 8" ------------------------------- ****88;38;31(text:p)Case Is > 8 And iVar < 11 Case Is > 8 and iVar < 11 ------------------------------- ****89;38;32(text:p)Print "Greater than 8" Print "Groter dan 8" ------------------------------- ****90;38;9(text:p)Case Else Case Else ------------------------------- ****91;38;39(text:p)Print "Outside range 1 to 10" Print "Buiten bereik van 1 tot 10" ------------------------------- ****92;38;10(text:p)End Select End Select ------------------------------- ****93;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03090405.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;30(subject)FreeLibrary Function [Runtime] FreeLibrary functie [Runtime] ------------------------------- ****84;58;30(help:link)FreeLibrary Function [Runtime] FreeLibrary functie [Runtime] ****85;39;136(text:p)Releases DLLs loaded by a Declare statement. A released DLL will be automatically reloaded if one of its functions is called. See also: Laat DLL's geladen door een Declare-argument vrij. Een vrijgelaten DLL zal automatisch worden herladen als één van zijn functies wordt aangeroepen. Zie ook: ****85;211;7(help:link)Declare Declare ------------------------------- ****87;71;6(text:span)Syntax Syntaxis ****87;89;1(): : ------------------------------- ****88;39;31(text:p)FreeLibrary (LibName As String) FreeLibrary (LibName As String) ****88;92;11(keyword)FreeLibrary FreeLibrary ------------------------------- ****89;71;9(text:span)Parameter Parameter ****89;92;1(): : ------------------------------- ****90;39;62(text:p)LibName: String expression that specifies the name of the DLL. LibName: String-uitdrukking die de naam van de DLL specificeert. ------------------------------- ****100;45;62(text:p)FreeLibrary can only release DLLs loaded during Basic runtime. FreeLibrary kan alleen lDLL's vrijlaten, welke zijn geladen gedurende BASIC-runtime. ------------------------------- ****106;32;8(text:p)Example: Voorbeeld: ------------------------------- ****107;38;91(text:p)Declare Sub MyMessageBeep Lib "user32.dll" Alias "MessageBeep" ( long ) Declare Sub MynBoodschapPiep Lib "user32.dll" Alias "BoodschapPiep" ( long ) ------------------------------- ****109;38;18(text:p)Sub ExampleDeclare Sub VoorbeeldDeclare ------------------------------- ****110;54;18(text:p)Dim lValue As Long Dim lValue as Long ------------------------------- ****111;54;13(text:p)lValue = 5000 lValue = 5000 ------------------------------- ****112;54;23(text:p)MyMessageBeep( lValue ) MynBoodschapPiep( lValue ) ------------------------------- ****113;54;36(text:p)FreeLibrary("user32.dll" ) FreeLibrary("user32.dll" ) ------------------------------- ****114;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03090406.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;28(subject)Function statement [Runtime] Function argument [Runtime] ------------------------------- ****67;58;28(help:link)Function statement [Runtime] Function argument [Runtime] ****68;39;85(text:p)Defines a subprocedure which can be used as an expression to determine a return type. Definieert een subprocedure welke kan worden gebruikt als een uitdrukking om een Resultaatwaarde-type te bepalen. ------------------------------- ****70;32;6(text:p)Syntax Syntaxis ------------------------------- ****71;39;14(text:p)see Parameter zie Parameter ****71;75;8(keyword)Function Function ------------------------------- ****72;71;9(text:span)Parameter Parameter ****72;92;1(): : ------------------------------- ****73;39;6(text:p)Syntax Syntaxis ------------------------------- ****74;61;8(keyword)Function Function ****74;88;73(text:p)Function Name[(VarName1 [As Type][, VarName2 [As Type][,...]]]) [As Type] Function Naam[(VarNaam1 [As Type][, VarNaam2 [As Type][,...]]]) [As Type] ------------------------------- ****75;39;15(text:p)statement block argumentblok ------------------------------- ****76;39;15(text:p)[Exit Function] [Exit Function] ------------------------------- ****77;39;15(text:p)statement block argumentblok ------------------------------- ****78;39;12(text:p)End Function end function ------------------------------- ****79;39;9(text:p)Parameter Parameter ------------------------------- ****80;39;77(text:p)Name: Name of the subprocedure to contain the value returned by the function. Naam: Naam van de subprocedure die de waarde weergegeven door de functie bevat. ------------------------------- ****81;39;52(text:p)VarName: Parameter to be passed to the subprocedure. VarNaam: Parameter geldig voor de subprocedure. ------------------------------- ****82;39;31(text:p)Type :Type-declaration keyword. Type :Type-declaratie-sleutelwoord. ------------------------------- ****83;32;8(text:p)Example: Voorbeeld: ------------------------------- ****84;38;15(text:p)Sub ExampleExit Sub VoorbeeldExit ------------------------------- ****85;38;21(text:p)Dim sReturn As String Dim sWeergeven as String ------------------------------- ****86;38;28(text:p)Dim sListArray(10) as String Dim sListArray(10) as String ------------------------------- ****87;38;20(text:p)Dim siStep as Single Dim siStep as Single ------------------------------- ****88;38;21(text:p)For siStep = 0 to 10 Voor siStep = 0 tot 10 ****88;68;29(text:p)REM Fill array with test data REM Vullen matrix met testgegevens ------------------------------- ****89;38;38(text:p)sListArray(siStep) = chr$(siStep + 65) sListArray(siStep) = chr$(siStep + 65) ------------------------------- ****90;38;25(text:p)msgbox sListArray(siStep) msgbox sListArray(siStep) ------------------------------- ****91;38;11(text:p)next siStep next siStep ------------------------------- ****92;38;48(text:p)sReturn = LinSearch(sListArray(), "B") sWeergeven = LinSearch(sListArray(), "B") ------------------------------- ****93;38;13(text:p)Print sReturn Print sWeergeven ------------------------------- ****94;38;7(text:p)end sub end sub ------------------------------- ****97;38;57(text:p)Function LinSearch( sList(), sItem As String ) as integer Function LinSearch( sList(), sItem as String ) as Integer ------------------------------- ****98;38;21(text:p)dim iCount as Integer dim iCount as Integer ------------------------------- ****99;38;59(text:p)REM Linsearch searches a TextArray:sList() for a TextEntry: REM Linsearch zoekt in een TextArray:sList() naar een TextEntry: ------------------------------- ****100;38;54(text:p)REM Return value is the index of the entry or 0 (Null) REM Resultaatwaarde is de index van het item of 0 (Nul) ------------------------------- ****101;38;33(text:p)for iCount=1 to Ubound( sList() ) for iCount=1 to Ubound( sList() ) ------------------------------- ****102;38;31(text:p)if sList( iCount ) = sItem then if sList( iCount ) = sItem then ------------------------------- ****103;38;24(text:p)exit for REM sItem found exit for REM sItem gevonden ------------------------------- ****104;38;6(text:p)end if end if ------------------------------- ****105;38;11(text:p)next iCount next iCount ------------------------------- ****106;38;45(text:p)if iCount = Ubound( sList() ) then iCount = 0 if iCount = Ubound( sList() ) then iCount = 0 ------------------------------- ****107;38;18(text:p)LinSearch = iCount LinSearch = iCount ------------------------------- ****108;38;12(text:p)end function end function ####Text\SBASIC\COMMON\03090407.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;23(subject)Rem statement [Runtime] Rem argument [Runtime] ------------------------------- ****84;58;23(help:link)Rem statement [Runtime] Rem argument [Runtime] ****85;39;103(text:p)Used to define a program line as a comment; the contents of the remark have no affect on the statement. Gebruikt om een programmaregel als een commentaar te definiëren; de inhoud van de opmerking heeft geen invloed op de uitdrukking. ------------------------------- ****87;71;6(text:span)Syntax Syntaxis ****87;89;1(): : ------------------------------- ****88;39;9(text:p)Rem Text Rem Tekst ****88;70;3(keyword)Rem Rem ------------------------------- ****89;71;9(text:span)Parameter Parameter ****89;92;1(): : ------------------------------- ****90;39;45(text:p)Text: Any text that serves only as a comment. Tekst: Elke tekst die alleen als commentaar / opmerking dient. ------------------------------- ****100;45;203(text:p)You can use the single quotation mark instead of the Rem keyword to indicate comments. This symbol can be inserted directly to the right of the program code, followed by a comment to the end of the line. U kunt het enkele aanhalingsteken gebruiken in plaats van het Rem-sleutelwoord om commentaar aan te geven. Dit symbool kan worden ingevoegd direct rechts van de programmacode, gevolgd door commentaar tot het regeleinde. ------------------------------- ****106;32;8(text:p)Example: Voorbeeld: ------------------------------- ****107;38;14(text:p)Sub ExampleMid Sub VoorbeeldMid ------------------------------- ****108;38;18(text:p)DIM sVar As String DIM sVar as String ------------------------------- ****109;38;28(text:p)sVar = "Las Vegas" sVar = "Las Vegas" ------------------------------- ****110;38;49(text:p)Print Mid(sVar,3,5) REM Returns "s Veg" Print Mid(sVar,3,5) REM Geeft weer: "s Veg" ------------------------------- ****111;38;23(text:p)REM Nothing occurs here REM Hier gebeurt niets ! ------------------------------- ****112;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03090408.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;24(subject)Stop statement [Runtime] Stop argument [Runtime] ------------------------------- ****66;58;24(help:link)Stop statement [Runtime] Stop argument [Runtime] ****67;39;49(text:p)Stops the execution of the running Basic program. Stopt de uitvoering van het lopende Basicprogramma. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;5(text:p)Stop Stop ****70;66;4(keyword)Stop Stop ------------------------------- ****71;32;8(text:p)Example: Voorbeeld: ------------------------------- ****72;38;15(text:p)Sub ExampleStop Sub VoorbeeldStop ------------------------------- ****73;38;18(text:p)Dim iVar As Single Dim iVar As Single ------------------------------- ****74;38;9(text:p)iVar = 36 iVar = 36 ------------------------------- ****75;38;4(text:p)Stop Stop ------------------------------- ****76;38;16(text:p)Msgbox Sqr(iVar) Msgbox Sqr(iVar) ------------------------------- ****77;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03090409.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;23(subject)Sub statement [Runtime] Sub argument [Runtime] ------------------------------- ****64;58;23(help:link)Sub statement [Runtime] Sub argument [Runtime] ****65;39;23(text:p)Defines a subprocedure. Definieert een subprocedure. ------------------------------- ****67;32;6(text:p)Syntax Syntaxis ------------------------------- ****68;39;13(text:p)see Parameter zie Parameter ------------------------------- ****69;39;15(text:p)statement block argumentblok ------------------------------- ****70;39;10(text:p)[Exit Sub] [Exit Sub] ------------------------------- ****71;39;15(text:p)statement block argumentblok ------------------------------- ****72;39;7(text:p)End Sub end sub ------------------------------- ****73;32;9(text:p)Parameter Parameter ------------------------------- ****74;39;31(text:p)Name: Name of the subprocedure. Naam: Naam van de subprocedure. ------------------------------- ****75;39;52(text:p)VarName: Parameter to be passed to the subprocedure. VarNaam: Parameter geldig voor de subprocedure. ------------------------------- ****76;32;32(text:p)Type: Type-declaration key word. Type: Type-declaratie sleutelwoord. ------------------------------- ****77;39;29(text:p)Name: Name of the subroutine. Naam: Naam van de subroutine. ------------------------------- ****78;39;50(text:p)VarName: Parameter to be passed to the subroutine. VarNaam: Parameter geldig voor de subprocedure. ------------------------------- ****79;39;32(text:p)Type: Type-declaration key word. Type: Type-declaratie sleutelwoord. ------------------------------- ****80;32;8(text:p)Example: Voorbeeld: ------------------------------- ****81;38;16(text:p)Sub ExampleShell Sub VoorbeeldShell ------------------------------- ****83;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03090410.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;25(subject)Switch Function [Runtime] Switch functie [Runtime] ------------------------------- ****66;58;25(help:link)Switch Function [Runtime] Switch functie [Runtime] ****67;39;173(text:p)Evaluates a list of arguments, consisting of an expression followed by a value. The Switch function returns a value associated with the expression passed with this function. Evalueert een lijst van argumenten, bestaande uit een uitdrukking gevolgd door een waarde. De Switch-functie geeft een waarde weer, geassocieerd met de uitdrukking welke werd uitgevoerd met deze functie . ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;80(text:p)Switch (Expression1, Value1[, Expression2, Value2[..., Expression_n, Value_n]]) Switch (Expressie1, Waarde1[, Expressie2, Waarde2[..., Expressie_n, Waarde_n]]) ****70;141;6(keyword)Switch Switch ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;4(text:p)The De ****72;75;6(text:span)Switch Switch ****72;93;191() function evaluates the expressions from left to right, and returns the value assigned to the function expression. If expression and value are not given as a pair, a runtime error will occur. functie evalueert de uitdrukkingen van links van rechts en geeft de waarde, toegekend aan de functieuitdrukking, weer. Als uitdrukking en waarde niet worden opgegeven als een paar, zal een runtime-fout voorkomen. ------------------------------- ****73;39;43(text:p)Expression: The expression to be evaluated. Expressie: De uitdrukking die moet worden geëvalueerd. ------------------------------- ****74;39;58(text:p)Value: The value to be returned if the expression is True. Waarde: De waarde die moet worden weergegeven als de uitdrukking Waar is. ------------------------------- ****75;39;29(text:p)In the following example the In het volgende voorbeeld de ****75;100;6(text:span)Switch Switch ****75;118;85() function is used to assign the appropriate gender to the name given to the function: functie wordt gebruikt om het toepasselijke geslacht aan de naam, gegeven door de functie, toe te kennen: ------------------------------- ****76;32;8(text:p)Example: Voorbeeld: ------------------------------- ****77;38;17(text:p)Sub ExampleSwitch Sub VoorbeeldSwitch ------------------------------- ****78;38;21(text:p)Dim sGender As String Dim sGeslacht as String ------------------------------- ****79;38;44(text:p)sGender = GetGenderIndex( "John" ) sGeslacht = GetGeslachtIndex( "Jan" ) ------------------------------- ****80;38;14(text:p)MsgBox sGender MsgBox sGeslacht ------------------------------- ****81;38;7(text:p)End Sub end sub ------------------------------- ****83;38;51(text:p)Function GetGenderIndex (sName As String) As String Function GetGeslachtIndex (sNaam as String) as String ------------------------------- ****84;38;113(text:p)GetGenderIndex = Switch(sName = "Jane", "female", sName = "John", "male") GetGeslachtIndex = Switch(sNaam = "Jeanette", "Vrouwelijk", sNaam = "Jan", "Mannelijk") ------------------------------- ****85;38;12(text:p)End Function end function ####Text\SBASIC\COMMON\03090411.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;24(subject)With statement [Runtime] With argument [Runtime] ------------------------------- ****62;58;24(help:link)With statement [Runtime] With argument [Runtime] ****63;39;159(text:p)Sets an object as the default object, to which all properties and methods refer until the End With statement is called, provided no other object name is given. Stelt een object als standaardwaarde-object in, waartoe alle eigenschappen en methoden verwijzen totdat het End With-argument wordt aangeroepen, vooropgesteld dat geen andere objectnaam wordt gegeven. ------------------------------- ****65;71;6(text:span)Syntax Syntaxis ****65;89;1(): : ------------------------------- ****66;39;36(text:p)With Object statementblock End With With Object argumentblok End With ****66;97;4(keyword)With With ------------------------------- ****67;71;9(text:span)Parameter Parameter ****67;92;1(): : ------------------------------- ****68;39;12(text:p)You can use U kunt gebruiken ****68;83;4(text:span)With With ****68;99;5() and en ****68;136;8(text:span)End With End With ****68;156;63() if you have several properties or methods for a single object. als u verschillende eigenschappen of methoden voor een enkel object heeft. ####Text\SBASIC\COMMON\03090412.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;24(subject)Exit statement [Runtime] Exit argument [Runtime] ------------------------------- ****85;58;24(help:link)Exit statement [Runtime] Exit argument [Runtime] ****86;39;8(text:p)Exits a Verlaat een ****86;79;9(text:span)Do...Loop Do...Loop ****86;100;2(), , ****86;134;10(text:span)For...Next For...Next ****86;156;42(), a Function procedure or a Sub procedure. , een Functie-procedure of een Sub-procedure. ------------------------------- ****88;71;6(text:span)Syntax Syntaxis ****88;89;1(): : ------------------------------- ****89;39;14(text:p)see Parameter zie Parameter ****89;75;4(keyword)Exit Exit ------------------------------- ****90;71;9(text:span)Parameter Parameter ****90;92;1(): : ------------------------------- ****91;61;4(keyword)Exit Exit ****91;126;5(text:span)Exit Exit ****91;204;3(text:span)DO DO ------------------------------- ****92;39;20(text:p)Only valid within a Alleen geldig binnen een ****92;91;9(text:span)Do...Loop Do...Loop ****92;112;109() statement to exit the loop. Program execution continues with the statement following the Loop statement. If argument om de loop te beëindigen. Programmauitvoering vervolgt met de uitdrukking volgend op het Loop-argument. Als ****92;253;9(text:span)Do...Loop Do...Loop ****92;274;88() statements are nested, the control is transferred to the loop in the next higher level. argumenten zijn genest, wordt de controle overgedragen naar de loop in het volgende hogere niveau. ------------------------------- ****93;32;8(text:p)Exit For Exit For ------------------------------- ****94;39;20(text:p)Only valid within a Alleen geldig binnen een ****94;91;10(text:span)For...Next For...Next ****94;113;91() loop to exit the loop. Program execution continues with the first statement following the loop om de loop te beëindigen. Programmauitvoering vervolgt met het eerste argument volgend op het ****94;236;4(text:span)Next Next ****94;252;98() statement. In nested statements, the control is transferred to the loop in the next higher level. argument. In geneste argumenten wordt de controle overgedragen aan de loop in het volgende hogere niveau. ------------------------------- ****95;32;13(text:p)Exit Function Exit Function ------------------------------- ****96;39;10(text:p)Exits the Beeindigt de ****96;81;8(text:span)Function Function ****96;101;85() procedure immediately. Program execution continues with the statement following the procedure meteen. Programmauitvoering vervolgt met de uitdrukking volgend op de ****96;218;8(text:span)Function Function ****96;238;6() call. aanroep. ------------------------------- ****97;32;8(text:p)Exit Sub Exit Sub ------------------------------- ****98;39;10(text:p)Exits the Beeindigt de ****98;81;3(text:span)Sub Sub ****98;96;85() procedure immediately. Program execution continues with the statement following the procedure meteen. Programmauitvoering vervolgt met de uitdrukking volgend op de ****98;213;3(text:span)Sub Sub ****98;228;6() call. aanroep. ------------------------------- ****108;45;106(text:p)The Exit statement does not define the end of a structure, and may not be confused with the End statement. Het Exit-argument zal niet het einde van een structuur definiëren en moet niet worden verward met het End-argument. ------------------------------- ****114;39;8(text:p)Example: Voorbeeld: ------------------------------- ****115;38;15(text:p)Sub ExampleExit Sub VoorbeeldExit ------------------------------- ****116;38;21(text:p)Dim sReturn As String Dim sWeergeven as String ------------------------------- ****117;38;28(text:p)Dim sListArray(10) as String Dim sListArray(10) as String ------------------------------- ****118;38;20(text:p)Dim siStep as Single Dim siStep as Single ------------------------------- ****119;38;21(text:p)For siStep = 0 to 10 For siStep = 0 to 10 ****119;68;29(text:p)REM Fill array with test data REM Vullen matrix met testgegevens ------------------------------- ****120;38;37(text:p)sListArray(siStep) = chr(siStep + 65) sListArray(siStep) = chr(siStep + 65) ------------------------------- ****121;38;25(text:p)msgbox sListArray(siStep) msgbox sListArray(siStep) ------------------------------- ****122;38;11(text:p)next siStep next siStep ------------------------------- ****123;38;48(text:p)sReturn = LinSearch(sListArray(), "B") sWeergeven = LinSearch(sListArray(), "B") ------------------------------- ****124;38;13(text:p)Print sReturn Print sWeergeven ------------------------------- ****125;38;7(text:p)end sub end sub ------------------------------- ****128;38;57(text:p)Function LinSearch( sList(), sItem As String ) as integer Function LinSearch( sList(), sItem as String ) as Integer ------------------------------- ****129;38;21(text:p)dim iCount as Integer dim iCount as Integer ------------------------------- ****130;38;47(text:p)REM LinSearch searches a TextArray:sList() for REM LinSearch zoekt in TextArray:sList() naar ****130;94;12(text:p)a TextEntry: een TextEntry: ------------------------------- ****131;38;47(text:p)REM Returns the index of the entry or 0 ( Null) REM Geeft de index van het item of 0 ( Nul) weer ------------------------------- ****132;38;33(text:p)for iCount=1 to Ubound( sList() ) for iCount=1 to Ubound( sList() ) ------------------------------- ****133;38;31(text:p)if sList( iCount ) = sItem then If sList( iCount ) = sItem then ------------------------------- ****134;38;24(text:p)Exit for REM sItem found Exit for REM sItem gevonden ------------------------------- ****135;38;6(text:p)end if end if ------------------------------- ****136;38;11(text:p)next iCount next iCount ------------------------------- ****137;38;45(text:p)if iCount = Ubound( sList() ) then iCount = 0 If iCount = Ubound( sList() ) then iCount = 0 ------------------------------- ****138;38;18(text:p)LinSearch = iCount LinSearch = iCount ------------------------------- ****139;38;12(text:p)end function end function ####Text\SBASIC\COMMON\03100000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;9(subject)Variables Variabelen ------------------------------- ****56;58;9(help:link)Variables Variabelen ****57;39;226(text:p)Here you will find all statements and functions for working with variables. With these functions, for instance, you can declare or define variables, convert variables from one type to another, determine the variable type, etc. Hier vindt u alle argumenten en functies voor het werken met variabelen. Met deze functies kunt u, bijvoorbeeld, variabelen opgeven of definiëren, variabelen omzetten van één type naar een ander, het variabeletype bepalen, etc. ------------------------------- ****59;39;77(text:p)The following statements are available for setting and determining variables: De volgende argumenten zijn beschikbaar voor instelling en bepalen van variabelen: ####Text\SBASIC\COMMON\03100100.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;24(subject)CBool Function [Runtime] Cbool functie [Runtime] ------------------------------- ****66;58;24(help:link)CBool Function [Runtime] Cbool functie [Runtime] ****67;39;140(text:p)Converts a string comparison or numeric comparison to a boolean expression, or converts a single numeric expression to a boolean expression. Converteert een tekenreeks-vergelijking of numerieke vergelijking naar een Boolean uitdrukking, of converteert een enkele numerieke uitdrukking naar een Boolean uitdrukking. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;95(text:p)CBool (Expression1 {= | <> | < | > | <= | >=} Expression2) or CBool (Number) CBool (Expressie1 {= | <> | < | > | <= | >=} Expressie2) of CBool (Getal) ****70;156;5(keyword)CBool CBool ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;4(text:p)Bool Bool ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;107(text:p)Expression1, Expression2 : Any string or numeric expressions to be compared. If the expressions match, the Expressie1, Expressie2 : Elke tekenreeks of numerieke uitdrukking die moet worden vergeleken. Als de uitdrukkingen overeenstemmen, de ****74;178;5(text:span)CBool CBool ****74;195;18() function returns functie geeft weer ****74;245;4(text:span)True Waar ****74;261;13(); otherwise, ; anders, ****74;306;5(text:span)False Onwaar ****74;323;18() will be returned. zal worden weergegeven. ------------------------------- ****75;39;76(text:p)Number :Any numeric expression to be converted. If the expression equals 0, Getal :Een willekeurige numerieke uitdrukking die moet worden geconverteerd. Als de uitdrukking gelijk is aan 0, ****75;147;5(text:span)False Onwaar ****75;164;72() will be returned. If a value other than 0 is assigned to the function, zal worden weergegeven. Als een andere waarde dan 0 werd toegekend aan de functie, ****75;268;4(text:span)True Waar ****75;284;18() will be returned. zal worden weergegeven. ------------------------------- ****76;39;31(text:p)The following example uses the Het volgende voorbeeld gebruikt de ****76;102;5(text:span)CBool CBool ****76;119;48() function to evaluate the value returned by the functie om de waarde te evalueren, weergegeven door de ****76;199;5(text:span)Instr Instr ****76;216;43() function. The function proofs if the word functie. De functie test het woord ****76;291;3(text:span)and en ****76;306;44() is found in a sentence entered by the user. wordt gevonden in een zin, ingevoerd door de gebruiker. ------------------------------- ****77;32;8(text:p)Example: Voorbeeld: ------------------------------- ****78;38;16(text:p)Sub ExampleCBool Sub VoorbeeldCBool ------------------------------- ****79;38;19(text:p)Dim sText As String Dim sTekst as String ------------------------------- ****80;38;60(text:p)sText = InputBox("Please enter a short sentence:") sTekst = InputBox("Toets alstublieft een korte zin in:") ------------------------------- ****81;38;54(text:p)REM Proof if the word »and« appears in the sentence. REM Test of het woord »en« verschijnt in de zin. ------------------------------- ****82;38;31(text:p)REM Instead of the command line REM In plaats van de commandoregel ------------------------------- ****83;38;4(text:p)REM REM ****83;63;49(text:p)If Instr(Input, "and")<>0 Then... If Instr(Input, "en")<>0 then... ------------------------------- ****84;38;45(text:p)REM the CBool function is applied as follows: REM wordt de Cbool-functie als volgt toegepast: ------------------------------- ****85;38;44(text:p)If CBool(Instr(sText, "and")) Then If CBool(Instr(sTekst, "en")) then ------------------------------- ****86;38;72(text:p)MsgBox "The word »and« appears in the sentence you entered!" MsgBox "Het woord »en« komt voor in de zin die u heeft ingevoerd!" ------------------------------- ****87;38;5(text:p)EndIf EndIf ------------------------------- ****88;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03100300.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;24(subject)CDate Function [Runtime] Cdate functie [Runtime] ------------------------------- ****66;58;24(help:link)CDate Function [Runtime] Cdate functie [Runtime] ****67;39;69(text:p)Converts any string or numeric expression expression to a date value. Converteert een willekeurige tekenreeks of numerieke uitdrukking naar een datumwaarde. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;19(text:p)CDate (Expression) CDate (Expressie) ****70;80;5(keyword)CDate CDate ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;4(text:p)Date Date ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;61(text:p)Expression: Any string or numeric expression to be converted. Expressie: Elke tekenreeks of numerieke uitdrukking die moet worden geconverteerd. ------------------------------- ****75;39;124(text:p)When converting a string expression, the date and time must be entered in the format MM.DD.YYYY HH.MM.SS, as defined by the Bij het converteren van een tekenreeks-uitdrukking, moeten de datum en tijd zijn ingevoerd in de opmaak MM.DD.JJJJ UU.MM.SS, zoals gedefinieerd door de ****75;195;9(text:span)DateValue DateValue ****75;216;5() and en ****75;253;9(text:span)TimeValue TimeValue ****75;274;189() function conventions. In numeric expressions, values to the left of the decimal represent the date, beginning from December 31, 1899. Values to the right of the decimal represent the time. functieregels. In numerieke uitdrukkingen staan waarden aan de linkerkant van de decimaal voor de datum, aanvangende op 31 December 1899. Waarden rechts van de decimaal staan voor de tijd. ------------------------------- ****76;32;8(text:p)Example: Voorbeeld: ------------------------------- ****77;38;16(text:p)sub ExampleCDate sub VoorbeeldCDate ------------------------------- ****78;38;45(text:p)MsgBox cDate(1000.25) REM 09.26.1902 06:00:00 MsgBox cDate(1000.25) REM 09.26.1902 06:00:00 ------------------------------- ****79;38;45(text:p)MsgBox cDate(1001.26) REM 09.27.1902 06:14:24 MsgBox cDate(1001.26) REM 09.27.1902 06:14:24 ------------------------------- ****80;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03100400.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;23(subject)CDbl Function [Runtime] Cdbl functie [Runtime] ------------------------------- ****66;58;23(help:link)CDbl Function [Runtime] Cdbl functie [Runtime] ****67;39;72(text:p)Converts any numerical expression or string expression to a double type. Converteert elke numerieke uitdrukking of tekenreeks-uitdrukking naar een double- type. ------------------------------- ****69;32;6(text:p)Syntax Syntaxis ------------------------------- ****70;39;18(text:p)CDbl (Expression) CDbl (Expressie) ****70;79;4(keyword)CDbl CDbl ------------------------------- ****71;32;12(text:p)Return value Resultaatwaarde ------------------------------- ****72;39;6(text:p)Double Double ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;228(text:p)Expression : Any string or numeric expression to be converted. When converting a string expression, the number must be entered as normal text ("123.5"). The number format is recognized according to your local settings. Expressie : Eke tekenreeks- of numerieke uitdrukking die moet worden geconverteerd. Bij het converteren van een tekenreeks-uitdrukking moet het getal worden ingevoerd als normale tekst ("123.5"). De nummeropmaak wordt herkend volgens uw lokale instellingen. ------------------------------- ****75;32;8(text:p)Example: Voorbeeld: ------------------------------- ****76;38;25(text:p)Sub ExampleCountryConvert Sub VoorbeeldCountryConvert ------------------------------- ****77;38;22(text:p)Msgbox CDbl(1234.5678) Msgbox CDbl(1234.5678) ------------------------------- ****78;38;22(text:p)Msgbox CInt(1234.5678) Msgbox CInt(1234.5678) ------------------------------- ****79;38;22(text:p)Msgbox CLng(1234.5678) Msgbox CLng(1234.5678) ------------------------------- ****80;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03100500.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;23(subject)CInt Function [Runtime] Cint functie [Runtime] ------------------------------- ****68;58;23(help:link)CInt Function [Runtime] Cint functie [Runtime] ****69;39;56(text:p)Converts any string or numeric expression to an integer. Converteert elke tekenreeks- of numerieke uitdrukking naar een Integer. ------------------------------- ****71;71;6(text:span)Syntax Syntaxis ****71;89;1(): : ------------------------------- ****72;39;18(text:p)CInt (Expression) CInt (Expressie) ****72;79;4(keyword)CInt CInt ------------------------------- ****73;71;12(text:span)Return value Resultaatwaarde ****73;95;1(): : ------------------------------- ****74;39;7(text:p)Integer Integer ------------------------------- ****75;71;9(text:span)Parameter Parameter ****75;92;1(): : ------------------------------- ****76;39;59(text:p)Expression: Any numeric expression to be converted. If the Expressie: Elke numerieke uitdrukking die moet worden geconverteerd. Als de ****76;130;10(text:span)Expression Expressie ****76;152;51() exceeds the value range between -32768 and 32767, groter is dan het waardenbereik tussen -32768 en 32767, ****76;221;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****76;252;199() Basic reports an overflow error. When converting a string expression, the number must be entered as normal text ("123.5"). The number format is recognized according to your local settings. BASIC rapporteert een overflow-fout. Bij het converteren van een tekenreeks-uitdrukking, moet het getal worden ingevoerd als normale tekst ("123.5"). De getalopmaak wordt herkend volgens uw lokale instellingen. ------------------------------- ****77;39;87(text:p)This function always rounds the fractional part of a number to the nearest even number. Deze functie rondt altijd het breukgedeelte van een getal af naar het naaste even getal. ------------------------------- ****78;32;8(text:p)Example: Voorbeeld: ------------------------------- ****79;38;25(text:p)Sub ExampleCountryConvert Sub VoorbeeldCountryConvert ------------------------------- ****80;38;22(text:p)Msgbox CDbl(1234.5678) Msgbox CDbl(1234.5678) ------------------------------- ****81;38;22(text:p)Msgbox CInt(1234.5678) Msgbox CInt(1234.5678) ------------------------------- ****82;38;22(text:p)Msgbox CLng(1234.5678) Msgbox CLng(1234.5678) ------------------------------- ****83;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03100600.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;23(subject)CLng Function [Runtime] Clng functie [Runtime] ------------------------------- ****68;58;23(help:link)CLng Function [Runtime] Clng functie [Runtime] ****69;39;60(text:p)Converts any string or numeric expression to a long integer. Converteert elke tekenreekse of numerieke uitdrukking naar een Long Integer-getal. ------------------------------- ****71;71;6(text:span)Syntax Syntaxis ****71;89;1(): : ------------------------------- ****72;39;18(text:p)CLng (Expression) CLng (Expressie) ****72;79;4(keyword)CLng CLng ------------------------------- ****73;71;12(text:span)Return value Resultaatwaarde ****73;95;1(): : ------------------------------- ****74;39;4(text:p)Long Long ------------------------------- ****75;71;9(text:span)Parameter Parameter ****75;92;1(): : ------------------------------- ****76;39;61(text:p)Expression: Any numerical expression to be converted. If the Expressie: Elke numerieke uitdrukking die moet worden geconverteerd. Als de ****76;132;10(text:span)Expression Expressie ****76;154;85() lies outside the valid long integer range between -2.147.483.648 and 2.147.483.647, buiten het geldige Long Integer-getalbereik tussen -2.147.483.648 en 2.147.483.647 ligt, ****76;257;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****76;288;199() Basic returns an overflow error. When converting a string expression, the number must be entered as normal text ("123,5"). The number format is recognized according to your local settings. BASIC geeft een overflow-fout. Bij het converteren van een tekenreeks-uitdrukking moet het getal worden ingevoerd als normale tekst ("123,5"). De getalopmaak wordt herkend volgens uw lokale instellingen. ------------------------------- ****77;39;87(text:p)This function always rounds the fractional part of a number to the nearest even number. Deze functie rondt altijd het breukgedeelte van een getal af naar het naaste even getal. ------------------------------- ****78;32;8(text:p)Example: Voorbeeld: ------------------------------- ****79;38;25(text:p)Sub ExampleCountryConvert Sub VoorbeeldCountryConvert ------------------------------- ****80;38;22(text:p)Msgbox CDbl(1234.5678) Msgbox CDbl(1234.5678) ------------------------------- ****81;38;22(text:p)Msgbox CInt(1234.5678) Msgbox CInt(1234.5678) ------------------------------- ****82;38;22(text:p)Msgbox CLng(1234.5678) Msgbox CLng(1234.5678) ------------------------------- ****83;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03100700.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;25(subject)Const statement [Runtime] Const argument [Runtime] ------------------------------- ****68;58;25(help:link)Const statement [Runtime] Const argument [Runtime] ****69;39;31(text:p)Defines a string as a constant. Definieert een tekenreeks als een constante. ------------------------------- ****71;71;6(text:span)Syntax Syntaxis ****71;89;1(): : ------------------------------- ****72;39;24(text:p)Const Text = Expression Const Tekst = Expressie ****72;85;5(keyword)Const Const ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;79(text:p)Text: Any constant name which follows the standard variable naming conventions. Tekst: Elke constante-naam welke volgens de BASIC variabele naamregels is opgegeven. ------------------------------- ****75;39;309(text:p)A constant is a type of variable which helps to improve the readability of a progam. Constants are not defined as a specific type, rather are used merely as program code placeholders. A constant may only be defined in a program once and can never be modified. Use the following statement to define a constant: Een constante is een soort variabele welke helpt de leesbaarheid van een progamma te verbeteren. Constanten worden niet gedefinieerd als een specifiek type, maar worden meestentijds gebruikt als programmacode-symbolen. Een constante kan maar één keer worden gedefinieerd in een programma en kan nooit worden gewijzigd. Gebruik het volgende argument om een constante te definiëren: ------------------------------- ****76;39;26(text:p)CONST ConstName=Expression CONST ConstNaam=Expressie ------------------------------- ****77;39;63(text:p)The type of expression is irrelevant. If a program is started, Het soort uitdrukking is niet relevant. Als een programma wordt begonnen, ****77;120;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****77;151;82() Basic converts the program code internally so that each time a constant is used, BASIC converteert de programmacode intern, zodat elke keer als een constante wordt gebruikt, ****77;242;337()the defined expression replaces it. Basically, this is like an internal "Search & Replace" function. Wherever the constant name occurs in the Basic program code, it will be replaced by the expression. For this reason, the type assigned to the constant does not have any relevance since only the internal expression is used. vervangt de gedefinieerde uitdrukking het. Eigenlijk dus, is dit als een interne "Zoeken & Vervangen"-functie. Waar de constante-naam voorkomt in de/ Basic programmacode, zal het worden vervangen door de uitdrukking. Om deze reden, zal het type, toegekend aan de constante, geen relevantie hebben aangezien alleen de interne uitdrukking wordt gebruikt. ------------------------------- ****78;32;8(text:p)Example: Voorbeeld: ------------------------------- ****79;38;16(text:p)Sub ExampleConst Sub VoorbeeldConst ------------------------------- ****80;38;17(text:p)Const iVar = 1964 Const iVar = 1964 ------------------------------- ****81;38;11(text:p)Msgbox iVar Msgbox iVar ------------------------------- ****82;38;55(text:p)Const sVar = "Program", dVar As Double = 1.00 Const sVar = "Programma", dVar as Double = 1.00 ------------------------------- ****83;38;42(text:p)Msgbox sVar & " " & dVar Msgbox sVar & " " & dVar ------------------------------- ****84;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03100900.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)CSng Function[Runtime] Csng-function[Runtime] ------------------------------- ****66;58;22(help:link)CSng Function[Runtime] Csng-function[Runtime] ****67;39;62(text:p)Converts any string or numeric expression to data type Single. Converteert elke tekenreeks- of numerieke uitdrukking naar gegevenstype Single. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;18(text:p)CSng (Expression) CSng (Expressie) ****70;79;4(keyword)CSng CSng ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;6(text:p)Single Single ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;208(text:p)Expression : Any string or numeric expression to be converted. When converting a string expression, the number must be entered as normal text. The number format is recognized according to your local settings. Expressie : Elke tekenreeks- of numerieke uitdrukking die moet worden geconverteerd. Bij het converteren van een tekenreeks-uitdrukking moet het getal worden ingevoerd als normale tekst. De getalopmaak wordt herkend volgens uw lokale instellingen. ------------------------------- ****75;32;8(text:p)Example: Voorbeeld: ------------------------------- ****76;38;15(text:p)Sub ExampleCSNG Sub VoorbeeldCSNG ------------------------------- ****77;38;22(text:p)Msgbox CDbl(1234.5678) Msgbox CDbl(1234.5678) ------------------------------- ****78;38;22(text:p)Msgbox CInt(1234.5678) Msgbox CInt(1234.5678) ------------------------------- ****79;38;22(text:p)Msgbox CLng(1234.5678) Msgbox CLng(1234.5678) ------------------------------- ****80;38;22(text:p)Msgbox CSng(1234.5678) Msgbox CSng(1234.5678) ------------------------------- ****81;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03101000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;23(subject)CStr Function [Runtime] Cstr functie [Runtime] ------------------------------- ****72;58;23(help:link)CStr Function [Runtime] Cstr functie [Runtime] ****73;39;55(text:p)Converts any numeric expression to a string expression. Converteert elke numerieke uitdrukking naar een tekenreeks-uitdrukking. ------------------------------- ****75;71;6(text:span)Syntax Syntaxis ****75;89;1(): : ------------------------------- ****76;39;18(text:p)CStr (Expression) CStr (Expressie) ****76;79;4(keyword)CStr CStr ------------------------------- ****77;71;12(text:span)Return value Resultaatwaarde ****77;95;1(): : ------------------------------- ****78;39;6(text:p)String String ------------------------------- ****79;71;9(text:span)Parameter Parameter ****79;92;1(): : ------------------------------- ****80;39;67(text:p)Expression: Any valid string or numeric expression to be converted. Expressie: Elke geldige tekenreeks- of numeriek uitdrukking die moet worden geconverteerd. ------------------------------- ****81;32;28(text:p)Type : Conversion returns... Type : Conversie geeft weer... ------------------------------- ****87;45;9(text:p)Boolean : Boolean : ------------------------------- ****90;45;37(text:p)...a string that evaluates to either ...een tekenreeks die evalueert naar óf ****90;114;4(text:span)True Waar ****90;130;4() or óf ****90;166;5(text:span)False Onwaar ****90;183;1(). . ------------------------------- ****96;44;6(text:p)Date : Datum : ------------------------------- ****99;44;44(text:p)...a string that contains the date and time. ...een tekenreeks die de datum en tijd bevat. ------------------------------- ****104;44;6(text:p)Null : Nul : ------------------------------- ****107;44;20(text:p)...a run-time error. ...een run-time fout. ------------------------------- ****112;44;7(text:p)Empty : Leeg : ------------------------------- ****115;44;35(text:p)...a string without any characters. ...een tekenreeks zonder tekens. ------------------------------- ****120;44;5(text:p)Any : Enige : ------------------------------- ****123;44;38(text:p)...the corresponding number as string. ...het overeenkomstige getal als tekenreeks. ------------------------------- ****128;39;84(text:p)Zeros at the end of a floating-point number are not included in the returned string. Nullen aan het einde van een verplaatsende-komma getal worden niet opgenomen in de weergegeven tekenreeks. ------------------------------- ****129;32;8(text:p)Example: Voorbeeld: ------------------------------- ****130;38;15(text:p)Sub ExampleCSTR Sub VoorbeeldCSTR ------------------------------- ****131;38;18(text:p)Dim sVar As String Dim sVar as String ------------------------------- ****132;38;22(text:p)Msgbox CDbl(1234.5678) Msgbox CDbl(1234.5678) ------------------------------- ****133;38;22(text:p)Msgbox CInt(1234.5678) Msgbox CInt(1234.5678) ------------------------------- ****134;38;22(text:p)Msgbox CLng(1234.5678) Msgbox CLng(1234.5678) ------------------------------- ****135;38;22(text:p)Msgbox CSng(1234.5678) Msgbox CSng(1234.5678) ------------------------------- ****136;38;22(text:p)sVar = CStr(1234.5678) sVar = CStr(1234.5678) ------------------------------- ****137;38;11(text:p)MsgBox sVar MsgBox sVar ------------------------------- ****138;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03101100.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;27(subject)DefBool statement [Runtime] DefBool argument [Runtime] ------------------------------- ****66;58;27(help:link)DefBool statement [Runtime] DefBool argument [Runtime] ****67;39;129(text:p)Sets the default data type for variables, according to a letter range, if no type-declaration character or keyword was specified. Stelt het standaardwaarde-gegevenstype in voor variabelen, overeenkomstig een letterbereik, als er geen typedeclaratie-teken of sleutelwoord werd gespecificeerd. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;48(text:p)Defxxx Characterrange1[, Characterrange2[,...]] Defxxx Letterbereik1[, Letterbereik2[,...]] ****70;109;7(keyword)DefBool DefBool ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;95(text:p)Characterrange: Letters specifying the range of variables for which to set a default data type. Letterbereik: Letters die het bereik van variabelen te specificeren waarvoor een standaard-gegevenstype moet worden ingesteld. ------------------------------- ****73;39;48(text:p)xxx: Keyword defining the default variable type: xxx: Sleutelwoord om het standaardvariabelentype te definiëren: ------------------------------- ****74;32;31(text:p)Keyword : Default variable type Sleutelwoord : standaardvariabelentype ------------------------------- ****75;39;17(text:p)DefBool : Boolean DefBool : Boolean ------------------------------- ****76;32;8(text:p)Example: Voorbeeld: ------------------------------- ****78;38;41(text:p)REM Prefix definition for variable types: REM Voorvoegseldefinitie voor variabelentypen: ------------------------------- ****79;38;9(text:p)DefBool b DefBool b ------------------------------- ****80;38;9(text:p)DefDate t DefDate t ------------------------------- ****81;38;8(text:p)DefDbL d DefDbL d ------------------------------- ****82;38;8(text:p)DefInt i DefInt i ------------------------------- ****83;38;8(text:p)DefLng l DefLng l ------------------------------- ****84;38;8(text:p)DefObj o DefObj o ------------------------------- ****85;38;8(text:p)DefVar v DefVar v ------------------------------- ****87;38;18(text:p)Sub ExampleDefBool Sub VoorbeeldDefBool ------------------------------- ****88;38;9(text:p)bOK=TRUE bOK=TRUE ****88;56;39(text:p)REM bOK is an implicit Boolean variable REM bOK is een impliciete Boolean-variabele ------------------------------- ****89;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03101300.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;27(subject)DefDate statement [Runtime] DefDate argument [Runtime] ------------------------------- ****66;58;27(help:link)DefDate statement [Runtime] DefDate argument [Runtime] ****67;39;119(text:p)Sets the default variable type, according to a letter range, if no type-declaration character or keyword was specified. Stelt het standaardvariabelentype in, overeenkomstig een letterbereik, als er geen typedeclaratie-teken of sleutelwoord werd gespecificeerd. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;48(text:p)Defxxx Characterrange1[, Characterrange2[,...]] Defxxx letterbereik1[, Letterbereik2[,...]] ****70;109;7(keyword)DefDate DefDate ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;95(text:p)Characterrange: Letters specifying the range of variables for which to set a default data type. Letterbereik: Letters die het bereik van variabelen specificeren waarvoor een standaardgegevenstype moet worden ingesteld. ------------------------------- ****73;39;48(text:p)xxx: Keyword defining the default variable type: xxx: Sleutelwoord om het standaardvariabelentype te definiëren: ------------------------------- ****74;32;31(text:p)Keyword : Default variable type Sleutelwoord : standaardvariabelentype ------------------------------- ****75;39;14(text:p)DefDate : Date DefDate : Datum ------------------------------- ****76;32;8(text:p)Example: Voorbeeld: ------------------------------- ****78;38;42(text:p)REM Prefix definitions for variable types: REM Voorvoegseldefinities voor variabelentypen: ------------------------------- ****79;38;9(text:p)DefBool b DefBool b ------------------------------- ****80;38;9(text:p)DefDate t DefDate t ------------------------------- ****81;38;8(text:p)DefDbL d DefDbL d ------------------------------- ****82;38;8(text:p)DefInt i DefInt i ------------------------------- ****83;38;8(text:p)DefLng l DefLng l ------------------------------- ****84;38;8(text:p)DefObj o DefObj o ------------------------------- ****85;38;8(text:p)DefVar v DefVar v ------------------------------- ****87;38;18(text:p)Sub ExampleDefDate Sub VoorbeeldDefDate ------------------------------- ****88;38;11(text:p)tDate=Date tDate=Date ****88;69;38(text:p)REM tDate is an implicit date variable REM tDate is een impliciete datumvariabele ------------------------------- ****89;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03101400.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;26(subject)DefDbl statement [Runtime] DefDbl argument [Runtime] ------------------------------- ****66;58;26(help:link)DefDbl statement [Runtime] DefDbl argument [Runtime] ****67;39;119(text:p)Sets the default variable type, according to a letter range, if no type-declaration character or keyword was specified. Stelt het standaardvariabelentype in, overeenkomstig een letterbereik, als er geen typedeclaratie-teken of sleutelwoord werd gespecificeerd. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;48(text:p)Defxxx Characterrange1[, Characterrange2[,...]] Defxxx Letterbereik1[, Letterbereik2[,...]] ****70;109;6(keyword)DefDbl DefDbl ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;96(text:p)Characterrange : Letters specifying the range of variables for which to set a default data type. Letterbereik : Letters die het bereik van variabelen specificeren waarvoor een standaardgegevenstype moet worden ingesteld. ------------------------------- ****73;39;49(text:p)xxx : Keyword defining the default variable type: xxx : Sleutelwoord om het standaardvariabelentype te definiëren: ------------------------------- ****74;32;31(text:p)Keyword : Default variable type Sleutelwoord : standaardvariabelentype ------------------------------- ****75;39;15(text:p)DefDbl : Double DefDbl : Double ------------------------------- ****76;32;8(text:p)Example: Voorbeeld: ------------------------------- ****78;38;42(text:p)REM Prefix definitions for variable types: REM Voorvoegseldefinities voor variabelentypen: ------------------------------- ****79;38;9(text:p)DefBool b DefBool b ------------------------------- ****80;38;9(text:p)DefDate t DefDate t ------------------------------- ****81;38;8(text:p)DefDbL d DefDbL d ------------------------------- ****82;38;8(text:p)DefInt i DefInt i ------------------------------- ****83;38;8(text:p)DefLng l DefLng l ------------------------------- ****84;38;8(text:p)DefObj o DefObj o ------------------------------- ****85;38;8(text:p)DefVar v DefVar v ------------------------------- ****87;38;17(text:p)Sub ExampleDefDBL Sub VoorbeeldDefDBL ------------------------------- ****88;38;15(text:p)dValue=1.23e43 dValue=1.23e43 ****88;73;46(text:p)REM dValue is an implicit Double variable type REM dValue is een impliciet Double variabelentype ------------------------------- ****89;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03101500.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;26(subject)DefInt statement [Runtime] DefInt argument [Runtime] ------------------------------- ****66;58;26(help:link)DefInt statement [Runtime] DefInt argument [Runtime] ****67;39;119(text:p)Sets the default variable type, according to a letter range, if no type-declaration character or keyword was specified. Stelt het standaardvariabelentype in, overeenkomstig een letterbereik, als er geen typedeclaratie-teken of sleutelwoord werd gespecificeerd. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;48(text:p)Defxxx Characterrange1[, Characterrange2[,...]] Defxxx Letterbereik1[, Letterbereik2[,...]] ****70;109;6(keyword)DefInt DefInt ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;96(text:p)Characterrange : Letters specifying the range of variables for which to set a default data type. Letterbereik : Letters die het bereik van variabelen specificeren waarvoor een standaardgegevenstype moet worden ingesteld. ------------------------------- ****73;39;49(text:p)xxx : Keyword defining the default variable type: xxx : Sleutelwoord om het standaardvariabelentype te definiëren: ------------------------------- ****74;32;31(text:p)Keyword : Default variable type Sleutelwoord : standaardvariabelentype ------------------------------- ****75;39;16(text:p)DefInt : Integer DefInt : Integer ------------------------------- ****76;32;8(text:p)Example: Voorbeeld: ------------------------------- ****78;38;41(text:p)REM Prefix definitions for variable types REM Voorvoegseldefinities voor variabelentypen ------------------------------- ****79;38;9(text:p)DefBool b DefBool b ------------------------------- ****80;38;9(text:p)DefDate t DefDate t ------------------------------- ****81;38;8(text:p)DefDbL d DefDbL d ------------------------------- ****82;38;8(text:p)DefInt i DefInt i ------------------------------- ****83;38;8(text:p)DefLng l DefLng l ------------------------------- ****84;38;8(text:p)DefObj o DefObj o ------------------------------- ****85;38;8(text:p)DefVar v DefVar v ------------------------------- ****87;38;17(text:p)Sub ExampleDefInt Sub VoorbeeldDefInt ------------------------------- ****88;38;11(text:p)iCount=200 iCount=200 ****88;69;42(text:p)REM iCount is an implicit integer variable REM iCount is een impliciete Integer variabele ------------------------------- ****89;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03101600.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;26(subject)DefLng statement [Runtime] DefLng argument [Runtime] ------------------------------- ****66;58;26(help:link)DefLng statement [Runtime] DefLng argument [Runtime] ****67;39;119(text:p)Sets the default variable type, according to a letter range, if no type-declaration character or keyword was specified. Stelt het standaardvariabelentype in, overeenkomstig een letterbereik, als er geen typedeclaratie-teken of sleutelwoord werd gespecificeerd. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;48(text:p)Defxxx Characterrange1[, Characterrange2[,...]] Defxxx Letterbereik1[, Letterbereik2[,...]] ****70;109;6(keyword)DefLng DefLng ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;95(text:p)Characterrange: Letters specifying the range of variables for which to set a default data type. Letterbereik: Letters die het bereik van variabelen specificeren waarvoor een standaardgegevenstype moet worden ingesteld. ------------------------------- ****73;39;48(text:p)xxx: Keyword defining the default variable type: xxx: Sleutelwoord om het standaardvariabelentype te definiëren: ------------------------------- ****74;32;30(text:p)Keyword: Default variable type Sleutelwoord: standaardvariabelentype ------------------------------- ****75;39;13(text:p)DefLng : Long DefLng : Long ------------------------------- ****76;32;8(text:p)Example: Voorbeeld: ------------------------------- ****78;38;42(text:p)REM Prefix definitions for variable types: REM Voorvoegseldefinities voor variabelentypen: ------------------------------- ****79;38;9(text:p)DefBool b DefBool b ------------------------------- ****80;38;9(text:p)DefDate t DefDate t ------------------------------- ****81;38;8(text:p)DefDbL d DefDbL d ------------------------------- ****82;38;8(text:p)DefInt i DefInt i ------------------------------- ****83;38;8(text:p)DefLng l DefLng l ------------------------------- ****84;38;8(text:p)DefObj o DefObj o ------------------------------- ****85;38;8(text:p)DefVar v DefVar v ------------------------------- ****87;38;17(text:p)Sub ExampleDefLng Sub VoorbeeldDefLng ------------------------------- ****88;38;17(text:p)lCount=123456789 lCount=123456789 ****88;75;47(text:p)REM lCount is an implicit long integer variable REM lCount is een impliciete Long Integer-getal variabele ------------------------------- ****89;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03101700.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;26(subject)DefObj statement [Runtime] DefObj argument [Runtime] ------------------------------- ****66;58;26(help:link)DefObj statement [Runtime] DefObj argument [Runtime] ****67;39;119(text:p)Sets the default variable type, according to a letter range, if no type-declaration character or keyword was specified. Stelt het standaardvariabelentype in, overeenkomstig een letterbereik, als er geen typedeclaratie-teken of sleutelwoord werd gespecificeerd. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;48(text:p)Defxxx Characterrange1[, Characterrange2[,...]] Defxxx Letterbereik1[, Letterbereik2[,...]] ****70;109;6(keyword)DefObj DefObj ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;95(text:p)Characterrange: Letters specifying the range of variables for which to set a default data type. Letterbereik: Letters die het bereik van variabelen specificeren waarvoor een standaardgegevenstype moet worden ingesteld. ------------------------------- ****73;39;48(text:p)xxx: Keyword defining the default variable type: xxx: Sleutelwoord om het standaardvariabelentype te definiëren: ------------------------------- ****74;32;30(text:p)Keyword: Default variable type Sleutelwoord: standaardvariabelentype ------------------------------- ****75;39;15(text:p)DefObj : Object DefObj : Object ------------------------------- ****76;32;8(text:p)Example: Voorbeeld: ------------------------------- ****78;38;42(text:p)REM Prefix definitions for variable types: REM Voorvoegseldefinities voor variabelentypen: ------------------------------- ****79;38;9(text:p)DefBool b DefBool b ------------------------------- ****80;38;9(text:p)DefDate t DefDate t ------------------------------- ****81;38;8(text:p)DefDbL d DefDbL d ------------------------------- ****82;38;8(text:p)DefInt i DefInt i ------------------------------- ****83;38;8(text:p)DefLng l DefLng l ------------------------------- ****84;38;8(text:p)DefObj o DefObj o ------------------------------- ****85;38;8(text:p)DefVar v DefVar v ####Text\SBASIC\COMMON\03102000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;26(subject)DefVar statement [Runtime] DefVar argument [Runtime] ------------------------------- ****66;58;26(help:link)DefVar statement [Runtime] DefVar argument [Runtime] ****67;39;119(text:p)Sets the default variable type, according to a letter range, if no type-declaration character or keyword was specified. Stelt het standaardvariabelentype in, overeenkomstig een letterbereik, als er geen typedeclaratie-teken of sleutelwoord werd gespecificeerd. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;48(text:p)Defxxx Characterrange1[, Characterrange2[,...]] Defxxx Letterbereik[, Letterbereik2[,...]] ****70;109;6(keyword)DefVar DefVar ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;95(text:p)Characterrange: Letters specifying the range of variables for which to set a default data type. Letterbereik: Letters die het bereik van variabelen specificeren waarvoor een standaardgegevenstype moet worden ingesteld. ------------------------------- ****73;39;48(text:p)xxx: Keyword defining the default variable type: xxx: Sleutelwoord om het standaardvariabelentype te definiëren: ------------------------------- ****74;32;30(text:p)Keyword: Default variable type Sleutelwoord: standaardvariabelentype ------------------------------- ****75;39;16(text:p)DefVar : Variant DefVar : Variant ------------------------------- ****76;32;8(text:p)Example: Voorbeeld: ------------------------------- ****77;38;42(text:p)REM Prefix definitions for variable types: REM Voorvoegseldefinities voor variabelentypen: ------------------------------- ****78;38;9(text:p)DefBool b DefBool b ------------------------------- ****79;38;9(text:p)DefDate t DefDate t ------------------------------- ****80;38;8(text:p)DefDbL d DefDbL d ------------------------------- ****81;38;8(text:p)DefInt i DefInt i ------------------------------- ****82;38;8(text:p)DefLng l DefLng l ------------------------------- ****83;38;8(text:p)DefObj o DefObj o ------------------------------- ****84;38;8(text:p)DefVar v DefVar v ------------------------------- ****86;38;17(text:p)Sub ExampleDefVar Sub VoorbeeldDefVar ------------------------------- ****87;38;8(text:p)vDiv=99 vDiv=99 ****87;66;31(text:p)REM vDiv is an implicit variant REM vDiv is een impliciete variant ------------------------------- ****88;38;28(text:p)vDiv="Hello world" vDiv="Hallo wereld" ------------------------------- ****89;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03102100.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;23(subject)Dim statement [Runtime] Dim argument [Runtime] ------------------------------- ****102;58;23(help:link)Dim statement [Runtime] Dim argument [Runtime] ****103;39;26(text:p)Declares a variable or an Declareert een variabele of een ****103;87;5(keyword)array matrix ****103;111;6(text:p)array. matrix. ------------------------------- ****114;45;204(text:p)If the variables are separated with comma (e.g. DIM sPar1, sPar2, sPar3 AS STRING), only Variant variables will be defined up to the last variable. An own definition line should be used for each variable. Als de variabelen zijn gescheiden met komma (bijv. DIM sPar1, sPar2, sPar3 AS STRING), zullen alleen Variant-variabelen worden gedefinieerd tot de laatste variabele. Een eigen definitieregel zou moeten worden gebruikt voor iedere variabele. ------------------------------- ****123;44;19(text:p)DIM sPar1 AS STRING DIM sPar1 AS STRING ------------------------------- ****131;44;19(text:p)DIM sPar2 AS STRING DIM sPar2 AS STRING ------------------------------- ****139;44;19(text:p)DIM sPar3 AS STRING DIM sPar3 AS STRING ------------------------------- ****154;45;136(text:p)Dim is used to declare local variables within Subs. Global variables outside of Subs are declared with the PUBLIC or PRIVATE statements. Dim wordt gebruikt om lokale variabelen binnen Subs te declareren. Globale variabelen buiten Subs worden gedeclareerd met de PUBLIC of PRIVATE argumenten. ------------------------------- ****160;71;6(text:span)Syntax Syntaxis ****160;89;1(): : ------------------------------- ****161;39;97(text:p)[ReDim]Dim VarName [(start To end)] [As VarType][, VarName2 [(start To end)] [As VarType][,...]] [ReDim]Dim VarNaam [(start to end)] [As VarType][, VarNaam2 [(start to end)] [As VarType][,...]] ****161;158;3(keyword)Dim Dim ------------------------------- ****162;71;9(text:span)Parameter Parameter ****162;92;1(): : ------------------------------- ****163;39;36(text:p)VarName: Any variable or array name. VarNaam: Elke variabele of matrix-naam. ------------------------------- ****164;39;158(text:p)Start, End: Numerical values or constants ranging from -32768 to 32767 which define the number of elements (NumberElements=(end-start)+1) and the index range. Start, End: Numerieke waarden van constanten tussen -32768 en 32767 welke het aantal elementen (NumberElements=(end-start)+1) en het indexbereik definiëren. ------------------------------- ****165;39;87(text:p)Start and End can be numerical expressions, if ReDim is applied at the procedure level. Start en End kunnen numerieke uitdrukkingen zijn, als ReDim wordt toegepast op het procedureniveau. ------------------------------- ****166;39;62(text:p)VarType: Key word used to declare the data type of a variable. VarType: Sleutelwoord gebruikt om het gegevenstype van een variabele te declareren. ------------------------------- ****167;39;22(text:p)Keyword: Variable type Sleutelwoord: Variabeletype ------------------------------- ****168;39;36(text:p)Bool: Boolean variable (True, False) Bool: Boolean variabele (True, False) (Waar, Onwaar) ------------------------------- ****169;39;60(text:p)Currency: Currency-Variable (Currency with 4 Decimal places) Currency: Valuta-Variable (Valuta met 4 decimale plaatsen) ------------------------------- ****170;39;19(text:p)Date: Date variable Date: Datum variabele ------------------------------- ****171;39;107(text:p)Double: Double-precision floating-point variable (1,79769313486232 x 10E308 - 4,94065645841247 x 10E-324) Double: Double-precisie verplaatsende-komma variabele (1,79769313486232 x 10E308 - 4,94065645841247 x 10E-324) ------------------------------- ****172;39;43(text:p)Integer : Integer variable (-32768 - 32767) Integer : Integer variabele (-32768 - 32767) ------------------------------- ****173;39;60(text:p)Long: Long integer variable (-2.147.483.648 - 2.147.483.647) Long: Long Integer variabele (-2.147.483.648 - 2.147.483.647) ------------------------------- ****174;39;74(text:p)Object: Object variable (Note: can only be subsequently defined with Set!) Object: Object variabele (Opm: kan alleen vervolgens worden gedefinieerd met Set!) ------------------------------- ****175;39;88(text:p)Single: Single-precision floating-point variable (3,402823 x 10E38 - 1,401298 x 10E-45). Single: Single-precisie verplaatsende-komma variabele (3,402823 x 10E38 - 1,401298 x 10E-45). ------------------------------- ****176;39;75(text:p)String: String variable consisting of a maximum of 64,000 ASCII characters. String: Tekenreeks variabele bestaande uit een maximum van 64.000 ASCII tekens. ------------------------------- ****177;39;211(text:p)[Variant] : Variant variable type (contains all types, specified by definition). If no key word is given, variables are automatically defined as Variant Type , unless a statement from DefBool to DefVar was used. [Variant] : Variant variabelentype (omvat alle typen, gespecificeerd door definitie). Als er geen sleutelwoord wordt gegeven, worden variabelen automatisch gedefinieerd als Variant Type, tenzij een argument van DefBool naar DefVar was gebruikt. ------------------------------- ****178;39;3(text:p)In In ****178;60;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****178;101;304()Basic, variables need not to be declared explicitly. Only arrays must declared before use. A variable can be declared with the Dim statement, using commas to separate multiple declarations. To declare a variable type, enter a type-declaration character following the name or use a corresponding key word. BASIC, behoeven variabelen niet expliciet te worden gedeclareerd. Alleen matrices moeten worden gedeclareerd vóór gebruik. Een variabele kan worden gedeclareerd met het Dim-argument, met behulp van komma's om meervoudige declaraties te scheiden. Om een variabelentype te declareren, toets een typedeclaratie-teken in gevolgd door de naam of gebruik een overeenkomstig sleutelwoord. ------------------------------- ****179;57;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****179;88;324() Basic supports single or multi-dimensional arrays, defined by a specified variable type. Arrays are suitable if the program contains lists or tables to be edited. The advantage of arrays is that it is possible to address individual elements according to indexes, which can be formulated as numeric expressions or variables. BASIC ondersteunt enkele of multi-dimensionele matrices, gedefinieerd door een gespecificeerd variabelentype. Matrices zijn geschikt als het programma overzichten bevat of tabellen die moeten worden bewerkt. Het voordeel van matrices is dat het mogelijk is om individuele elementen volgens indexen te adresseren, welke kunnen worden geformuleerd als numerieke uitdrukkingen of variabelen. ------------------------------- ****180;39;92(text:p)Arrays are declared with the Dim statement. There are two methods to define the index range: Matrices worden gedeclareerd met het Dim-argument. Er zijn twee methoden om het indexbereik te definiëren: ------------------------------- ****181;39;60(text:p)DIM text(20) as String REM 21 elements numbered from 0 to 20 DIM tekst(20) as String REM 21 elementen genummerd van 0 tot 20 ------------------------------- ****182;39;65(text:p)DIM text(5 to 25) as String REM 21 elements numbered from 5 to 25 DIM tekst(5 to 25) as String REM 21 elementen genummerd van 5 tot 25 ------------------------------- ****183;39;58(text:p)DIM text(-15 to 5) as String REM 21 elements (including 0) DIM tekst(-15 to 5) as String REM 21 elementen (waaronder 0) ------------------------------- ****184;39;26(text:p)REM numbered from -15 to 5 REM genummerd van -15 tot 5 ------------------------------- ****185;39;26(text:p)Two-dimensional data field Twee-dimensioneel gegevensveld ------------------------------- ****186;39;110(text:p)DIM text(20,2) as String REM 63 elements; form 0 to 20 level 1, from 0 to 20 level 2 and from 0 to 20 level 3. DIM tekst(20,2) as String REM 63 elementen; formulier 0 tot 20 niveau 1, van 0 tot 20 niveau 2 en van 0 tot 20 niveau 3. ------------------------------- ****187;39;292(text:p)All array types can be declared dynamic if the ReDim statement is used within the procedure (in Subs or functions) to define the number of dimensions. Generally, array dimensions can only be defined once, and cannot be subsequently modified. Within a procedure, an array can be declared with Alle matrix-typen kunnen dynamisch worden gedeclareerd als het ReDim-argument is gebruikt binnen de procedure (in Subs of functies) om het aantal afmetingen te definiëren. In het algemeen kunnen matrixafmetingen maar één keer worden gedefinieerd en kunnen vervolgens niet worden gewijzigd. Binnen een procedure kan een matrix worden gedeclareerd met ****187;363;5(text:span)ReDim ReDim ****187;380;113(); dimensions can only be defined by numeric expressions, ensuring that the fields are only as large as necessary. ; afmetingen kunnen alleen worden gedefinieerd met numerieke uitdrukkingen, er zeker van zijnde dat de velden maar zo groot zijn als nodig is. ------------------------------- ****188;32;8(text:p)Example: Voorbeeld: ------------------------------- ****189;38;15(text:p)Sub ExampleDim1 Sub VoorbeeldDim1 ------------------------------- ****190;38;18(text:p)Dim sVar As String Dim sVar as String ------------------------------- ****191;38;19(text:p)Dim iVar As Integer Dim iVar as Integer ------------------------------- ****192;38;30(text:p)sVar = "Star Office" sVar = "OpenOffice.org" ------------------------------- ****193;38;7(text:p)End Sub end sub ------------------------------- ****195;38;15(text:p)Sub ExampleDim2 Sub VoorbeeldDim2 ------------------------------- ****196;38;30(text:p)REM Two-dimensional data field REM Twee-dimensioneel gegevensveld ------------------------------- ****197;38;25(text:p)Dim stext(20,2) as String Dim stekst(20,2) as String ------------------------------- ****198;38;46(text:p)Const sDim as String = " Dimension:" Const sDim as String = " Afmeting:" ------------------------------- ****200;38;15(text:p)for i = 0 to 20 for i = 0 to 20 ------------------------------- ****201;38;15(text:p)for ii = 0 to 2 for ii = 0 to 2 ------------------------------- ****202;38;45(text:p)stext(i,ii) = str(i) & sDim & str(ii) stekst(i,ii) = str(i) & sDim & str(ii) ------------------------------- ****203;38;7(text:p)next ii next ii ------------------------------- ****204;38;6(text:p)next i next i ------------------------------- ****206;38;15(text:p)for i = 0 to 20 for i = 0 to 20 ------------------------------- ****207;38;15(text:p)for ii = 0 to 2 for ii = 0 to 2 ------------------------------- ****208;38;18(text:p)msgbox stext(i,ii) msgbox stekst(i,ii) ------------------------------- ****209;38;7(text:p)next ii next ii ------------------------------- ****210;38;6(text:p)next i next i ------------------------------- ****211;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03102101.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;25(subject)ReDim statement [Runtime] ReDim argument [Runtime] ------------------------------- ****68;58;25(help:link)ReDim statement [Runtime] ReDim argument [Runtime] ****69;39;32(text:p)Declares a variable or an array. Declareert een variabele of een matrix. ------------------------------- ****71;71;6(text:span)Syntax Syntaxis ****71;89;1(): : ------------------------------- ****72;39;97(text:p)[ReDim]Dim VarName [(start To end)] [As VarType][, VarName2 [(start To end)] [As VarType][,...]] [ReDim]Dim VarNaam [(start to end)] [As VarType][, VarNaam2 [(start to end)] [As VarType][,...]] ****72;158;5(keyword)ReDim ReDim ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;41(text:p)VarName: Any variable name or array name. VarNaam: Elke variabelenaam of matrixnaam. ------------------------------- ****75;39;155(text:p)Start, End: Numeric values or constants ranging from -32768 to 32767 that define the number of elements (NumberElements=(end-start)+1) and the index range. Start, End: Numerieke waarden van constanten tussen -32768 en 32767 die het aantal elementen (NumberElements=(end-start)+1) en het indexbereik definiëren. ------------------------------- ****76;39;81(text:p)start and end can be numeric expressions if ReDim is used at the procedure level. Start en End kunnen numerieke uitdrukkingen zijn als ReDim is gebruikt op het procedure niveau. ------------------------------- ****77;39;62(text:p)VarType: Key word used to declare the data type of a variable. VarType: Sleutelwoord gebruikt om het gegevenstype van een variabele te declareren. ------------------------------- ****78;39;22(text:p)Keyword: Variable type Sleutelwoord: Variabele type ------------------------------- ****79;39;36(text:p)Bool: Boolean variable (True, False) Bool: Boolean variabele (True, False) ------------------------------- ****80;39;19(text:p)Date: Date variable Date: Datum variabele ------------------------------- ****81;39;97(text:p)Double: Double floating point variable (1.79769313486232 x 10E308 - 4.94065645841247 x 10E-324) Double: Dubbel zwevend punt variabele (1.79769313486232 x 10E308 - 4.94065645841247 x 10E-324) ------------------------------- ****82;39;42(text:p)Integer: Integer variable (-32768 - 32767) Integer: Integer variabele (-32768 - 32767) ------------------------------- ****83;39;60(text:p)Long: Long integer variable (-2,147,483,648 - 2,147,483,647) Long: Long Integer variabele (-2,147,483,648 - 2,147,483,647) ------------------------------- ****84;39;66(text:p)Object: Object variable (can only be subsequently defined by Set!) Object: Object variabele (kan vervolgens alleen worden gedefinieerd door Set!) ------------------------------- ****85;39;194(text:p)[Single]: Single floating-point variable (3.402823 x 10E38 - 1.401298 x 10E-45). If no key word is specified, a variable is defined as Single, unless a statement from DefBool to DefVar was used. [Single]: Single verplaatsende-komma variabele (3.402823 x 10E38 - 1.401298 x 10E-45). Als er geen sleutelwoord is gespecificeerd, wordt een variabele gedefinieerd als Single, tenzij een argument van DefBool naar DefVar werd gebruikt. ------------------------------- ****86;39;72(text:p)String: String variable containing a maximum of 64,000 ASCII characters. String: tekenreeks-variabele, een maximum van 64.000 ASCII tekens bevattend. ------------------------------- ****87;39;80(text:p)Variant: Variant variable type (can contain all types and is set by definition). Variant: Variant variabelentype (kan alle types bevatten en is ingesteld door definitie). ------------------------------- ****88;39;45(text:p)Variables need not be explicitly declared in Variabelen behoeven niet expliciet te worden gedeclareerd in ****88;102;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****88;133;67() Basic. Only arrays must be declared before use. A variable can be BASIC. Alleen matrices moet worden gedeclareerd vóór gebruik. Een variabele kan worden ****88;209;230()declared with the Dim statement; multiple declarations must be separated by commas. To set the type of a variable in the declaration, use either a special type-declaration character appended to the name or the respective key word. gedeclareerd met het Dim-argument; meervoudige declarations moeten worden gescheiden door komma's. Om het soort variabele in de declaratie in te stellen, gebruik óf een speciaal typedeclaratie-teken, gehangen aan de naam óf het respectievelijke sleutelwoord. ------------------------------- ****89;57;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****89;88;274() Basic uses one-dimensional or multi-dimensional arrays (fields) of given variable types. Arrays are used to edit lists or tables in the program. The advantage of arrays is that you can address individual elements via indices represented as numeric expressions or variables. BASIC gebruikt een-dimensionele of multi-dimensionele matrices (velden) van bepaalde variabelentypen. Matrices worden gebruikt om overzichten of tabellen in het programma te bewerken. Het voordeel van matrices is dat u individuele elementen via indexen kunt adresseren, voorgesteld als numerieke uitdrukkingen of variabelen. ------------------------------- ****90;39;90(text:p)There are two ways to set the range of indices for arrays declared with the Dim statement: Er zijn twee manieren om het bereik van indexen voor matrices, gedeclareerd met het Dim statement, in te stellen: ------------------------------- ****91;39;23(text:p)DIM text(20) As String DIM tekst(20) as String ****91;71;37(text:p)REM 21 elements numbered from 0 to 20 REM 21 elementen genummerd van 0 tot 20 ------------------------------- ****92;39;65(text:p)DIM text(5 to 25) As String REM 21 elements numbered from 5 to 25 DIM tekst(5 to 25) as String REM 21 elementen genummerd van 5 tot 25 ------------------------------- ****93;39;60(text:p)DIM text$(-15 to 5) As String REM 21 elements (0 inclusive), DIM tekst$(-15 to 5) as String REM 21 elementen (inclusief 0), ------------------------------- ****94;39;26(text:p)rem numbered from -15 to 5 rem genummerd van -15 tot 5 ------------------------------- ****95;39;261(text:p)Variable fields, regardless of type, can be made dynamic if they are dimensioned by ReDim at procedure level (i.e., in Subs or Functions). Normally the range of an array can be set only once and cant be modified. Within a procedure, an array can be declared by Variabele velden, zonder te letten op type, kunnen dynamisch worden gemaakt als zij worden gedimensioneerd door ReDim op procedureniveau (d.w.z., in Subs of Functions). Normaal kan het bereik van een matrix maar één keer worden ingesteld en kan niet worden gewijzigd. Binnen een procedure, kan een matrix worden gedeclareerd door ****95;332;5(text:span)ReDim ReDim ****95;349;67() using numeric expressions to define the range for the field sizes. met behulp van numerieke uitdrukkingen om het bereik voor de veldafmetingen te definiëren. ------------------------------- ****96;32;8(text:p)Example: Voorbeeld: ------------------------------- ****97;38;16(text:p)Sub ExampleRedim Sub VoorbeeldRedim ------------------------------- ****98;38;40(text:p)Dim iVar() As Integer, iCount As Integer Dim iVar() as Integer, iCount as Integer ------------------------------- ****99;38;24(text:p)ReDim iVar(5) As integer ReDim iVar(5) as Integer ------------------------------- ****100;38;19(text:p)For iCount = 1 To 5 For iCount = 1 to 5 ------------------------------- ****101;38;21(text:p)iVar(iCount) = iCount iVar(iCount) = iCount ------------------------------- ****102;38;11(text:p)Next iCount Next iCount ------------------------------- ****103;38;25(text:p)ReDim iVar(10) As integer ReDim iVar(10) as Integer ------------------------------- ****104;38;20(text:p)For iCount = 1 To 10 For iCount = 1 to 10 ------------------------------- ****105;38;21(text:p)iVar(iCount) = iCount iVar(iCount) = iCount ------------------------------- ****106;38;11(text:p)Next iCount Next iCount ------------------------------- ****107;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03102200.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;26(subject)IsArray Function [Runtime] IsArray functie [Runtime] ------------------------------- ****66;58;26(help:link)IsArray Function [Runtime] IsArray functie [Runtime] ****67;39;61(text:p)Returns whether a given variable is a data field in an array. Geeft weer of een gegeven variabele een gegevensveld in een matrix is. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;14(text:p)IsArray (Var) IsArray (Var) ****70;75;7(keyword)IsArray IsArray ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;4(text:p)Bool Bool ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;110(text:p)Var: Any variable to be tested whether it was declared as an array. If this is the case, the function returns Var: Elke variabele die moet worden getest of het was gedeclareerd als een matrix. Als dit het geval is, geeft de functie weer ****74;181;4(text:span)True Waar ****74;197;12(); otherwise ; anders ****74;241;5(text:span)False Onwaar ****74;258;1(). . ------------------------------- ****75;32;8(text:p)Example: Voorbeeld: ------------------------------- ****76;38;18(text:p)Sub ExampleIsArray Sub VoorbeeldIsArray ------------------------------- ****77;38;23(text:p)Dim sDatf(10) as String Dim sDatf(10) as String ------------------------------- ****78;38;22(text:p)print isarray(sdatf()) print isarray(sdatf()) ------------------------------- ****79;38;7(text:p)end Sub end Sub ####Text\SBASIC\COMMON\03102300.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;25(subject)IsDate Function [Runtime] IsDate functie [Runtime] ------------------------------- ****66;58;25(help:link)IsDate Function [Runtime] IsDate functie [Runtime] ****67;39;73(text:p)Tests whether a given numeric or string expression can be converted to a Test of een gegeven numerieke of tekenreeks-uitdrukking kan worden geconverteerd naar een ****67;144;4(text:span)Date Date ****67;160;10() variable. variabele. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;20(text:p)IsDate (Expression) IsDate (Expressie) ****70;81;6(keyword)IsDate IsDate ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;4(text:p)Bool Bool ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;125(text:p)Expression: Any numeric or string expression to be tested. If the expression can be converted to a date the function returns Expressie: Elke numerieke of tekenreeks-uitdrukking die moet worden getest. Als de uitdrukking kan worden geconverteerd naar een datum geeft de functie weer ****74;196;4(text:span)True Waar ****74;212;12(); otherwise ; anders ****74;256;5(text:span)False Onwaar ****74;273;1(). . ------------------------------- ****75;32;8(text:p)Example: Voorbeeld: ------------------------------- ****76;38;17(text:p)Sub ExampleIsDate Sub VoorbeeldIsDate ------------------------------- ****77;38;22(text:p)Dim sDateVar as String Dim sDateVar as String ------------------------------- ****78;38;33(text:p)sDateVar = "12.12.1997" sDateVar = "12.12.1997" ------------------------------- ****79;38;39(text:p)print IsDate(sDateVar) REM Returns True print IsDate(sDateVar) REM Geeft weer: True (Waar) ------------------------------- ****80;38;31(text:p)sDateVar = "12121997" sDateVar = "12121997" ------------------------------- ****81;38;40(text:p)print IsDate(sDateVar) REM Returns False print IsDate(sDateVar) REM Geeft weer: False (Onwaar) ------------------------------- ****82;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03102400.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;26(subject)IsEmpty Function [Runtime] IsEmpty functie [Runtime] ------------------------------- ****66;58;26(help:link)IsEmpty Function [Runtime] IsEmpty functie [Runtime] ****67;39;113(text:p)Tests whether a Variant variable contains the Empty value, indicating that the variable has not been initialized. Test of een Variant-variabele de Empty-waarde bevat, aangevende dat de variabele niet geïnitialiseerd werd. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;14(text:p)IsEmpty (Var) IsEmpty (Var) ****70;75;7(keyword)IsEmpty IsEmpty ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;4(text:p)Bool Bool ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;128(text:p)Var: Any variable to be tested. If the Variant contains the Empty value, the function returns True; otherwise, it returns False. Var: Elke variabele die moet worden getest. Als de Variant de Empty-waarde bevat, geeft de functie weer Waar; anders geeft het Onwaar weer. ------------------------------- ****75;32;8(text:p)Example: Voorbeeld: ------------------------------- ****76;38;18(text:p)Sub ExampleIsEmpty Sub VoorbeeldIsEmpty ------------------------------- ****77;38;19(text:p)Dim sVar as Variant Dim sVar as Variant ------------------------------- ****78;38;12(text:p)sVar = Empty sVar = Empty ------------------------------- ****79;38;36(text:p)Print IsEmpty(sVar) REM Returns True print IsEmpty(sVar) REM Geeft weer: Waar ------------------------------- ****80;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03102600.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;25(subject)IsNull Function [Runtime] IsNull functie [Runtime] ------------------------------- ****66;58;25(help:link)IsNull Function [Runtime] IsNull functie [Runtime] ****67;39;103(text:p)Tests whether a Variant contains the special Null value, indicating that the variable contains no data. Test of een Variant de speciale Nul-waarde bevat, aangevende dat de variabele geen gegevens bevat. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;13(text:p)IsNull (Var) IsNull (Var) ****70;74;6(keyword)IsNull IsNull ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;4(text:p)Bool Bool ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;127(text:p)Var: Any variable to be tested. This function returns True if the Variant contains the Null value; otherwise, it returns False. Var: Elke variabeledie moet worden getest. Deze functie geeft weer Waar als de Variant de Nul-waarde bevat; anders geeft het weer Onwaar. ------------------------------- ****75;32;8(text:p)Example: Voorbeeld: ------------------------------- ****76;38;17(text:p)Sub ExampleIsNull Sub VoorbeeldIsNull ------------------------------- ****77;38;19(text:p)Dim vVar As Variant Dim vVar As Variant ------------------------------- ****78;38;19(text:p)msgbox IsNull(vVar) msgbox IsNull(vVar) ------------------------------- ****79;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03102700.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;28(subject)IsNumeric Function [Runtime] IsNumeric functie [Runtime] ------------------------------- ****66;58;28(help:link)IsNumeric Function [Runtime] IsNumeric functie [Runtime] ****67;39;71(text:p)Tests whether the given expression is a number. If the expression is a Test of de gegeven uitdrukking een getal is. Als de uitdrukking is een ****67;147;6(text:p)number getal ****67;166;23(), the function returns , de functie geeft weer ****67;221;4(text:span)True Waar ****67;237;12(); otherwise ; anders ****67;281;5(text:span)False Onwaar ****67;298;1(). . ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;16(text:p)IsNumeric (Var) IsNumeric (Var) ****70;77;9(keyword)IsNumeric IsNumeric ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;4(text:p)Bool Bool ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;33(text:p)Var: Any expression to be tested. Var: Elke uitdrukking die moet worden getest. ------------------------------- ****75;32;8(text:p)Example: Voorbeeld: ------------------------------- ****76;38;20(text:p)Sub ExampleIsNumeric Sub VoorbeeldIsNumeric ------------------------------- ****77;38;19(text:p)Dim vVar as variant Dim vVar as variant ------------------------------- ****78;38;22(text:p)vVar = "ABC" vVar = "ABC" ------------------------------- ****79;38;39(text:p)Print IsNumeric(sVar) REM Returns False Print IsNumeric(sVar) REM Geeft weer: Onwaar ------------------------------- ****80;38;22(text:p)vVar = "123" vVar = "123" ------------------------------- ****81;38;38(text:p)Print IsNumeric(sVar) REM Returns True Print IsNumeric(sVar) REM Geeft weer: Waar ------------------------------- ****82;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03102800.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;27(subject)IsObject Function [Runtime] IsObject functie [Runtime] ------------------------------- ****62;58;27(help:link)IsObject Function [Runtime] IsObject functie [Runtime] ****63;39;78(text:p)Test whether the given object variable is an OLE object. The function returns Test of de gegeven object-variabele een OLE object is. De functie geeft weer ****63;149;4(text:span)True Waar ****63;165;23() if the variable is an als de variabele is een ****63;220;6(text:span)Object Object ****63;238;29() type; otherwise, it returns type; anders geeft het weer ****63;299;5(text:span)False Onwaar ****63;316;1(). . ------------------------------- ****65;71;6(text:span)Syntax Syntaxis ****65;89;1(): : ------------------------------- ****66;39;21(text:p)IsObject (ObjectVar) IsObject (ObjectVar) ****66;82;8(keyword)IsObject IsObject ------------------------------- ****67;71;12(text:span)Return value Resultaatwaarde ****67;95;1(): : ------------------------------- ****68;39;4(text:p)Bool Bool ------------------------------- ****69;71;9(text:span)Parameter Parameter ****69;92;1(): : ------------------------------- ****70;39;111(text:p)ObjectVar: Any variable to be tested. If the Object variable contains an OLE object, the function returns True. ObjectVar: Elke variabele die moet worden getest. Als de Object-variabele een OLE object bevat, geeft de functie weer Waar. ####Text\SBASIC\COMMON\03102900.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;25(subject)LBound Function [Runtime] Lbound functie [Runtime] ------------------------------- ****66;58;25(help:link)LBound Function [Runtime] Lbound functie [Runtime] ****67;39;36(text:p)Returns the lower bound of an array. Geeft de ondergrens van een matrix weer. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;33(text:p)LBound (ArrayName [, Dimension]) LBound (MatrixNaam [, Dimensie]) ****70;94;6(keyword)LBound LBound ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;7(text:p)Integer Integer ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;60(text:p)ArrayName: Name of the array for which to return the upper ( MatrixNaam: Naam van de matrix waarvoor moet worden weergegeven de boven- ( ****74;131;6(text:span)Ubound Ubound ****74;149;12()) or lower ( ) of onder- ( ****74;193;6(text:span)LBound LBound ****74;211;31()) limit of the array dimension. ) grens van de matrixafmeting. ------------------------------- ****75;39;73(text:p)[Dimension] : Integer that specifies which dimension to return the upper( [Dimensie] : Integer-getal dat specificeert welke afmeting moet worden weergegeven voor de boven-( ****75;144;6(text:span)Ubound Ubound ****75;162;12()) or lower ( ) of onder- ( ****75;206;6(text:span)LBound LBound ****75;224;73()) boundary for. If no value is specified, the first dimension is assumed. ) grens. Als er geen waarde is gespecificeerd, wordt de eerste afmeting aangenomen. ------------------------------- ****76;32;8(text:p)Example: Voorbeeld: ------------------------------- ****77;38;23(text:p)Sub ExampleUboundLbound Sub VoorbeeldUboundLbound ------------------------------- ****78;38;28(text:p)Dim sVar(10 to 20) As String Dim sVar(10 to 20) as String ------------------------------- ****79;38;20(text:p)print LBound(sVar()) print LBound(sVar()) ------------------------------- ****80;38;20(text:p)print UBound(sVar()) print UBound(sVar()) ------------------------------- ****81;38;7(text:p)end Sub end Sub ------------------------------- ****82;38;24(text:p)Sub ExampleUboundLbound2 Sub VoorbeeldUboundLbound2 ------------------------------- ****83;38;36(text:p)Dim sVar(10 to 20,5 To 70) As String Dim sVar(10 to 20,5 to 70) as String ------------------------------- ****84;38;35(text:p)Print LBound(sVar()) REM Returns 10 print LBound(sVar()) REM Geeft weer: 10 ------------------------------- ****85;38;35(text:p)Print UBound(sVar()) REM Returns 20 print UBound(sVar()) REM Geeft weer: 20 ------------------------------- ****86;38;36(text:p)Print LBound(sVar(),2) REM Returns 5 print LBound(sVar(),2) REM Geeft weer: 5 ------------------------------- ****87;38;37(text:p)Print UBound(sVar(),2) REM Returns 70 print UBound(sVar(),2) REM Geeft weer: 70 ------------------------------- ****88;38;7(text:p)end Sub end Sub ####Text\SBASIC\COMMON\03103000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;25(subject)UBound Function [Runtime] Ubound functie [Runtime] ------------------------------- ****66;58;25(help:link)UBound Function [Runtime] Ubound functie [Runtime] ****67;39;36(text:p)Returns the upper bound of an array. Geeft weer de bovengrens van een matrix. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;33(text:p)UBound (ArrayName [, Dimension]) UBound (Matrixnaam [, Dimensie]) ****70;94;6(keyword)UBound UBound ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;7(text:p)Integer Integer ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;63(text:p)ArrayName: Name of the array for which to determine the upper ( Matrixnaam: Naam van de matrix waarvoor moet worden bepaald de boven- ( ****74;134;6(text:span)Ubound Ubound ****74;152;12()) or lower ( ) of onder- ( ****74;196;6(text:span)LBound LBound ****74;214;8()) bound. ) grens. ------------------------------- ****75;39;73(text:p)[Dimension] : Integer that specifies which dimension to return the upper( [Dimensie] : Integer-getal dat specificeert welke afmeting wordt weergegeven voor de boven-( ****75;144;6(text:span)Ubound Ubound ****75;162;12()) or lower ( ) of onder- ( ****75;206;6(text:span)LBound LBound ****75;224;73()) boundary for. If no value is specified, the first dimension is assumed. ) grens. Als er geen waarde is gespecificeerd, wordt de eerste afmeting aangenomen. ------------------------------- ****76;32;8(text:p)Example: Voorbeeld: ------------------------------- ****77;38;23(text:p)Sub ExampleUboundLbound Sub VoorbeeldUboundLbound ------------------------------- ****78;38;28(text:p)Dim sVar(10 to 20) As String Dim sVar(10 to 20) as String ------------------------------- ****79;38;20(text:p)print LBound(sVar()) print LBound(sVar()) ------------------------------- ****80;38;20(text:p)print UBound(sVar()) print UBound(sVar()) ------------------------------- ****81;38;7(text:p)end Sub end Sub ------------------------------- ****82;38;24(text:p)Sub ExampleUboundLbound2 Sub VoorbeeldUboundLbound2 ------------------------------- ****83;38;36(text:p)Dim sVar(10 to 20,5 To 70) As String Dim sVar(10 to 20,5 to 70) as String ------------------------------- ****84;38;35(text:p)Print LBound(sVar()) REM Returns 10 print LBound(sVar()) REM Geeft weer: 10 ------------------------------- ****85;38;35(text:p)Print UBound(sVar()) REM Returns 20 print UBound(sVar()) REM Geeft weer: 20 ------------------------------- ****86;38;36(text:p)Print LBound(sVar(),2) REM Returns 5 print LBound(sVar(),2) REM Geeft weer: 5 ------------------------------- ****87;38;37(text:p)Print UBound(sVar(),2) REM Returns 70 print UBound(sVar(),2) REM Geeft weer: 70 ------------------------------- ****88;38;7(text:p)end Sub end Sub ####Text\SBASIC\COMMON\03103100.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;23(subject)Let statement [Runtime] Let argument [Runtime] ------------------------------- ****84;58;23(help:link)Let statement [Runtime] Let argument [Runtime] ****85;39;30(text:p)Assigns a value to a variable. Kent een waarde toe aan een variabele. ------------------------------- ****87;71;6(text:span)Syntax Syntaxis ****87;89;1(): : ------------------------------- ****88;39;25(text:p)[Let] VarName=Expression [Let] VarNaam=Expressie ****88;86;3(keyword)Let Let ------------------------------- ****89;71;9(text:span)Parameter Parameter ****89;92;1(): : ------------------------------- ****90;39;96(text:p)VarName: Variable to which a value will be assigned. Value and variable type must be compatible. VarNaam: Variabele waaraan een waarde moet worden toegekend. Waarde en variabelentype moeten compatibel zijn. ------------------------------- ****100;45;40(text:p)As in most BASIC dialects, the key word Zoals in de meeste BASIC-dialecten, het sleutelwoord ****100;117;3(text:span)Let Let ****100;132;13() is optional. is optioneel. ------------------------------- ****106;32;8(text:p)Example: Voorbeeld: ------------------------------- ****107;38;14(text:p)Sub ExampleLen Sub VoorbeeldLen ------------------------------- ****108;38;19(text:p)Dim stext as String Dim stekst as String ------------------------------- ****109;38;33(text:p)Let sText = "Las Vegas" Let sTekst = "Leeuwarden" ------------------------------- ****110;38;32(text:p)msgbox Len(sText) REM liefert 10 msgbox Len(sTekst) REM Geeft weer: 10 ------------------------------- ****111;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03103200.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;31(subject)Option Base statement [Runtime] Option Base argument [Runtime] ------------------------------- ****84;58;31(help:link)Option Base statement [Runtime] Option Base argument [Runtime] ****85;39;53(text:p)Defines the default lower bound for arrays as 0 or 1. Definieert de standaardwaarde voor de ondergrens van matrices als 0 of 1. ------------------------------- ****87;71;6(text:span)Syntax Syntaxis ****87;89;1(): : ------------------------------- ****88;39;21(text:p)Option Base { 0 | 1} Option Base { 0 | 1} ****88;82;11(keyword)Option Base Option Base ------------------------------- ****89;71;9(text:span)Parameter Parameter ****89;92;1(): : ------------------------------- ****100;45;102(text:p)This statement must be inserted before any other executable statement in the program code of a module. Dit argument moet worden ingevoegd vóór willekeurig welk ander uitvoerbaar argument in de programmacode van een module. ------------------------------- ****106;32;8(text:p)Example: Voorbeeld: ------------------------------- ****107;38;13(text:p)option Base 1 Option Base 1 ------------------------------- ****109;38;21(text:p)Sub ExampleOptionBase Sub VoorbeeldOptionBase ------------------------------- ****110;38;22(text:p)Dim sVar(20) As String Dim sVar(20) as String ------------------------------- ****111;38;21(text:p)msgbox LBound(sVar()) msgbox LBound(sVar()) ------------------------------- ****112;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03103300.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;35(subject)Option Explicit statement [Runtime] Option Explicit argument [Runtime] ------------------------------- ****84;58;35(help:link)Option Explicit statement [Runtime] Option Explicit argument [Runtime] ****85;39;99(text:p)Defines that every variable used in the program code be explicitly declared with the Dim statement. Definieert dat iedere variabele, gebruikt in de programmacode, expliciet moet worden gedeclareerd met het Dim-argument. ------------------------------- ****87;71;6(text:span)Syntax Syntaxis ****87;89;1(): : ------------------------------- ****88;39;16(text:p)Option Explicit Option Explicit ****88;77;15(keyword)Option Explicit Option Explicit ------------------------------- ****89;71;9(text:span)Parameter Parameter ****89;92;1(): : ------------------------------- ****100;45;78(text:p)This statement must preceed any other executable program code within a module. Dit argument moet voorafgaan aan willekeurig welke andere uitvoerbare programmacode binnen een module. ------------------------------- ****106;32;8(text:p)Example: Voorbeeld: ------------------------------- ****107;38;15(text:p)Option Explicit Option Explicit ------------------------------- ****108;38;19(text:p)Sub ExampleExplicit Sub VoorbeeldExplicit ------------------------------- ****109;38;18(text:p)Dim sVar As String Dim sVar as String ------------------------------- ****110;38;28(text:p)sVar = "Las Vegas" sVar = "Leeuwarden" ------------------------------- ****111;38;17(text:p)For i% = 1 to 10 for i% = 1 to 10 ****111;64;36(text:p)REM This results in a run-time error REM Dit resulteert in een run-time fout ------------------------------- ****112;38;3(text:p)REM REM ------------------------------- ****113;38;7(text:p)Next i% next i% ------------------------------- ****114;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03103400.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;26(subject)Public statement [Runtime] Public argument [Runtime] ------------------------------- ****66;58;26(help:link)Public statement [Runtime] Public argument [Runtime] ****67;39;156(text:p)Dimensions a variable or an array at module level (not within a Sub or Function), so that the variable and the array are valid in all libraries and modules. Dimensioneert een variabele of een matrix op moduleniveau (niet binnen een Sub of Function), zodat de variabele en de matrix geldig zijn in alle bibliotheken en modules. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;91(text:p)Public VarName[(start To end)] [As VarType][, VarName2[(start To end)] [As VarType][,...]] Public VarNaam[(start to end)] [As VarType][, VarNaam2[(start to end)] [As VarType][,...]] ****70;152;6(keyword)Public Public ------------------------------- ****71;32;8(text:p)Example: Voorbeeld: ------------------------------- ****72;38;28(text:p)Public iPublicVar As Integer Public iPublicVar as Integer ------------------------------- ****74;38;17(text:p)Sub ExamplePublic Sub VoorbeeldPublic ------------------------------- ****75;38;27(text:p)iPublicVar = iPublicVar + 1 iPublicVar = iPublicVar + 1 ------------------------------- ****76;38;17(text:p)MsgBox iPublicVar MsgBox iPublicVar ------------------------------- ****77;38;7(text:p)End sub end sub ####Text\SBASIC\COMMON\03103500.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;26(subject)Static statement [Runtime] Static argument [Runtime] ------------------------------- ****84;58;26(help:link)Static statement [Runtime] Static argument [Runtime] ****85;39;220(text:p)Declares a variable or an array at the procedure level (i.e., within a Sub or Function) so the values of the variable or the array are retained after exiting the Sub or Function. Dim statement conventions are also valid. Declareert een variabele of een matrix op het procedureniveau (d.w.z., binnen een Sub of Function) dus de waarden van de variabele of de matrix worden aangehouden na beëindigen van de Sub of Function. Dim-argumentregels zijn ook geldig. ------------------------------- ****96;45;4(text:p)The Het ****96;81;16(text:span)Static statement Static argument ****96;109;94() cannot be used to define variable arrays. Arrays must be specified according to a fixed size. kan niet worden gebruikt om variabele matrices te definiëren. Matrices moeten worden gespecificeerd overeenkomstig een vaste grootte. ------------------------------- ****102;71;6(text:span)Syntax Syntaxis ****102;89;1(): : ------------------------------- ****103;39;88(text:p)Static VarName[(start To end)] [As VarType], VarName2[(start To end)] [As VarType], ... Static VarNaam[(start to end)] [As VarType], VarNaam2[(start to end)] [As VarType], ... ****103;149;6(keyword)Static Static ------------------------------- ****104;32;8(text:p)Example: Voorbeeld: ------------------------------- ****105;38;17(text:p)Sub ExampleStatic Sub VoorbeeldStatic ------------------------------- ****106;38;23(text:p)Static iInit As Integer Static iInit as Integer ------------------------------- ****107;38;79(text:p)if iInit = 0 then iInit = InitVar() REM Test if variable is already initialized if iInit = 0 then iInit = InitVar() REM Test of een variabele reeds is geïnitialiseerd ------------------------------- ****108;38;17(text:p)iInit = iInit + 1 iInit = iInit + 1 ------------------------------- ****109;38;40(text:p)MsgBox iInit,0,"The answer is" MsgBox iInit,0,"Het antwoord is :" ------------------------------- ****111;38;7(text:p)End Sub end sub ------------------------------- ****113;38;54(text:p)REM Function for initialization of the static variable REM Functie voor initialiseren van de Static-variabele ------------------------------- ****114;38;29(text:p)Function InitVar() As Integer Function InitVar() as Integer ------------------------------- ****115;38;13(text:p)InitVar = 40 InitVar = 40 ****115;60;32(text:p)REM any value for initialization REM een willekeurige waarde voor initialisatie ------------------------------- ****116;38;12(text:p)End Function end function ####Text\SBASIC\COMMON\03103600.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;44(subject)TypeName Function; VarType Function[Runtime] TypeName functie; VarType functie[Runtime] ------------------------------- ****77;58;44(help:link)TypeName Function; VarType Function[Runtime] TypeName functie; VarType functie[Runtime] ****78;39;98(text:p)Returns a string (TypeName) or a numeric value (VarType) that contains information for a variable. Geeft een tekenreeks weer (TypeName) of een numerieke waarde (VarType) die informatie voor een variabele bevat. ------------------------------- ****80;71;6(text:span)Syntax Syntaxis ****80;89;1(): : ------------------------------- ****81;39;38(text:p)TypeName (Variable)VarType (Variable) TypeName (Variable)VarType (Variable) ****81;99;8(keyword)TypeName TypeName ------------------------------- ****82;71;12(text:span)Return value Resultaatwaarde ****82;95;1(): : ------------------------------- ****83;39;15(text:p)String; Integer String; Integer ------------------------------- ****84;71;9(text:span)Parameter Parameter ****84;92;1(): : ------------------------------- ****85;39;90(text:p)Variable: The variable for which to determine the type. The following values are possible: Variabele: De variabele waarvan het type moet worden bepaald. De volgende waarden zijn mogelijk: ------------------------------- ****91;45;8(text:p)key word sleutelwoord ------------------------------- ****94;45;7(text:p)VarType VarType ------------------------------- ****97;45;13(text:p)Variable type Variabele type ------------------------------- ****103;44;7(text:p)Boolean Boolean ------------------------------- ****106;44;2(text:p)11 11 ------------------------------- ****109;44;16(text:p)Boolean variable Boolean variabele ------------------------------- ****114;44;4(text:p)Date Date ------------------------------- ****117;44;1(text:p)7 7 ------------------------------- ****120;44;13(text:p)Date variable Datum variabele ------------------------------- ****125;44;6(text:p)Double Double ------------------------------- ****128;44;1(text:p)5 5 ------------------------------- ****131;44;30(text:p)Double floating point variable Double zwevend punt variabele ------------------------------- ****136;44;7(text:p)Integer Integer ------------------------------- ****139;44;1(text:p)2 2 ------------------------------- ****142;44;16(text:p)Integer variable Integer-variabele ------------------------------- ****147;44;4(text:p)Long Long ------------------------------- ****150;44;1(text:p)3 3 ------------------------------- ****153;44;21(text:p)Long integer variable Long Integer-variabele ------------------------------- ****158;44;6(text:p)Object Object ------------------------------- ****161;44;1(text:p)9 9 ------------------------------- ****164;44;15(text:p)Object variable Object variabele ------------------------------- ****169;44;6(text:p)Single Single ------------------------------- ****172;44;1(text:p)4 4 ------------------------------- ****175;44;30(text:p)Single floating-point variable Single verplaatsende-komma variabele ------------------------------- ****180;44;6(text:p)String String ------------------------------- ****183;44;1(text:p)8 8 ------------------------------- ****186;44;15(text:p)String variable tekenreeks variabele ------------------------------- ****191;44;7(text:p)Variant Variant ------------------------------- ****194;44;2(text:p)12 12 ------------------------------- ****197;44;68(text:p)Variant variable (can contain all types specified by the definition) Variant variabele (kan alle types, gespecificeerd door de definitie, bevatten) ------------------------------- ****202;44;5(text:p)Empty Empty ------------------------------- ****205;44;1(text:p)0 0 ------------------------------- ****208;44;27(text:p)Variable is not initialized Variabele is niet geïnitialiseerd ------------------------------- ****213;44;4(text:p)Null Null ------------------------------- ****216;44;1(text:p)1 1 ------------------------------- ****219;44;13(text:p)No valid data Geen geldige gegevens ------------------------------- ****224;32;8(text:p)Example: Voorbeeld: ------------------------------- ****225;38;15(text:p)Sub ExampleType Sub VoorbeeldType ------------------------------- ****226;38;19(text:p)Dim iVar As Integer Dim iVar as Integer ------------------------------- ****227;38;18(text:p)Dim sVar As String Dim sVar as String ------------------------------- ****228;38;19(text:p)Dim siVar As Single Dim siVar As Single ------------------------------- ****229;38;18(text:p)Dim dVar As Double Dim dVar As Double ------------------------------- ****230;38;19(text:p)Dim bVar As Boolean Dim bVar As Boolean ------------------------------- ****231;38;16(text:p)Dim lVar As Long Dim lVar As Long ------------------------------- ****232;38;82(text:p)Msgbox TypeName(iVar) & " " & VarType(iVar) & Chr(13) &_ Msgbox TypeName(iVar) & " " & VarType(iVar) & Chr(13) &_ ------------------------------- ****233;38;75(text:p)TypeName(sVar) & " " & VarType(dVar) & Chr(13) &_ TypeName(sVar) & " " & VarType(dVar) & Chr(13) &_ ------------------------------- ****234;38;77(text:p)TypeName(siVar) & " " & VarType(siVar) & Chr(13) &_ TypeName(siVar) & " " & VarType(siVar) & Chr(13) &_ ------------------------------- ****235;38;75(text:p)TypeName(dVar) & " " & VarType(dVar) & Chr(13) &_ TypeName(dVar) & " " & VarType(dVar) & Chr(13) &_ ------------------------------- ****236;38;75(text:p)TypeName(bVar) & " " & VarType(bVar) & Chr(13) &_ TypeName(bVar) & " " & VarType(bVar) & Chr(13) &_ ------------------------------- ****237;38;77(text:p)TypeName(lVar) & " " & VarType(lVar),0,"Some types in TypeName(lVar) & " " & VarType(lVar),0,"Enkele typen in ****237;133;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****237;164;12() Basic" Basic" ------------------------------- ****238;38;7(text:p)end Sub end Sub ####Text\SBASIC\COMMON\03103700.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)Set statement[Runtime] Set argument[Runtime] ------------------------------- ****65;73;22(help:link)Set statement[Runtime] Set argument[Runtime] ------------------------------- ****66;39;53(text:p)Sets an object reference on a variable or a Property. Stelt een objectverwijzing in op een variabele of een Eigenschap. ------------------------------- ****67;71;6(text:span)Syntax Syntaxis ****67;89;1(): : ------------------------------- ****68;39;23(text:p)Set ObjectVar = Object Set ObjectVar = Object ****68;84;3(keyword)Set Set ------------------------------- ****69;71;9(text:span)Parameter Parameter ****69;92;1(): : ------------------------------- ****70;39;78(text:p)ObjectVar: a variable or a property, which should receive an object reference. ObjectVar: een variabele of een eigenschap, welke een objectverwijzing moet ontvangen. ------------------------------- ****71;39;45(text:p)Object: Object, to which the variable or the Object: Object, waarnaar de variabele of de ****71;93;22(text:p)property should refer. eigenschap moet verwijzen. ------------------------------- ****72;32;8(text:p)Example: Voorbeeld: ------------------------------- ****73;38;14(text:p)Sub ExampleSet Sub VoorbeeldSet ------------------------------- ****74;54;18(text:p)Dim oDoc As Object Dim oDoc As Object ------------------------------- ****75;54;23(text:p)Set oDoc = ActiveWindow Set oDoc = ActieveVenster ------------------------------- ****76;54;15(text:p)Print oDoc.Name print oDoc.Name ------------------------------- ****77;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03103800.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;29(subject)FindObject Function [Runtime] FindObject functie [Runtime] ------------------------------- ****61;80;29(help:link)FindObject Function [Runtime] FindObject functie [Runtime] ------------------------------- ****62;39;86(text:p)Enables objects to be addressed at run-time as a string parameter via the object name. Stelt objecten in staat om te worden geadresseerd in run-time als een tekenreeks-parameter via de objectnaam. ------------------------------- ****63;39;36(text:p)For instance, the following command: Bijvoorbeeld, het volgende commando: ------------------------------- ****64;39;23(text:p)MyObj.Prop1.Command = 5 MyObj.Prop1.Command = 5 ------------------------------- ****65;39;33(text:p)corresponds to the command block: komt overeen met het commandoblok: ------------------------------- ****66;39;20(text:p)Dim ObjVar as Object Dim ObjVar as Object ------------------------------- ****67;39;21(text:p)Dim ObjProp as Object Dim ObjProp as Object ------------------------------- ****68;39;37(text:p)ObjName As String = "MyObj" ObjName as String = "MyObj" ------------------------------- ****69;39;40(text:p)ObjVar = FindObject( ObjName As String ) ObjVar = FindObject( ObjName as String ) ------------------------------- ****70;39;38(text:p)PropName As String = "Prop1" PropName as String = "Prop1" ------------------------------- ****71;39;58(text:p)ObjProp = FindPropertyObject( ObjVar, PropName As String ) ObjProp = FindPropertyObject( ObjVar, PropName as String ) ------------------------------- ****72;39;19(text:p)ObjProp.Command = 5 ObjProp.Command = 5 ------------------------------- ****73;39;83(text:p)This allows names to be created dynamically at run-time, for example, you could use Dit staat toe dat namen dynamisch worden gemaakt tijdens run-time, bijvoorbeeld, u kon gebruiken ------------------------------- ****74;39;80(text:p)"TextEdit1" to TextEdit5" in a loop to create five control names. "TextEdit1" to TextEdit5" in een loop om vijf beheersnamen te creëren. ------------------------------- ****75;39;10(text:p)See also: Zie ook: ****75;96;18(help:link)FindPropertyObject FindPropertyObject ------------------------------- ****76;71;6(text:span)Syntax Syntaxis ****76;89;1(): : ------------------------------- ****77;39;32(text:p)FindObject( ObjName As String ) FindObject( ObjName as String ) ****77;93;10(keyword)FindObject FindObject ------------------------------- ****78;71;9(text:span)Parameter Parameter ****78;92;1(): : ------------------------------- ****79;39;82(text:p)ObjName: String that specifies the name of the object to be addressed at run-time. ObjName: tekenreeks die de naam van het object, dat moet worden geadresseerd tijdens run-time, specificeert. ####Text\SBASIC\COMMON\03103900.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;37(subject)FindPropertyObject Function [Runtime] FindPropertyObject functie [Runtime] ------------------------------- ****61;88;37(help:link)FindPropertyObject Function [Runtime] FindPropertyObject functie [Runtime] ------------------------------- ****62;39;88(text:p)Enables objects to be addressed at run-time as a string parameter using the object name. Stelt objecten in staat om te worden geadresseerd tijdens run-time als een tekenreeks-parameter met behulp van de objectnaam. ------------------------------- ****63;39;26(text:p)For instance, the command: Bijvoorbeeld, het commando: ------------------------------- ****64;39;23(text:p)MyObj.Prop1.Command = 5 MyObj.Prop1.Command = 5 ------------------------------- ****65;39;43(text:p)corresponds to the following command block: komt overeen met naar het volgende commandoblok: ------------------------------- ****66;39;20(text:p)Dim ObjVar as Object Dim ObjVar as Object ------------------------------- ****67;39;21(text:p)Dim ObjProp as Object Dim ObjProp as Object ------------------------------- ****68;39;37(text:p)ObjName As String = "MyObj" ObjName as String = "MyObj" ------------------------------- ****69;39;40(text:p)ObjVar = FindObject( ObjName As String ) ObjVar = FindObject( ObjName as String ) ------------------------------- ****70;39;38(text:p)PropName As String = "Prop1" PropName as String = "Prop1" ------------------------------- ****71;39;58(text:p)ObjProp = FindPropertyObject( ObjVar, PropName As String ) ObjProp = FindPropertyObject( ObjVar, PropName as String ) ------------------------------- ****72;39;19(text:p)ObjProp.Command = 5 ObjProp.Command = 5 ------------------------------- ****73;39;72(text:p)Names can be created dynamically at run-time, for example, you could use Namen kunnen dynamisch worden gemaakt tijdens run-time, bijvoorbeeld, u kon gebruiken ------------------------------- ****74;39;72(text:p)"TextEdit1" to TextEdit5" in a loop to create five names. "TextEdit1" naar TextEdit5" in een loop om vijf namen te creëren. ------------------------------- ****75;39;10(text:p)See also: Zie ook: ****75;88;10(help:link)FindObject FindObject ------------------------------- ****76;71;6(text:span)Syntax Syntaxis ****76;89;1(): : ------------------------------- ****77;39;49(text:p)FindPropertyObject( ObjVar, PropName As String ) FindPropertyObject( ObjVar, PropName as String ) ****77;110;18(keyword)FindPropertyObject FindPropertyObject ------------------------------- ****78;71;9(text:span)Parameter Parameter ****78;92;1(): : ------------------------------- ****79;39;62(text:p)ObjVar: Object variable to be defined dynamically at run-time. ObjVar: Object variabele om dynamisch tijdens run-time te definiëren. ------------------------------- ****80;39;81(text:p)PropName: String specifying the name of the property to be addressed at run-time. PropName: tekenreeks die de naam van de eigenschap die moet worden geadresseerd tijdens run-time specificeert. ####Text\SBASIC\COMMON\03104000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;28(subject)IsMissing function [Runtime] IsMissing functie [Runtime] ------------------------------- ****62;80;28(help:link)IsMissing function [Runtime] IsMissing functie [Runtime] ****63;40;57(text:p)Tests if a function is called with an optional parameter. Test of een functie wordt aangeroepen met een optionele parameter. ------------------------------- ****65;40;10(text:p)See also: Zie ook: ****65;72;8(help:link)Optional Optional ------------------------------- ****66;72;6(text:span)Syntax Syntaxis ****66;90;1(): : ------------------------------- ****67;40;26(text:p)IsMissing( ArgumentName ) IsMissing( ArgumentName ) ****67;88;9(keyword)IsMissing IsMissing ------------------------------- ****68;72;9(text:span)Parameter Parameter ****68;93;1(): : ------------------------------- ****69;40;47(text:p)ArgumentName: the name of an optional argument. ArgumentName: de naam van een optioneel argument. ------------------------------- ****70;40;94(text:p)IsMissing is true, if the function is called without the parameter with the name ArgumentName. IsMissing is waar als de functie wordt aangeroepen zonder de parameter met de naam ArgumentName. ------------------------------- ****71;40;9(text:p)See also Zie ook ****71;88;8(help:link)Examples Voorbeelden ****71;108;1(). . ####Text\SBASIC\COMMON\03104100.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;42(subject)Optional (in Function statement) [Runtime] Optional (in Function argument) [Runtime] ------------------------------- ****65;79;42(help:link)Optional (in Function statement) [Runtime] Optional (in Function argument) [Runtime] ****66;40;72(text:p)Defines parameters that are passed to a function as optional parameters. Definieert parameters die geldig zijn voor een functie als optionele parameters. ****66;128;81(text:p) All following arguments after the first optional parameter must be optional too. Alle volgende argumenten na de eerste optionele parameter moeten ook optioneel zijn. ------------------------------- ****68;40;10(text:p)See also: Zie ook: ****68;72;9(help:link)IsMissing IsMissing ------------------------------- ****69;72;6(text:span)Syntax Syntaxis ****69;90;1(): : ------------------------------- ****70;40;66(text:p)Function MyFunction(Text1 As String, Optional Arg2, Optional Arg3) Function MyFunction(Text1 as String, Optional Arg2, Optional Arg3) ****70;128;8(keyword)Optional Optional ------------------------------- ****71;40;25(text:p)can be called as follows: kan als volgt worden aangeroepen: ------------------------------- ****72;33;9(text:p)Examples: Voorbeelden: ------------------------------- ****73;40;60(text:p)Result = MyFunction("Here", 1, "There") Resultaat = MyFunction("Hier", 1, "Daar") ****73;109;32(text:p)' all arguments are passed. ' alle argumenten zijn geldig. ------------------------------- ****74;40;42(text:p)Result = MyFunction("Test", ,1) Resultaat = MyFunction("Test", ,1) ****74;91;34(text:p)' second argument is missing. ' tweede argument ontbreekt. ------------------------------- ****75;40;9(text:p)See also Zie ook ****75;88;8(help:link)Examples Voorbeelden ****75;108;1(). . ####Text\SBASIC\COMMON\03104200.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;24(subject)Array Function [Runtime] Array functie [Runtime] ------------------------------- ****66;59;24(help:link)Array Function [Runtime] Array functie [Runtime] ****67;40;43(text:p)Returns the type Variant with a data field. Geeft het type Variant weer met een gegevensveld. ------------------------------- ****69;72;6(text:span)Syntax Syntaxis ****69;90;1(): : ------------------------------- ****70;40;23(text:p)Array ( Argument list) Array ( Argumentlijst) ****70;85;5(keyword)Array Array ------------------------------- ****71;40;9(text:p)See also Zie ook ****71;71;8(help:link)DimArray DimArray ------------------------------- ****72;72;9(text:span)Parameter Parameter ****72;93;1(): : ------------------------------- ****73;40;66(text:p)Argument list: a list of any number of arguments, comma separated. Argumentlijst: een lijst van een willekeurig aantal argumenten, door komma's gescheiden. ------------------------------- ****74;33;8(text:p)Example: Voorbeeld: ------------------------------- ****75;39;16(text:p)Dim A As Variant Dim A as Variant ------------------------------- ****76;39;60(text:p)A = Array("Fred","Tom","Bill") A = Array("Fred","Tom","Bill") ------------------------------- ****77;39;11(text:p)Msgbox A(2) Msgbox A(2) ####Text\SBASIC\COMMON\03104300.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;27(subject)DimArray Function [Runtime] DimArray functie [Runtime] ------------------------------- ****66;59;27(help:link)DimArray Function [Runtime] DimArray functie [Runtime] ****67;40;24(text:p)Returns a Variant array. Geeft een Variant matrix weer. ------------------------------- ****69;72;6(text:span)Syntax Syntaxis ****69;90;1(): : ------------------------------- ****70;40;26(text:p)DimArray ( Argument list) DimArray ( Argumentlijst) ****70;88;8(keyword)DimArray DimArray ------------------------------- ****71;40;9(text:p)See also Zie ook ****71;71;5(help:link)Array Array ------------------------------- ****72;40;181(text:p)If no parameters are passed, an empty array is created (like Dim A(), the same as a sequence of length 0 in Uno). If parameters are given, a dimension is created for each parameter. Als er geen geldige parameters zijn, wordt een lege matrix gemaakt (zoals Dim A(), hetzelfde als een lengtereeks 0 in Uno). Als parameters worden opgegeven, wordt een dimensie gemaakt voor iedere parameter. ------------------------------- ****73;72;9(text:span)Parameter Parameter ****73;93;1(): : ------------------------------- ****74;40;66(text:p)Argument list: a list of any number of arguments, comma separated. Argumentlijst: een lijst van een willekeurig aantal argumenten, komma-gescheiden. ------------------------------- ****75;33;8(text:p)Example: Voorbeeld: ------------------------------- ****76;39;51(text:p)DimArray( 2, 2, 4 ) is the same as DIM a( 2, 2, 4 ) DimArray( 2, 2, 4 ) is hetzelfde als DIM a( 2, 2, 4 ) ####Text\SBASIC\COMMON\03104400.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;35(subject)HasUnoInterfaces Function [Runtime] HasUnoInterfaces functie [Runtime] ------------------------------- ****66;59;35(help:link)HasUnoInterfaces Function [Runtime] HasUnoInterfaces functie [Runtime] ****67;40;60(text:p)Tests if a Basic Uno object supports certain Uno interfaces. Test of een BASIC Uno object bepaalde Uno interfaces ondersteunt. ------------------------------- ****69;40;17(text:p)Returns true, if Geeft weer Waar, als ****69;89;3(text:span)all alle ****69;104;57() stated Uno interfaces are supported, else returns false. benoemde Uno interfaces worden ondersteund, anders wordt Onwaar weergegeven. ------------------------------- ****70;72;6(text:span)Syntax Syntaxis ****70;90;1(): : ------------------------------- ****71;40;76(text:p)HasUnoInterfaces( oTest, Uno-Interface-Name 1 [, Uno-Interface-Name 2, ...]) HasUnoInterfaces( oTest, Uno-Interface-Name 1 [, Uno-Interface-Name 2, ...]) ****71;138;16(keyword)HasUnoInterfaces HasUnoInterfaces ------------------------------- ****72;72;12(text:span)Return value Resultaatwaarde ****72;96;1(): : ------------------------------- ****73;40;4(text:p)Bool Bool ------------------------------- ****74;72;9(text:span)Parameter Parameter ****74;93;1(): : ------------------------------- ****75;40;42(text:p)oTest : the Basic Uno object to be tested. oTest : het BASIC Uno object dat moet worden getest. ------------------------------- ****76;40;48(text:p)Uno-Interface-Name: list of Uno interface names. Uno-Interface-Name: lijst van Uno-interfacenamen. ------------------------------- ****77;33;8(text:p)Example: Voorbeeld: ------------------------------- ****78;39;79(text:p)bHas = HasUnoInterfaces( oTest, "com.sun.star.beans.XIntrospection" ) bHas = HasUnoInterfaces( oTest, "com.sun.star.beans.XIntrospection" ) ####Text\SBASIC\COMMON\03104500.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;30(subject)IsUnoStruct Function [Runtime] IsUnoStruct functie [Runtime] ------------------------------- ****66;59;30(help:link)IsUnoStruct Function [Runtime] IsUnoStruct functie [Runtime] ****67;40;50(text:p)Returns true, if the given object is a Uno struct. Geeft weer Waar, als het gegeven object een Uno struct is. ------------------------------- ****69;72;6(text:span)Syntax Syntaxis ****69;90;1(): : ------------------------------- ****70;40;28(text:p)IsUnoStruct( Uno type name ) IsUnoStruct( Uno typenaam ) ****70;90;11(keyword)IsUnoStruct IsUnoStruct ------------------------------- ****71;72;12(text:span)Return value Resultaatwaarde ****71;96;1(): : ------------------------------- ****72;40;4(text:p)Bool Bool ------------------------------- ****73;72;9(text:span)Parameter Parameter ****73;93;1(): : ------------------------------- ****74;40;34(text:p)Uno type name: name of a Uno type. Uno typenaam: naam van een Unotype. ------------------------------- ****75;33;8(text:p)Example: Voorbeeld: ------------------------------- ****76;39;66(text:p)bIsStruct = IsUnoStruct( "com.sun.star.beans.Property" ) bIsStruct = IsUnoStruct( "com.sun.star.beans.Property" ) ####Text\SBASIC\COMMON\03104600.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;34(subject)EqualUnoObjects Function [Runtime] EqualUnoObjects functie [Runtime] ------------------------------- ****66;59;34(help:link)EqualUnoObjects Function [Runtime] EqualUnoObjects functie [Runtime] ****67;40;88(text:p)Returns true, if the two given Basic Uno objects represent the same Uno object instance. Geeft weer Waar, als de twee gegeven BASIC-Uno-objecten dezelfde Uno objectverzameling vertegenwoordigen. ------------------------------- ****69;72;6(text:span)Syntax Syntaxis ****69;90;1(): : ------------------------------- ****70;40;31(text:p)EqualUnoObjects( oObj1, oObj2 ) EqualUnoObjects( oObj1, oObj2 ) ****70;93;15(keyword)EqualUnoObjects EqualUnoObjects ------------------------------- ****71;72;12(text:span)Return value Resultaatwaarde ****71;96;1(): : ------------------------------- ****72;40;4(text:p)Bool Bool ------------------------------- ****73;33;8(text:p)Example: Voorbeeld: ------------------------------- ****74;39;38(text:p)// Copy of objects -> same instance // Kopiëren van objecten -> zelfde verzameling ------------------------------- ****75;39;81(text:p)oIntrospection = CreateUnoService( "com.sun.star.beans.Introspection" ) oIntrospection = CreateUnoService( "com.sun.star.beans.Introspection" ) ------------------------------- ****76;39;24(text:p)oIntro2 = oIntrospection oIntro2 = oIntrospection ------------------------------- ****77;39;48(text:p)print EqualUnoObjects( oIntrospection, oIntro2 ) print EqualUnoObjects( oIntrospection, oIntro2 ) ------------------------------- ****79;39;46(text:p)// Copy of structs as value -> new instance // Kopiëren van structs als waarde -> nieuweverzameling ------------------------------- ****80;39;46(text:p)Dim Struct1 as new com.sun.star.beans.Property Dim Struct1 as new com.sun.star.beans.Property ------------------------------- ****81;39;17(text:p)Struct2 = Struct1 Struct2 = Struct1 ------------------------------- ****82;39;41(text:p)print EqualUnoObjects( Struct1, Struct2 ) print EqualUnoObjects( Struct1, Struct2 ) ####Text\SBASIC\COMMON\03110000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;20(subject)Comparison Operators Vergelijkings-operatoren ------------------------------- ****56;58;20(help:link)Comparison Operators Vergelijkings-operatoren ****57;39;52(text:p)The various comparison operators are described here. De verschillende vergelijkings-operatoren zijn hier beschreven. ####Text\SBASIC\COMMON\03110100.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;60(subject)=, <, >, <=, >=, <> - Operatoren [Runtime] =, <, >, <=, >=, <> - Operatoren [Runtime] ------------------------------- ****66;58;60(help:link)=, <, >, <=, >=, <> - Operatoren [Runtime] =, <, >, <=, >=, <> - Operatoren [Runtime] ****67;39;170(text:p)Comparison operators are used to compare two expressions. The result is returned as a Boolean expression that determines whether the comparison is True (-1) or False (0). Vergelijkings-operatoren worden gebruikt om twee uitdrukkingen te vergelijken. Het resultaat wordt weergegeven als een Boolean-uitdrukking die bepaalt of de vergelijking Waar (-1) of Onwaar (0) is. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;69(text:p)Result = Expression1 { = | < | > | <= | >= } Expression2 Resultaat = Expressie1 { = | < | > | <= | >= } Expressie2 ****70;130;20(keyword)Comparison operators Vergelijkings-operatoren ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;156(text:p)Result : Boolean expression that specifies the result of the comparison. The result returned can only be (-1), if comparison is True, or (0) if it is False. Resultaat : Boolean-uitdrukking die het resultaat van de vergelijking specificeert. Het weergegeven resultaat kan alleen zijn (-1) als de vergelijking is Waar, of (0) als het Onwaar is. ------------------------------- ****73;39;71(text:p)Expression1, Expression2: Any numeric values or strings to be compared. Expressie1, Expressie2: Alle numerieke waarden of tekenreeksen die moeten worden vergeleken. ------------------------------- ****74;32;20(text:p)Comparison operators Vergelijkings-operatoren ------------------------------- ****75;39;12(text:p)= : Equal to = : Gelijk aan ------------------------------- ****76;39;16(text:p)< : Less than < : Minder dan ------------------------------- ****77;39;19(text:p)> : Greater than > : Groter dan ------------------------------- ****78;39;29(text:p)<= : Less than or equal to <= : Minder dan of gelijk aan ------------------------------- ****79;39;32(text:p)>= : Greater than or equal to >= : Groter dan of gelijk aan ------------------------------- ****80;39;23(text:p)<> : Not equal to <> : Niet gelijk aan ------------------------------- ****81;32;8(text:p)Example: Voorbeeld: ------------------------------- ****82;38;18(text:p)Sub ExampleUnequal Sub VoorbeeldUnequal ------------------------------- ****83;38;19(text:p)DIM sFile As String DIM sFile as String ------------------------------- ****84;38;68(text:p)DIM sRoot As String REM ' Root directory for file in and output DIM sRoot as String REM ' Rootmap voor bestand in en uitvoer ------------------------------- ****85;38;23(text:p)sRoot = "c:\" sRoot = "c:\" ------------------------------- ****86;38;24(text:p)sFile = Dir$( sRoot ,22) sFile = Dir$( sRoot ,22) ------------------------------- ****87;38;35(text:p)If sFile <> "" Then If sFile <> "" then ------------------------------- ****88;38;2(text:p)Do Do ------------------------------- ****89;38;12(text:p)Msgbox sFile Msgbox sFile ------------------------------- ****90;38;12(text:p)sFile = Dir$ sFile = Dir$ ------------------------------- ****91;38;31(text:p)Loop Until sFile = "" Loop until sFile = "" ------------------------------- ****92;38;6(text:p)End If End if ------------------------------- ****93;38;7(text:p)End sub end sub ####Text\SBASIC\COMMON\03120000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;7(subject)Strings Tekenreeksen (Strings) ------------------------------- ****58;58;7(help:link)Strings Tekenreeksen (Strings) ****59;39;90(text:p)Here you will find the functions and statements used for validating and returning strings. Hier vindt u de functies en argumenten gebruikt voor geldig maken en weergeven van tekenreeksen. ------------------------------- ****61;39;40(text:p)You can use strings to edit text within U kunt tekenreeksen gebruiken om tekst te bewerken binnen ****61;97;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****61;128;64() Basic programs via the functions and statements described here. BASIC programma's via de functies en argumenten hier beschreven. ####Text\SBASIC\COMMON\03120100.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;32(subject)ASCII/ANSI Conversion in Strings ASCII/ANSI Conversie naar tekenreeksen ------------------------------- ****56;58;32(help:link)ASCII/ANSI Conversion in Strings ASCII/ANSI Conversie naar tekenreeksen ****57;39;85(text:p)Here you will find all functions for converting strings to ASCII/ANSI and vice versa. Hier zult u alle functies vinden voor het omzetten van tekenreeksen naar ASCII/ANSI en weer terug. ####Text\SBASIC\COMMON\03120101.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;22(subject)Asc Function [Runtime] Asc functie [Runtime] ------------------------------- ****68;59;22(help:link)Asc Function [Runtime] Asc functie [Runtime] ****69;40;123(text:p)Returns the ASCII value (American Standard Code for Information Interchange) of the first character in a string expression. Geeft de ASCII waarde (American Standard Code voor Informatie Interchange) weer van het eerste teken in een tekenreeksuitdrukking. ------------------------------- ****71;72;6(text:span)Syntax Syntaxis ****71;90;1(): : ------------------------------- ****72;40;21(text:p)Asc (Text As String) Asc (Tekst As String) ****72;83;3(keyword)Asc Asc ------------------------------- ****73;72;12(text:span)Return value Resultaatwaarde ****73;96;1(): : ------------------------------- ****74;40;7(text:p)Integer Integer ------------------------------- ****75;72;9(text:span)Parameter Parameter ****75;93;1(): : ------------------------------- ****76;40;86(text:p)Text: Any valid string expression. Only the first character in the string is relevant. Tekst: Elke geldige tekenreeksuitdrukking. Alleen het eerste teken in de tekenreeks is relevant. ------------------------------- ****77;40;110(text:p)The Asc function is often used to replace keys with values; thus more or less representing the reverse of the De Asc-functie wordt vaak gebruikt om toetsen met waarden te vervangen; daarom meer of minder voorstellende het omgekeerde van de ****77;182;4(text:span)Chr$ Chr$ ****77;198;53() function. If a string is blank in the Asc function, functie. Als een tekenreeks leeg is in de Asc-functie, ****77;269;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****77;300;232() Basic reports a run-time error. In addition to printable 8 bit ASCII characters (Codes 32-255), the ASCII function can also be used to detect non-printable key codes in ASCII code. In addition 16 bit unicode characters are allowed. BASIC rapporteert een run-time fout. Aanvullend aan de afdrukbare 8 bit ASCII tekens (Codes 32-255), kan de ASCII functie ook worden gebruikt om niet-afdrukbare toetscodes in ASCII code te ontdekken. Daarbij zijn16 bit unicode tekens toegestaan. ------------------------------- ****78;33;8(text:p)Example: Voorbeeld: ------------------------------- ****79;39;14(text:p)Sub ExampleASC Sub VoorbeeldASC ------------------------------- ****80;39;39(text:p)Print ASC("A") REM returns 65 print ASC("A") REM Geeft weer: 65 ------------------------------- ****81;39;39(text:p)Print ASC("Z") REM returns 90 Print ASC("Z") REM Geeft weer: 90 ------------------------------- ****82;39;101(text:p)Print ASC("Las Vegas") REM returns 76, since only the first character is taken into account Print ASC("Leeuwarden") REM Geeft weer: 76, aangezien alleen met het eerste teken rekening wordt gehouden. ------------------------------- ****83;39;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03120102.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;22(subject)Chr Function [Runtime] Chr functie [Runtime] ------------------------------- ****68;59;22(help:link)Chr Function [Runtime] Chr functie [Runtime] ****69;40;68(text:p)Returns the character corresponding to the specified character code. Geeft het teken weer, overeenkomstig met de gespecificeerde tekencode. ------------------------------- ****71;72;6(text:span)Syntax Syntaxis ****71;90;1(): : ------------------------------- ****72;40;26(text:p)Chr(Expression As Integer) Chr(Expressie As Integer) ****72;88;3(keyword)Chr Chr ------------------------------- ****73;72;12(text:span)Return value Resultaatwaarde ****73;96;1(): : ------------------------------- ****74;40;6(text:p)String String ------------------------------- ****75;72;9(text:span)Parameter Parameter ****75;93;1(): : ------------------------------- ****76;40;103(text:p)Expression: Numeric variables representing a valid 8 bit ASCII value (0-255) or a 16 bit unicode value. Expressie: Numerieke variabelen voorstellende een geldige 8 bit ASCII waarde (0-255) of een 16 bit unicode waarde. ------------------------------- ****77;40;4(text:p)The De ****77;76;4(text:span)Chr$ Chr$ ****77;92;290() function is often used to send special control sequences to a printer or other output source. Another use can be, for example, to insert quotation marks in a string expression, which is otherwise problematic in a programming environment since the quote represents the start of a string in functie is vaak gebruiktom speciale beheersreeksen naar een printer of andere uitvoerbron te zenden. Een ander gebruik kan zijn, bijvoorbeeld, om aanhalingstekens in een tekenreeksuitdrukking in te voegen, wat anders problematisch is in een programmeeromgeving aangezien het aanhalingsteken het begin voorstelt van een tekenreeks in ****77;400;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****77;431;19() Basic source text. BASIC brontekst. ------------------------------- ****78;33;8(text:p)Example: Voorbeeld: ------------------------------- ****79;39;14(text:p)sub ExampleChr sub VoorbeeldChr ------------------------------- ****80;39;68(text:p)REM This example inserts an apostrophe (ASCII value 34) in a string. REM Dit voorbeeld voegt een apostrophe (ASCII waarde 34) in in een tekenreeks. ------------------------------- ****81;39;79(text:p)MsgBox "A "+ Chr$(34)+"short" + Chr$(34)+" trip." MsgBox "Een "+ Chr$(34)+"korte" + Chr$(34)+" trip." ------------------------------- ****82;39;68(text:p)REM The printout appears in the dialog as: A "short" trip. REM De afdruk verschijnt in het dialoogvenster als: Een "korte" trip. ------------------------------- ****83;39;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03120103.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)Str Function [Runtime] Str functie [Runtime] ------------------------------- ****66;58;22(help:link)Str Function [Runtime] Str functie [Runtime] ****67;39;42(text:p)Converts a numeric expression to a string. Converteert een numerieke uitdrukking naar een tekenreeks. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;17(text:p)Str (Expression) Str (Expressie) ****70;78;3(keyword)Str Str ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;6(text:p)String String ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;35(text:p)Expression: Any numeric expression. Expressie: Een willekeurige numerieke uitdrukking. ------------------------------- ****75;39;4(text:p)The De ****75;75;3(text:span)Str Str ****75;90;216() function converts the result of a calculation or numeric variables to a string. Negative numbers are preceded by a minus sign. Note, however, that positive numbers are preceded by a space (instead of the plus sign). functie converteert het resultaat van een berekening of numerieke variabelen naar een tekenreeks. Negatieve getallen worden voorafgegaan door een minteken. Merk op, echter, dat positieve getallen worden voorafgegaan door een spatie (in plaats van het plus-teken). ------------------------------- ****76;32;8(text:p)Example: Voorbeeld: ------------------------------- ****77;38;14(text:p)Sub ExampleStr Sub VoorbeeldStr ------------------------------- ****78;38;18(text:p)Dim iVar As Single Dim iVar As Single ------------------------------- ****79;38;18(text:p)Dim sVar As String Dim sVar as String ------------------------------- ****80;38;14(text:p)iVar = 123.123 iVar = 123.123 ------------------------------- ****81;38;23(text:p)sVar = LTrim(Str(iVar)) sVar = LTrim(Str(iVar)) ------------------------------- ****82;38;26(text:p)Msgbox sVar & chr(13) Msgbox sVar & chr(13) ****82;73;15(text:p)& Str(iVar) & Str(iVar) ------------------------------- ****83;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03120104.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)Val Function [Runtime] Val functie [Runtime] ------------------------------- ****66;58;22(help:link)Val Function [Runtime] Val functie [Runtime] ****67;39;42(text:p)Converts a string to a numeric espression. Converteert een tekenreeks naar een numerieke uitdrukking. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;21(text:p)Val (Text As String) Val (Tekst As String) ****70;82;3(keyword)Val Val ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;6(text:p)Double Double ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;38(text:p)Text: String that represents a number. Tekst: tekenreeks die een getal voorstelt. ------------------------------- ****75;39;121(text:p)Using the Val function, you can convert a string representing numbers to numeric expressions. This is the inverse of the Met gebruik van de Val-functie, u kunt een tekenreeks, getallen voorstellende, omzetten naar numerieke uitdrukkingen. Dit is de afgeleide van de ****75;192;3(text:span)Str Str ****75;207;171() function. If only part of the string contains numbers, only the first appropriate characters of the string are converted. If the string does not contain any numbers, the functie. Als alleen een deel van de tekenreeks getallen bevat, worden alleen de eerste toepasselijke tekens van de tekenreeks geconverteerd. Als de tekenreeks geen willekeurige getallen bevat, de ****75;410;3(text:span)Val Val ****75;425;30() function returns the value 0. functie geeft de waarde 0 weer. ------------------------------- ****76;32;8(text:p)Example: Voorbeeld: ------------------------------- ****77;38;14(text:p)Sub ExampleVal Sub VoorbeeldVal ------------------------------- ****78;38;31(text:p)msgbox Val("123.123") msgbox Val("123.123") ------------------------------- ****79;38;32(text:p)msgbox Val("A123.123") msgbox Val("A123.123") ------------------------------- ****80;38;7(text:p)end Sub end Sub ####Text\SBASIC\COMMON\03120105.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;24(subject)CByte Function [Runtime] Cbyte functie [Runtime] ------------------------------- ****62;59;24(help:link)CByte Function [Runtime] Cbyte functie [Runtime] ****63;40;59(text:p)Converts a string or a numeric expression to the type Byte. Converteert een tekenreeks of een numerieke uitdrukking naar het type Byte. ------------------------------- ****65;72;6(text:span)Syntax Syntaxis ****65;90;1(): : ------------------------------- ****66;40;20(text:p)Cbyte( expression ) Cbyte( expressie ) ****66;82;5(keyword)CByte CByte ------------------------------- ****67;72;12(text:span)Return value Resultaatwaarde ****67;96;1(): : ------------------------------- ****68;40;4(text:p)Byte Byte ------------------------------- ****69;72;9(text:span)Parameter Parameter ****69;93;1(): : ------------------------------- ****70;40;46(text:p)Expression : a string or a numeric expression. Expressie : een tekenreeks of een numerieke uitdrukking. ####Text\SBASIC\COMMON\03120200.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;18(subject)Repeating Contents Herhalende inhoud ------------------------------- ****56;58;18(help:link)Repeating Contents Herhalende inhoud ****57;39;59(text:p)The following functions are used to repeat string contents. de volgende functies worden gebruikt om tekenreeksinhoud te herhalen. ####Text\SBASIC\COMMON\03120201.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;24(subject)Space Function [Runtime] Space functie [Runtime] ------------------------------- ****66;58;24(help:link)Space Function [Runtime] Space functie [Runtime] ****67;39;63(text:p)Returns a string that consists of a specified amount of spaces. Geeft een tekenreeks weer die bestaat uit een gespecificeerde hoeveelheid spaties. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;21(text:p)Space (n As Integer) Space (n As Integer) ****70;82;5(keyword)Space Space ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;6(text:p)String String ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;70(text:p)n: Numeric expression that defines the number of spaces in the string. n: Numerieke uitdrukking die het aantal spaties in de tekenreeks definieert . ------------------------------- ****75;32;8(text:p)Example: Voorbeeld: ------------------------------- ****76;38;16(text:p)Sub ExampleSpace Sub VoorbeeldSpace ------------------------------- ****77;38;34(text:p)Dim sText As String,sOut As String Dim sTekst as String,sOut as String ------------------------------- ****78;38;19(text:p)DIm iLen As Integer DIm iLen as Integer ------------------------------- ****79;38;9(text:p)iLen = 10 iLen = 10 ------------------------------- ****80;38;29(text:p)sText = "Las Vegas" sTekst = "Leeuwarden" ------------------------------- ****81;38;5(text:p)sOut sOut ****81;52;32(text:p)= sText & Space(iLen) & = sTekst & Space(iLen) & ****81;93;26(text:p)sText & Chr(13) &_ sTekst & Chr(13) &_ ------------------------------- ****82;38;32(text:p)sText & Space(iLen*2) & sTekst & Space(iLen*2) & ****82;79;26(text:p)sText & Chr(13) &_ sTekst & Chr(13) &_ ------------------------------- ****83;38;32(text:p)sText & Space(iLen*4) & sTekst & Space(iLen*4) & ****83;79;19(text:p)sText & Chr(13) sTekst & Chr(13) ------------------------------- ****84;38;31(text:p)msgBox sOut,0,"Info:" msgBox sOut,0,"Info:" ------------------------------- ****85;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03120202.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;25(subject)String Function [Runtime] String functie [Runtime] ------------------------------- ****66;58;25(help:link)String Function [Runtime] String functie [Runtime] ****67;39;124(text:p)Creates a string according to the specified character, or the first character of a string expression passed in the function. Creëert een tekenreeks volgens het gespecificeerde teken of het eerste teken van een tekenreeks uitdrukking ingesteld in de functie. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;69(text:p)String (n As Integer, {expression As Integer | character As String}) String (n as Integer, {expressie as Integer | teken As String}) ****70;130;6(keyword)String String ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;6(text:p)String String ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;82(text:p)n: Numeric expression indicating the number of characters to return in the string. n: Numerieke uitdrukking die het aantal tekens dat moet worden weergegeven in de tekenreeks aangeeft. ------------------------------- ****75;39;77(text:p)Expression: Numeric expression that defines the ASCII code for the character. Expressie: Numerieke uitdrukking die de ASCII-code voor het teken definieert. ------------------------------- ****76;39;126(text:p)Character: Any single character used to build the return string, or any string of which only the first character will be used. Teken: Elk enkel teken gebruikt om de weer te geven tekenreeks op te bouwen, of een willekeurige tekenreeks waarvan alleen het eerste teken zal worden gebruikt. ------------------------------- ****77;32;8(text:p)Example: Voorbeeld: ------------------------------- ****78;38;17(text:p)Sub ExampleString Sub VoorbeeldString ------------------------------- ****79;38;19(text:p)Dim sText as String Dim sTekst as String ------------------------------- ****81;38;32(text:p)sText = String(10,"A") sTekst = String(10,"A") ------------------------------- ****82;38;12(text:p)Msgbox sText Msgbox sTekst ------------------------------- ****84;38;21(text:p)sText = String(10,65) sTekst = String(10,65) ------------------------------- ****85;38;12(text:p)Msgbox sText Msgbox sTekst ------------------------------- ****87;38;34(text:p)sText = String(10,"XYZ") sTekst = String(10,"XYZ") ------------------------------- ****88;38;12(text:p)Msgbox sText Msgbox sTekst ------------------------------- ****90;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03120300.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;23(subject)Editing String Contents Bewerken tekenreeksinhoud ------------------------------- ****56;58;23(help:link)Editing String Contents Bewerken tekenreeksinhoud ****57;39;86(text:p)The following functions are used for editing, formatting and aligning string contents. de volgende functies worden gebruikt om tekenreeksinhoud te bewerken, op te maken en uit te lijnen. ####Text\SBASIC\COMMON\03120301.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;25(subject)Format Function [Runtime] Format functie [Runtime] ------------------------------- ****84;58;25(help:link)Format Function [Runtime] Format functie [Runtime] ****85;39;72(text:p)Converts a number to a string and formats it according to a format code. Converteert een getal naar een tekenreeks en maakt het op volgens een opmaakcode. ------------------------------- ****96;45;114(text:p)If the number is defined as a String, no type conversion will be executed, and the result will be an empty string. Als het getal is gedefinieerd als een tekenreeks, zal geen typeomzetting worden uitgevoerd en het resultaat zal een lege tekenreeks zijn. ------------------------------- ****102;71;6(text:span)Syntax Syntaxis ****102;89;1(): : ------------------------------- ****103;39;37(text:p)Format (Number [, Format As String]) Format (Number [, Format As String]) ****103;98;6(keyword)Format Format ------------------------------- ****104;71;12(text:span)Return value Resultaatwaarde ****104;95;1(): : ------------------------------- ****105;39;6(text:p)String String ------------------------------- ****106;71;9(text:span)Parameter Parameter ****106;92;1(): : ------------------------------- ****107;39;65(text:p)Number: Numeric expression to be converted to a formatted string. Getal: Numerieke uitdrukking die moet worden geconverteerd naar een opgemaakte tekenreeks. ------------------------------- ****108;39;65(text:p)Format: String that specifies the format code for the number. If Opmaak: tekenreeks die de opmaakcode voor het getal specificeert. Als ****108;136;6(text:span)Format Format ****108;154;48() is omitted, the Format function works like the is weggelaten, werkt de Format-functie als de ****108;234;3(text:span)Str Str ****108;249;10() function. functie. ------------------------------- ****109;39;29(text:p)The following list shows the De volgende lijst toont de ****109;100;6(text:span)format opmaak ****109;118;43() codes you can use for formatting a number: codes die u kunt gebruike voor de opmaak van een getal: ------------------------------- ****110;39;7(text:p)0 : If 0 : Als ****110;78;6(text:span)Number Getal ****110;96;107() has a digit at the position of the 0 in the format code, the digit is displayed; otherwise a zero appears. een cijfer heeft op de positie van de 0 in de opmaakcode, wordt het cijfer getoond; anders verschijnt een nul. ------------------------------- ****111;39;7(text:p)If the Als de ****111;78;6(text:span)Number Getal ****111;96;317() expression has fewer digits than the number of zeros in the format code, (on either side of the decimal), leading or trailing zeros are displayed. If the number has more digits to the left of the decimal separator than the amount of zeros in the format code, the additional digits are displayed without modification. uitdrukking minder cijfers heeft dan het aantal nullen in de opmaakcode, (aan welke kant van de decimaal dan ook), worden voorloopnullen getoond. Als het getal meer cijfers aan de linkerkant van het decimale scheidingsteken heeft dan de hoeveelheid nullen in de opmaakcode, worden de aanvullend cijfers getoond zonder wijziging. ------------------------------- ****112;39;71(text:p)Decimal places of the number are rounded to the number of zeros in the Decimale plaatsen van het getal worden afgerond naar het aantal nullen in de ****112;142;6(text:span)Format Opmaak ****112;160;38() code following the decimal separator. code volgend op het decimale scheidingsteken. ------------------------------- ****113;39;75(text:p)# : If Number contains a digit at the position of the # placeholder in the # : Als Getal een cijfer bevat op de positie van het # symbool in de ****113;146;6(text:span)Format Opmaak ****113;164;79() code, the digit is displayed; otherwise nothing is displayed at this position. code, wordt het cijfer getoond; anders wordt niets getoond op deze positie. ------------------------------- ****114;39;217(text:p)This symbol works like the 0, except that leading or trailing zeroes are not displayed if there are more # characters in the format code than digits in the number. Only the relevant digits of the number are displayed. Dit symbool werkt als de 0, behalve dat voorloopnullen niet worden getoond als er meer # tekens in de opmaakcode zijn dan cijfers in het getal. Alleen de relevante cijfers van het getal worden getoond. ------------------------------- ****115;39;115(text:p). : The decimal placeholder determines the number of decimal places to the left and right of the decimal separator. . : Het decimaal-symbool bepaalt het aantal decimale posities aan de linker- en rechterkant van het decimale scheidingsteken. ------------------------------- ****116;39;266(text:p)If the format code contains only # placeholders to the left of this symbol, numbers less than 1 begin with a decimal separator. To always display a leading zero with fractional numbers, use 0 as a placeholder for the first digit to the left of the decimal separator. Als de opmaakcode alleen # symbolen aan de linkerkant van dit speciale teken bevat , beginnen getallen kleiner dan 1 met een decimaal scheidingsteken. Om altijd een voorloopnul bij breuk-getallen weer te geven, gebruik 0 als een plaatsvervanger voor het eerste cijfer aan de linkerkant van het decimale scheidingsteken. ------------------------------- ****117;39;122(text:p)% : The number is multiplied by 100. The percent sign (%) is inserted at the position where it appears in the format code. % : Het getal wordt vermenigvuldigd met 100. Het procent teken (%) is ingevoegd op de positie waar het in de opmaakcode verschijnt. ------------------------------- ****118;39;373(text:p)E- E+ e- e+ : If the format code contains at least one digit placeholder (0 or #) to the right of the symbol E-, E+, e-, or e+, the number is formatted in the scientific or exponential format. The letter E or e is inserted between the number and the exponent. The number of placeholders for digits to the right of the symbol determines the number of digits in the exponent. E- E+ e- e+ : Als de opmaakcode tenminste één cijfer symbool (0 of #) rechts van het speciale teken E-, E+, e-, of e+ bevat, wordt het getal opgemaakt in de wetenschappelijke of exponentiele opmaak. De letter E of e wordt ingevoegd tussen het getal en de exponent. Het aantal symbolen voor cijfers rechts van het speciale teken bepaalt het aantal cijfers in de exponent. ------------------------------- ****119;39;194(text:p)If the exponent is negative, a minus sign is displayed directly before an exponent with E-, E+, e-, e+. If the exponent is positive, a plus sign is only displayed before exponents with E+ or e+. Als de exponent negatief is, wordt een minteken getoond vlak voor een exponent met E-, E+, e-, e+. Als de exponent positief is, wordt een plusteken slechts getoond vóór exponenten met E+ of e+. ------------------------------- ****120;39;135(text:p), : The comma is a placeholder for the thousands separator. It separates thousands from hundreds in a number with at least four digits. , : De komma is een symbool voor het scheidingsteken voor duizendtallen. Het scheidt duizenden van honderden in een getal met tenminste vier cijfers. ------------------------------- ****121;39;123(text:p)The thousands delimiter is displayed if the format code contains the placeholder surrounded by digit placeholders (0 or #). Het duizendtallen begrenzingsteken wordt getoond als de opmaakcode het symbool omgeven door cijfer symbolen (0 of #) bevat . ------------------------------- ****122;39;144(text:p)- + $ ( ) space : A plus (+), minus (-), dollar ($), space, or brackets entered directly in the format code is displayed as a literal character. - + $ ( ) spatie : Een plus (+), min (-), dollar ($), spatie, of haakjes ingevoerd direct in de opmaakcode worden getoond als een letterlijk teken. ------------------------------- ****123;39;144(text:p)To display characters other than the ones listed here, you must precede it by a backslash (\), or enclose it in quotation marks (" "). Om andere tekens, dan die welke hier opgesomd werden, weer te geven, moet u het laten voorafgaan door een schuine streep achterover (\), of het tussen aanhalingstekens plaatsen (" "). ------------------------------- ****124;39;65(text:p)\ : The backslash displays the next character in the format code. \ : De schuine streep achterover geeft het volgende teken in de opmaakcode weer. ------------------------------- ****125;39;229(text:p)Characters in the format code that have a special meaning can only be displayed as literal characters if preceded by a backslash. The backslash itself is not displayed, unless you enter a double backslash (\\) in the format code. Tekens in de opmaakcode die een speciale betekenis hebben kunnen alleen worden getoond als letterlijke tekens als zij worden voorafgegaan door een schuine streep achterover. De schuine streep achterover zelf wordt niet getoond, tenzij u een dubbele schuine streep achterover (\\) in de opmaakcode intoetst. ------------------------------- ****126;39;323(text:p)Characters that must be preceded by a backslash in the format code in order to be displayed as literal characters are the date- and time-formatting characters (a, c, d, h, m, n, p, q, s, t, w, y, /, :), numeric-formatting characters (#, 0, %, E, e, comma, period) and string-formatting characters (@, &, <, >, !). Tekens die moeten worden voorafgegaan door een schuine streep achterover in de opmaakcode om te worden getoond als letterlijke tekens zijn de date- en time-formaat tekens (a, c, d, h, m, n, p, q, s, t, w, y, /, :), numeriek-formaat tekens (#, 0, %, E, e, komma, punt) en tekenreeks-formaat tekens (@, &, <, >, !). ------------------------------- ****127;39;166(text:p)The use of the period as a thousands and decimal separator is dependent on the regional setting. The actual character displayed as a decimal separator depends on the Het gebruik van de punt als een duizendtallen en decimaal scheidingsteken is afhankelijk van de regionale instelling. Het huidig teken getoond als een decimaal scheidingsteken hangt af van het ****127;214;114(text:p)number format in your system settings. The examples shown here assume that the regional setting is "US". getalformaat in uw systeeminstellingen. De hier getoonde voorbeelden gaan er van uit dat de regionale instelling is "US". ------------------------------- ****128;39;187(text:p)The following predefined number formats can also be used. With the exception of "General Number", all format codes return the number as a decimal number with two decimal places. De volgende voorgedefinieerde getalnotaties kan ook worden gebruikt. Met uitzondering van "Algemeen Getal", geven alle opmaakcodes het getal als een decimaal getal met twee decimale posities weer. ------------------------------- ****129;39;90(text:p)If you use predefined formats, the name of the format must be enclosed in quotation marks. Als u voorgedefinieerde opmaak gebruikt, moet de naam van de opmaak zijn gevat in aanhalingstekens. ------------------------------- ****130;32;17(text:p)Predefined format Voorgedefinieerde opmaak ------------------------------- ****131;39;50(text:p)General Number : Numbers are displayed as entered. Algemeen Getal : Getallen worden getoond zoals ingevoerd. ------------------------------- ****132;39;104(text:p)Currency : A dollar sign is placed in front of the number; negative numbers are enclosed in parentheses. Valuta : Een dollar teken wordt geplaatst vóór het getal; negatieve getallen worden gevat in ronde haakjes. ------------------------------- ****133;39;74(text:p)Fixed : At least one digit is displayed in front of the decimal separator. Vast : Tenminste één cijfer wordt getoond vóór het decimale scheidingsteken. ------------------------------- ****134;39;55(text:p)Standard : Displays numbers with a thousands separator. Standaard : Toont getallen met een scheidingsteken voor duizendtallen. ------------------------------- ****135;39;87(text:p)Percent : The number is multiplied by 100 and a percent sign is appended to the number. Procent : Het getal is vermenigvuldigd met 100 en een procentteken is aan het getalgehangen. ------------------------------- ****136;39;77(text:p)Scientific : Displays numbers in scientific format (e.g., 1,00E+03 for 1000). Wetenschappelijk: Toont getallen in wetenschappelijke opmaak (bijv., 1,00E+03 voor 1000). ------------------------------- ****137;39;256(text:p)A format code can be divided into three sections, separated by semicolons. The first part defines the format for positive values, the second part for negative values, and the third part for zero. If only one format code is given, it applies to all numbers. Een opmaakcode kan zijn verdeeld in drie bereiken, gescheiden door puntkomma's. Het eerste deel definieert de opmaak voor positieve waarden, het tweede deel voor negatieve waarden en het derde deel voor nul. Als slechts één opmaak code is gegeven, heeft het betrekking op alle getallen. ------------------------------- ****138;32;8(text:p)Example: Voorbeeld: ------------------------------- ****139;38;17(text:p)Sub ExampleFormat Sub VoorbeeldFormat ------------------------------- ****140;38;59(text:p)MsgBox Format(6328.2, "##,##0.00") REM = 6,328.20 MsgBox Format(6328.2, "##,##0.00") REM = 6.328,20 ------------------------------- ****141;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03120302.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;24(subject)LCase Function [Runtime] Lcase functie [Runtime] ------------------------------- ****66;58;24(help:link)LCase Function [Runtime] Lcase functie [Runtime] ****67;39;167(text:p)Converts all letters in a string to lowercase. Only uppercase letters within the string are converted; all lowercase letters and nonletter characters remain unchanged. Converteert alle letters in een tekenreeks naar kleine letters. Alleen Hoofdletters binnen de tekenreeks worden geconverteerd; alle kleine letters en niet-letter tekens blijven onveranderd. ------------------------------- ****69;39;10(text:p)See also: Zie ook: ****69;83;5(help:link)UCase UCase ****69;100;9() Function Function ------------------------------- ****70;71;6(text:span)Syntax Syntaxis ****70;89;1(): : ------------------------------- ****71;39;23(text:p)LCase (Text As String) LCase (Tekst as String) ****71;84;5(keyword)LCase LCase ------------------------------- ****72;71;12(text:span)Return value Resultaatwaarde ****72;95;1(): : ------------------------------- ****73;39;6(text:p)String string ------------------------------- ****74;71;9(text:span)Parameter Parameter ****74;92;1(): : ------------------------------- ****75;39;44(text:p)Text: Any string expression to be converted. Tekst: Elke tekenreeks-uitdrukking die moet worden geconverteerd. ------------------------------- ****76;32;8(text:p)Example: Voorbeeld: ------------------------------- ****77;38;17(text:p)Sub ExampleLUCase Sub VoorbeeldLUCase ------------------------------- ****78;38;18(text:p)Dim sVar As String Dim sVar as String ------------------------------- ****79;38;28(text:p)sVar = "Las Vegas" sVar = "Lage Zwaluwe" ------------------------------- ****80;38;51(text:p)Print LCase(sVar) REM Returns "Las Vegas" print LCase(sVar) REM Geeft weer: "Lage Zwaluwe" ------------------------------- ****81;38;51(text:p)Print UCase(sVar) REM Returns "LAS VEGAS" print UCase(sVar) REM Geeft weer: "LAGE ZWALUWE" ------------------------------- ****82;38;7(text:p)end Sub end Sub ####Text\SBASIC\COMMON\03120303.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;23(subject)Left Function [Runtime] Left functie [Runtime] ------------------------------- ****66;58;23(help:link)Left Function [Runtime] Left functie [Runtime] ****67;39;57(text:p)Returns the leftmost n characters of a string expression. Geeft de meest linkse n tekens van een tekenreeks uitdrukking. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;36(text:p)Left (Text As String, n As Integer) Left (Tekst as String, n as Integer) ****70;97;4(keyword)Left Left ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;6(text:p)String String ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;73(text:p)Text: Any string expression from which to return the leftmost characters. Tekst: Elke tekenreeks-uitdrukking waarvan de meest linkse tekens moeten worden weergegeven. ------------------------------- ****75;39;76(text:p)n: Integer expression that specifies the number of characters to return. If n: Integer-uitdrukking die het aantal tekens dat moet worden weergegeven specificeert. Als ****75;147;1(text:span)n n ****75;160;38() = 0 a zero-length string is returned. = 0 een nul-lengte tekenreeks wordt weergegeven. ------------------------------- ****76;39;92(text:p)The following example converts a date in the format (YYYY.MM.DD) to the format (MM/DD/YYYY). Het volgende voorbeeld converteert een datum in de opmaak (YYYY-MM-DD) naar de opmaak (MM/DD/YYYY). ------------------------------- ****77;32;8(text:p)Example: Voorbeeld: ------------------------------- ****78;38;17(text:p)Sub ExampleUSDate Sub VoorbeeldUSDate ------------------------------- ****79;38;20(text:p)Dim sInput As String Dim sInput as String ------------------------------- ****80;38;22(text:p)Dim sUS_date As String Dim sUS_date as String ------------------------------- ****81;38;101(text:p)sInput = InputBox("Please input a date in the international format 'YYYY-MM-DD'") sInput = InputBox("Voer alstublieft een datum in met de internationale opmaak 'YYYY-MM-DD'") ------------------------------- ****82;38;28(text:p)sUS_date = Mid(sInput, 6, 2) sUS_date = Mid(sInput, 6, 2) ------------------------------- ****83;38;39(text:p)sUS_date = sUS_date & "/" sUS_date = sUS_date & "/" ------------------------------- ****84;38;26(text:p)sUS_date = sUS_date & sUS_date = sUS_date & ****84;73;16(text:p)Right(sInput, 2) Right(sInput, 2) ------------------------------- ****85;38;39(text:p)sUS_date = sUS_date & "/" sUS_date = sUS_date & "/" ------------------------------- ****86;38;41(text:p)sUS_date = sUS_date & Left(sInput, 4) sUS_date = sUS_date & Left(sInput, 4) ------------------------------- ****87;38;15(text:p)MsgBox sUS_date MsgBox sUS_date ------------------------------- ****88;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03120304.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;24(subject)LSet statement [Runtime] LSet argument [Runtime] ------------------------------- ****66;58;24(help:link)LSet statement [Runtime] LSet argument [Runtime] ****67;39;147(text:p)Aligns a string to the left of a string variable, or copies a variable of a user-defined type to another variable of a different user-defined type. Lijnt een tekenreeks uit aan de linkerkant van een tekenreeksvariabele of kopieert een variabele van een door de gebruiker gedefinieerd type naar een andere variabele naar een ander door de gebruiker gedefinieerd type. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;46(text:p)LSet Var As String = Text or LSet Var1 = Var2 LSet Var as String = Tekst of LSet Var1 = Var2 ****70;107;4(keyword)LSet LSet ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;72(text:p)Var: Any String variable, in which the string to be aligned to the left. Var: Elke tekenreeks-variabele, waarin de tekenreeks die moet worden uitgelijnd aan de linkerkant. ------------------------------- ****73;39;62(text:p)Text: String to be aligned to the left of the string variable. Tekst: tekenreeks die moet worden uitgelijnd aan de linkerkant van de tekenreeks-variabele. ------------------------------- ****74;39;61(text:p)Var1: Name of the user-defined type variable being copied to. Var1: Naam van het door de gebruiker gedefinieerde type variabele waarnaar moet worden gekopieerd. ------------------------------- ****75;39;63(text:p)Var2: Name of the user-defined type variable being copied from. Var2: Naam van het door de gebruiker gedefinieerde type variabele dat moet worden gekopieerd. ------------------------------- ****76;39;51(text:p)If the string is shorter than the string variable, Als de tekenreeks korter is dan de tekenreeks-variabele, ****76;122;4(text:span)LSet LSet ****76;138;263() left-aligns the string within the string variable. Any remaining positions in the string variable are replaced by spaces. If the string is longer than the string variable, only the leftmost characters up to the length of the string variable are copied. With the lijnt de tekenreeks binnen de tekenreeksvariabele naar links uit. Elke overblijvende positie in de tekenreeksvariabele worden vervangen door spaties. Als de tekenreeks langer is dan de tekenreeks-variabele, worden alleen de meest linker tekens tot de lengte van de tekenreeks-variabele gekopieerd. Met het ****76;433;4(text:span)LSet LSet ****76;449;96() statement, you can also copy a user-defined type variable to another variable of the same type. Argument kunt u ook een door de gebruiker gedefinieerd type variabele naar een andere variabele van hetzelfde soort kopiëren. ------------------------------- ****77;32;8(text:p)Example: Voorbeeld: ------------------------------- ****78;38;16(text:p)Sub ExampleRLSet Sub VoorbeeldRLSet ------------------------------- ****79;54;18(text:p)Dim sVar As String Dim sVar as String ------------------------------- ****80;54;19(text:p)Dim sExpr As String Dim sExpr as String ------------------------------- ****82;54;31(text:p)sVar = String(40,"*") sVar = String(40,"*") ------------------------------- ****83;54;23(text:p)sExpr = "SBX" sExpr = "SBX" ------------------------------- ****84;54;4(text:p)REM REM ****84;67;62(text:p)Align "SBX" within the 40-character reference string Lijnt "SBX" binnen de 40-teken referentietekenreeks rechts uit ------------------------------- ****85;38;4(text:p)REM REM ****85;51;29(text:p)Replace asterisks with spaces Vervang asterisks door spaties ------------------------------- ****86;54;17(text:p)RSet sVar = sExpr RSet sVar = sExpr ------------------------------- ****87;54;46(text:p)Print ">"; sVar; "<" print ">"; sVar; "<" ------------------------------- ****89;54;30(text:p)sVar = String(5,"*") sVar = String(5,"*") ------------------------------- ****90;54;29(text:p)sExpr = "123457896" sExpr = "123457896" ------------------------------- ****91;54;17(text:p)RSet sVar = sExpr RSet sVar = sExpr ------------------------------- ****92;54;46(text:p)Print ">"; sVar; "<" print ">"; sVar; "<" ------------------------------- ****94;54;31(text:p)sVar = String(40,"*") sVar = String(40,"*") ------------------------------- ****95;54;23(text:p)sExpr = "SBX" sExpr = "SBX" ------------------------------- ****96;54;71(text:p)REM Left-align "SBX" within the 40-character reference string REM Lijnt "SBX" binnen de 40-teken referentie-tekenreeks links uit ------------------------------- ****97;54;17(text:p)LSet sVar = sExpr LSet sVar = sExpr ------------------------------- ****98;54;46(text:p)Print ">"; sVar; "<" print ">"; sVar; "<" ------------------------------- ****100;54;30(text:p)sVar = String(5,"*") sVar = String(5,"*") ------------------------------- ****101;54;29(text:p)sExpr = "123456789" sExpr = "123456789" ------------------------------- ****102;54;17(text:p)LSet sVar = sExpr LSet sVar = sExpr ------------------------------- ****103;54;46(text:p)Print ">"; sVar; "<" print ">"; sVar; "<" ------------------------------- ****104;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03120305.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;24(subject)LTrim Function [Runtime] Ltrim functie [Runtime] ------------------------------- ****66;58;24(help:link)LTrim Function [Runtime] Ltrim functie [Runtime] ****67;39;50(text:p)Removes all leading spaces of a string expression. Verwijdert alle voorafgaande spaties uit een tekenreeksuitdrukking. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;23(text:p)LTrim (Text As String) LTrim (Tekst as String) ****70;84;5(keyword)LTrim LTrim ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;6(text:p)String String ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;28(text:p)Text: Any string expression. Tekst: Elke tekenreeks-uitdrukking. ------------------------------- ****75;39;67(text:p)Use this function to remove spaces in front of a string expression. Gebruik deze functie om spaties vóór een tekenreeks uitdrukking te verwijderen . ------------------------------- ****76;32;8(text:p)Example: Voorbeeld: ------------------------------- ****77;38;17(text:p)Sub ExampleSpaces Sub VoorbeeldSpaties ------------------------------- ****78;38;51(text:p)Dim sText2 As String,sText As String,sOut As String Dim sText2 as String,sText as String,sOut as String ------------------------------- ****79;38;16(text:p)sText2 = " sText2 = " ****79;74;20(text:p)<*Las Vegas*> <*Las Vegas*> ****79;114;6(text:p)" " ------------------------------- ****81;38;33(text:p)sOut = "'"+sText2 sOut = "'"+sText2 ****81;80;28(text:p)+"'"+ Chr(13) +"'"+ Chr(13) ------------------------------- ****82;38;22(text:p)sText = Ltrim(sText2) sText = Ltrim(sText2) ****82;80;38(text:p)REM sText = <*Las Vegas*> " REM sText = <*Las Vegas*> " ------------------------------- ****83;38;68(text:p)sOut = sOut + "'"+sText +"'" + Chr(13) sOut = sOut + "'"+sText +"'" + Chr(13) ------------------------------- ****84;38;22(text:p)sText = Rtrim(sText2) sText = Rtrim(sText2) ****84;80;45(text:p)REM sText = " <*Las Vegas*> " REM sText = " <*Las Vegas*> " ------------------------------- ****85;38;68(text:p)sOut = sOut +"'"+ sText +"'" + Chr(13) sOut = sOut +"'"+ sText +"'" + Chr(13) ------------------------------- ****86;38;21(text:p)sText = Trim(sText2) sText = Trim(sText2) ****86;68;45(text:p)REM sText = " <*Las Vegas*> " REM sText = " <*Las Vegas*> " ------------------------------- ****87;38;39(text:p)sOut = sOut +"'"+ sText sOut = sOut +"'"+ sText ****87;86;19(text:p)+"'" +"'" ------------------------------- ****88;38;11(text:p)MsgBox sOut MsgBox sOut ------------------------------- ****89;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03120306.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;37(subject)Mid Function, Mid statement [Runtime] Mid functie, Mid argument [Runtime] ------------------------------- ****66;58;37(help:link)Mid Function, Mid statement [Runtime] Mid functie, Mid argument [Runtime] ****67;39;54(text:p)Returns the specified portion of a string expression ( Geeft weer het gespecificeerde deel van een tekenreeks uitdrukking ( ****67;125;12(text:span)Mid function Mid functie ****67;149;69()), or replaces the portion of a string expression by another string ( ), of vervangt het deel van een tekenreeks uitdrukking door een andere tekenreeks ( ****67;250;13(text:span)Mid statement Mid argument ****67;275;2()). ). ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;139(text:p)Mid (Text As String, Start As Integer [, Length As Integer]) or Mid (Text As String, Start As Integer , Length As Integer, Text As String) Mid (Tekst as String, Start as Integer [, Lengte As Integer]) of Mid (Tekst as String, Start as Integer , Lengte as Integer, Tekst As Tekenreeks) ****70;200;3(keyword)Mid Mid ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;25(text:p)String (only by Function) String (alleen voor Functie) ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;43(text:p)Text: Any string expression to be modified. Tekst: Elke tekenreeks-uitdrukking die moet worden gewijzigd. ------------------------------- ****75;39;141(text:p)Start: Integer expression that indicates the character position within the string where the string portion to be replaced or returned begins. Start: Integer-uitdrukking die de tekenpositie binnen de tekenreeks, waar het tekenreeksdeel dat moet worden vervangen of tweergegeven begint, aangeeft. ------------------------------- ****76;39;92(text:p)Length: Integer expression that returns the number of characters to be replaced or returned. Lengte: Integer-getal dat het aantal tekens dat moet worden vervangen of weergegeven aangeeft. ------------------------------- ****77;39;31(text:p)If the Length parameter in the Als de Lengte-parameter in de ****77;102;12(text:span)Mid function Mid functie ****77;126;115() is omitted, all characters in the string expression from the start position to the end of the string are returned. wordt weggelaten, worden alle tekens in de tekenreeks-uitdrukking vanaf de beginpositie tot het einde van de tekenreeks weergegeven. ------------------------------- ****78;39;31(text:p)If the Length parameter in the Als de Lengte-parameter in het ****78;102;13(text:span)Mid statement Mid argument ****78;127;96() is less than the length of the text to be replaced, it will be reduced to the specified length. minder is dan de lengte van de tekst die moet worden vervangen, zal het worden verkleind naar de gespecificeerde lengte. ------------------------------- ****79;39;51(text:p)Text: The string to replace the string expression ( Tekst: De tekenreeks om de tekenreeks-uitdrukking te vervangen( ****79;122;13(text:span)Mid statement Mid argument ****79;147;2()). ). ------------------------------- ****80;32;8(text:p)Example: Voorbeeld: ------------------------------- ****81;38;17(text:p)Sub ExampleUSDate Sub VoorbeeldUSDate ------------------------------- ****82;38;20(text:p)Dim sInput As String Dim sInput as String ------------------------------- ****83;38;22(text:p)Dim sUS_date As String Dim sUS_date as String ------------------------------- ****84;38;101(text:p)sInput = InputBox("Please input a date in the international format 'YYYY-MM-DD'") sInput = InputBox("Voer alstublieft een datum in met de internationale opmaak 'YYYY-MM-DD'") ------------------------------- ****85;38;28(text:p)sUS_date = Mid(sInput, 6, 2) sUS_date = Mid(sInput, 6, 2) ------------------------------- ****86;38;39(text:p)sUS_date = sUS_date & "/" sUS_date = sUS_date & "/" ------------------------------- ****87;38;26(text:p)sUS_date = sUS_date & sUS_date = sUS_date & ****87;73;16(text:p)Right(sInput, 2) Right(sInput, 2) ------------------------------- ****88;38;39(text:p)sUS_date = sUS_date & "/" sUS_date = sUS_date & "/" ------------------------------- ****89;38;41(text:p)sUS_date = sUS_date & Left(sInput, 4) sUS_date = sUS_date & Left(sInput, 4) ------------------------------- ****90;38;15(text:p)MsgBox sUS_date MsgBox sUS_date ------------------------------- ****91;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03120307.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;24(subject)Right Function [Runtime] Right functie [Runtime] ------------------------------- ****66;58;24(help:link)Right Function [Runtime] Right functie [Runtime] ****67;39;70(text:p)Returns the rightmost "n" characters of a string expression. Geeft de meest rechtse "n" tekens van een tekenreeks-uitdrukking weer. ------------------------------- ****69;39;10(text:p)See also: Zie ook: ****69;82;13(help:link)Left Function Left functie ****69;107;1(). . ------------------------------- ****70;71;6(text:span)Syntax Syntaxis ****70;89;1(): : ------------------------------- ****71;39;37(text:p)Right (Text As String, n As Integer) Right (Tekst as String, n as Integer) ****71;98;5(keyword)Right Right ------------------------------- ****72;71;12(text:span)Return value Resultaatwaarde ****72;95;1(): : ------------------------------- ****73;39;6(text:p)String String ------------------------------- ****74;71;9(text:span)Parameter Parameter ****74;92;1(): : ------------------------------- ****75;39;74(text:p)Text: Any string expression from which to return the rightmost characters. Tekst: Elke tekenreeks-uitdrukking waarvan de meest rechtse tekens moeten worden weergegeven. ------------------------------- ****76;39;79(text:p)n: Integer expression that defines the number of characters to be returned. If n: Integer-uitdrukking die het aantal tekens die moeten worden weergegeven definieert. Als ****76;150;1(text:span)n n ****76;163;38() = 0 a zero-length string is returned. = 0 wordt een nul-lengte tekenreeks weergegeven. ------------------------------- ****77;39;108(text:p)The following example converts the given date in the format (YYYY-MM-DD) to the US date format (MM/DD/YYYY). Het volgende voorbeeld converteert de gegeven datum in de opmaak (YYYY-MM-DD) naar het VS datumformaat (MM/DD/YYYY). ------------------------------- ****78;32;8(text:p)Example: Voorbeeld: ------------------------------- ****79;38;17(text:p)Sub ExampleUSDate Sub VoorbeeldUSDate ------------------------------- ****80;38;20(text:p)Dim sInput As String Dim sInput as String ------------------------------- ****81;38;22(text:p)Dim sUS_date As String Dim sUS_date as String ------------------------------- ****82;38;101(text:p)sInput = InputBox("Please input a date in the international format 'YYYY-MM-DD'") sInput = InputBox("Voer alstublieft een datum in met de internationale opmaak 'YYYY-MM-DD'") ------------------------------- ****83;38;28(text:p)sUS_date = Mid(sInput, 6, 2) sUS_date = Mid(sInput, 6, 2) ------------------------------- ****84;38;39(text:p)sUS_date = sUS_date & "/" sUS_date = sUS_date & "/" ------------------------------- ****85;38;26(text:p)sUS_date = sUS_date & sUS_date = sUS_date & ****85;73;16(text:p)Right(sInput, 2) Right(sInput, 2) ------------------------------- ****86;38;39(text:p)sUS_date = sUS_date & "/" sUS_date = sUS_date & "/" ------------------------------- ****87;38;41(text:p)sUS_date = sUS_date & Left(sInput, 4) sUS_date = sUS_date & Left(sInput, 4) ------------------------------- ****88;38;15(text:p)MsgBox sUS_date MsgBox sUS_date ------------------------------- ****89;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03120308.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;24(subject)RSet statement [Runtime] RSet argument [Runtime] ------------------------------- ****66;58;24(help:link)RSet statement [Runtime] RSet argument [Runtime] ****67;39;100(text:p)Right-aligns a string within a string variable, or copies a user-defined variable type into another. Lijnt een tekenreeks binnen een tekenreeks-variabele rechts uit of kopieert een door de gebruiker gedefinieerd variabelentype in een ander. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;57(text:p)RSet Text As String = Text or RSet Variable1 = Variable2 RSet Tekst as String = Tekst of RSet Variable1 = Variable2 ****70;118;4(keyword)RSet RSet ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;26(text:p)Text: Any string variable. Tekst: Elke tekenreeks variabele. ------------------------------- ****73;39;60(text:p)Text: String to be right-aligned within the string variable. Tekst: tekenreeks die rechts moet worden uitgelijnd binnen de tekenreeks variabele. ------------------------------- ****74;39;69(text:p)Variable1: User-defined variable as a target for the copied variable. Variable1: gebruiker-gedefinieerde variabele als doel voor de gekopieerde variabele. ------------------------------- ****75;39;66(text:p)Variable2: User-defined variable to be copied to another variable. Variable2: gebruiker-gedefinieerde variabele die moet worden gekopieerd naar een andere variabele. ------------------------------- ****76;39;51(text:p)If the string is shorter than the string variable, Als de tekenreeks korter is dan de tekenreeks-variabele, ****76;122;4(text:span)RSet RSet ****76;138;326() aligns the string to the right within the string variable. Any remaining characters in the string variable are replaced with spaces. If the string is longer than the string variable, characters exceeding the length of the variable are truncated, and only the remaining characters are right-aligned within the string variable. lijnt de tekenreeks rechts uit binnen de tekenreeks-variabele. Elk overblijvend teken in de tekenreeksvariabele wordt vervangen door een spatie. Als de tekenreeks langer is dan de tekenreeksvariabele, worden tekens die de lengte van de variabele overschrijden afgebroken en alleen de overblijvende tekens worden rechts uitgelijnd binnen de tekenreeks-variabele. ------------------------------- ****77;39;4(text:p)The Het ****77;75;14(text:span)RSet statement RSet argument ****77;101;83() can also be used to assign variables of one user-defined type to those of another. kan ook worden gebruikt om variabelen van het ene door de gebruiker gedefinieerd type aan die van een ander type toe te kennen. ------------------------------- ****78;39;21(text:p)The example uses the Het voorbeeld gebruikt de ****78;92;4(text:span)RSet RSet ****78;108;5() and en ****78;145;4(text:span)LSet LSet ****78;161;63() statements to modify the left and right alignment of a string. argumenten om de linkse en rechtse uitlijning van een tekenreeks te veranderen. ------------------------------- ****79;32;8(text:p)Example: Voorbeeld: ------------------------------- ****80;38;16(text:p)Sub ExampleRLSet Sub VoorbeeldRLSet ------------------------------- ****81;54;18(text:p)Dim sVar as string Dim sVar as String ------------------------------- ****82;54;19(text:p)Dim sExpr as string Dim sExpr as String ------------------------------- ****84;54;31(text:p)sVar = String(40,"*") sVar = String(40,"*") ------------------------------- ****85;54;23(text:p)sExpr = "SBX" sExpr = "SBX" ------------------------------- ****86;54;4(text:p)REM REM ****86;67;52(text:p)Right-align "SBX" in a 40-character string Lijnt "SBX" rechts uit in een 40-teken tekenreeks ------------------------------- ****87;38;4(text:p)REM REM ****87;51;29(text:p)Replace asterisks with spaces Vervangt asterisks door spaties ------------------------------- ****88;54;17(text:p)RSet sVar = sExpr RSet sVar = sExpr ------------------------------- ****89;54;46(text:p)Print ">"; sVar; "<" print ">"; sVar; "<" ------------------------------- ****91;54;30(text:p)sVar = String(5,"*") sVar = String(5,"*") ------------------------------- ****92;54;29(text:p)sExpr = "123457896" sExpr = "123457896" ------------------------------- ****93;54;17(text:p)RSet sVar = sExpr RSet sVar = sExpr ------------------------------- ****94;54;46(text:p)Print ">"; sVar; "<" print ">"; sVar; "<" ------------------------------- ****96;54;31(text:p)sVar = String(40,"*") sVar = String(40,"*") ------------------------------- ****97;54;23(text:p)sExpr = "SBX" sExpr = "SBX" ------------------------------- ****98;54;55(text:p)REM Left-align "SBX" in a 40-character string REM Lijnt "SBX" links uit in een 40-teken tekenreeks ------------------------------- ****99;54;17(text:p)LSet sVar = sExpr LSet sVar = sExpr ------------------------------- ****100;54;46(text:p)Print ">"; sVar; "<" print ">"; sVar; "<" ------------------------------- ****102;54;30(text:p)sVar = String(5,"*") sVar = String(5,"*") ------------------------------- ****103;54;29(text:p)sExpr = "123456789" sExpr = "123456789" ------------------------------- ****104;54;17(text:p)LSet sVar = sExpr LSet sVar = sExpr ------------------------------- ****105;54;46(text:p)Print ">"; sVar; "<" print ">"; sVar; "<" ------------------------------- ****106;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03120309.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;24(subject)RTrim Function [Runtime] Rtrim functie [Runtime] ------------------------------- ****66;58;24(help:link)RTrim Function [Runtime] Rtrim functie [Runtime] ****67;39;53(text:p)Deletes all spaces at the end of a string expression. Verwijdert alle spaties aan het einde van een tekenreeks uitdrukking. ------------------------------- ****69;39;10(text:p)See also: Zie ook: ****69;83;14(help:link)LTrim Function Ltrim functie ------------------------------- ****70;71;6(text:span)Syntax Syntaxis ****70;89;1(): : ------------------------------- ****71;39;23(text:p)RTrim (Text As String) RTrim (Tekst As String) ****71;84;5(keyword)RTrim RTrim ------------------------------- ****72;71;12(text:span)Return value Resultaatwaarde ****72;95;1(): : ------------------------------- ****73;39;6(text:p)String String ------------------------------- ****74;71;9(text:span)Parameter Parameter ****74;92;1(): : ------------------------------- ****75;39;28(text:p)Text: Any string expression. Tekst: Elke tekenreeks-uitdrukking. ------------------------------- ****76;32;8(text:p)Example: Voorbeeld: ------------------------------- ****77;38;17(text:p)Sub ExampleSpaces Sub VoorbeeldSpaties ------------------------------- ****78;38;51(text:p)Dim sText2 as String,sText as String,sOut as String Dim sText2 as String,sText as String,sOut as String ------------------------------- ****79;38;42(text:p)sText2 = " <*Las Vegas*> " sText2 = " <*Las Vegas*> " ------------------------------- ****81;38;33(text:p)sOut = "'"+sText2 sOut = "'"+sText2 ****81;80;28(text:p)+"'"+ Chr(13) +"'"+ Chr(13) ------------------------------- ****82;38;22(text:p)sText = Ltrim(sText2) sText = Ltrim(sText2) ****82;80;45(text:p)REM sText = " <*Las Vegas*> " REM sText = " <*Las Vegas*> " ------------------------------- ****83;38;68(text:p)sOut = sOut + "'"+sText +"'" + Chr(13) sOut = sOut + "'"+sText +"'" + Chr(13) ------------------------------- ****84;38;22(text:p)sText = Rtrim(sText2) sText = Rtrim(sText2) ****84;80;45(text:p)REM sText = " <*Las Vegas*> " REM sText = " <*Las Vegas*> " ------------------------------- ****85;38;68(text:p)sOut = sOut +"'"+ sText +"'" + Chr(13) sOut = sOut +"'"+ sText +"'" + Chr(13) ------------------------------- ****86;38;21(text:p)sText = Trim(sText2) sText = Trim(sText2) ****86;68;45(text:p)REM sText = " <*Las Vegas*> " REM sText = " <*Las Vegas*> " ------------------------------- ****87;38;39(text:p)sOut = sOut +"'"+ sText sOut = sOut +"'"+ sText ****87;86;19(text:p)+"'" +"'" ------------------------------- ****88;38;11(text:p)MsgBox sOut MsgBox sOut ------------------------------- ****89;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03120310.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;24(subject)UCase Function [Runtime] Ucase functie [Runtime] ------------------------------- ****66;58;24(help:link)UCase Function [Runtime] Ucase functie [Runtime] ****67;39;155(text:p)Converts characters in a string to uppercase. Only lowercase letters in a string are affected. Uppercase letters and all other characters remain unchanged. Converteert tekens in een tekenreeks naar Hoofdletters. Alleen kleine letters in een tekenreeks worden beïnvloed. Hoofdletters en alle andere tekens blijven onveranderd. ------------------------------- ****69;39;10(text:p)See also: Zie ook: ****69;83;14(help:link)LCase Function Lcase functie ------------------------------- ****70;71;6(text:span)Syntax Syntaxis ****70;89;1(): : ------------------------------- ****71;39;23(text:p)UCase (Text As String) UCase (Tekst as String) ****71;84;5(keyword)UCase UCase ------------------------------- ****72;71;12(text:span)Return value Resultaatwaarde ****72;95;1(): : ------------------------------- ****73;39;6(text:p)String String ------------------------------- ****74;71;9(text:span)Parameter Parameter ****74;92;1(): : ------------------------------- ****75;39;45(text:p)Text : Any string expression to be converted. Tekst : Elke tekenreeksuitdrukking die moet worden geconverteerd. ------------------------------- ****76;32;8(text:p)Example: Voorbeeld: ------------------------------- ****77;38;17(text:p)Sub ExampleLUCase Sub VoorbeeldLUCase ------------------------------- ****78;38;18(text:p)Dim sVar As String Dim sVar as String ------------------------------- ****79;38;28(text:p)sVar = "Las Vegas" sVar = "Las Vegas" ------------------------------- ****80;38;51(text:p)Print LCase(sVar) REM returns "las vegas" print LCase(sVar) REM Geeft weer: "las vegas" ------------------------------- ****81;38;51(text:p)Print UCase(sVar) REM returns "LAS VEGAS" print UCase(sVar) REM Geeft weer: "LAS VEGAS" ------------------------------- ****82;38;7(text:p)end Sub end Sub ####Text\SBASIC\COMMON\03120311.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;23(subject)Trim Function [Runtime] Trim functie [Runtime] ------------------------------- ****66;58;23(help:link)Trim Function [Runtime] Trim functie [Runtime] ****67;39;63(text:p)Removes all leading and trailing spaces of a string expression. Verwijdert alle voorafgaande en nakomende spaties uit een tekenreeks uitdrukking. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;23(text:p)Trim( Text As String ) Trim( Tekst as String ) ****70;84;4(keyword)Trim Trim ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;6(text:p)String String ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;28(text:p)Text: Any string expresiion. Tekst: Elke tekenreeks uitdrukking. ------------------------------- ****75;39;83(text:p)This function is used to remove leading and trailing spaces in a string expression. Deze functie gebruikt u om alle voorafgaande en nakomende spaties uit een tekenreeks uitdrukking te verwijderen. ------------------------------- ****76;32;8(text:p)Example: Voorbeeld: ------------------------------- ****77;38;17(text:p)Sub ExampleSpaces Sub VoorbeeldSpaties ------------------------------- ****78;38;51(text:p)Dim sText2 as String,sText as String,sOut as String Dim sText2 as String,sText as String,sOut as String ------------------------------- ****79;38;42(text:p)sText2 = " <*Las Vegas*> " sText2 = " <*Las Vegas*> " ------------------------------- ****81;38;33(text:p)sOut = "'"+sText2 sOut = "'"+sText2 ****81;80;28(text:p)+"'"+ Chr(13) +"'"+ Chr(13) ------------------------------- ****82;38;22(text:p)sText = Ltrim(sText2) sText = Ltrim(sText2) ****82;80;45(text:p)REM sText = " <*Las Vegas*> " REM sText = " <*Las Vegas*> " ------------------------------- ****83;38;68(text:p)sOut = sOut + "'"+sText +"'" + Chr(13) sOut = sOut + "'"+sText +"'" + Chr(13) ------------------------------- ****84;38;22(text:p)sText = Rtrim(sText2) sText = Rtrim(sText2) ****84;80;45(text:p)REM sText = " <*Las Vegas*> " REM sText = " <*Las Vegas*> " ------------------------------- ****85;38;68(text:p)sOut = sOut +"'"+ sText +"'" + Chr(13) sOut = sOut +"'"+ sText +"'" + Chr(13) ------------------------------- ****86;38;21(text:p)sText = Trim(sText2) sText = Trim(sText2) ****86;68;45(text:p)REM sText = " <*Las Vegas*> " REM sText = " <*Las Vegas*> " ------------------------------- ****87;38;39(text:p)sOut = sOut +"'"+ sText sOut = sOut +"'"+ sText ****87;86;19(text:p)+"'" +"'" ------------------------------- ****88;38;11(text:p)MsgBox sOut MsgBox sOut ------------------------------- ****89;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03120312.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;31(subject)ConvertToURL Function [Runtime] ConvertToURL functie [Runtime] ------------------------------- ****66;59;31(help:link)ConvertToURL Function [Runtime] ConvertToURL functie [Runtime] ****67;40;42(text:p)Converts a system file name to a file URL. Converteert een systeembestandsnaam naar een bestandsURL. ------------------------------- ****69;72;6(text:span)Syntax Syntaxis ****69;90;1(): : ------------------------------- ****70;40;23(text:p)ConvertToURL(filename) ConvertToURL(bestandsnaam) ****70;85;12(keyword)ConvertToURL ConvertToURL ------------------------------- ****71;72;12(text:span)Return value Resultaatwaarde ****71;96;1(): : ------------------------------- ****72;40;6(text:p)String String ------------------------------- ****73;72;9(text:span)Parameter Parameter ****73;93;1(): : ------------------------------- ****74;40;32(text:p)Filename: a file name as string. Bestandsnaam: een bestandsnaam als String. ------------------------------- ****75;33;8(text:p)Example: Voorbeeld: ------------------------------- ****76;39;46(text:p)systemFile$ = "c:\folder\mytext.txt" systemFile$ = "c:\folder\mytext.txt" ------------------------------- ****77;39;34(text:p)url$ = ConvertToURL( systemFile$ ) url$ = ConvertToURL( systemFile$ ) ------------------------------- ****78;39;10(text:p)print url$ print url$ ------------------------------- ****80;39;41(text:p)systemFileAgain$ = ConvertFromURL( url$ ) systemFileAgain$ = ConvertFromURL( url$ ) ------------------------------- ****81;39;22(text:p)print systemFileAgain$ print systemFileAgain$ ####Text\SBASIC\COMMON\03120313.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;33(subject)ConvertFromURL Function [Runtime] ConvertFromURL functie [Runtime] ------------------------------- ****66;59;33(help:link)ConvertFromURL Function [Runtime] ConvertFromURL functie [Runtime] ****67;40;42(text:p)Converts a file URL to a system file name. Converteert een bestands-URL naar een systeembestandsnaam. ------------------------------- ****69;72;6(text:span)Syntax Syntaxis ****69;90;1(): : ------------------------------- ****70;40;25(text:p)ConvertFromURL(filename) ConvertFromURL(bestandsnaam) ****70;87;14(keyword)ConvertFromURL ConvertFromURL ------------------------------- ****71;72;12(text:span)Return value Resultaatwaarde ****71;96;1(): : ------------------------------- ****72;40;6(text:p)String String ------------------------------- ****73;72;9(text:span)Parameter Parameter ****73;93;1(): : ------------------------------- ****74;40;34(text:p)Filename: a file name as a string. Bestandsnaam: een bestandsnaam als een tekenreeks. ------------------------------- ****75;33;8(text:p)Example: Voorbeeld: ------------------------------- ****76;39;46(text:p)systemFile$ = "c:\folder\mytext.txt" systemFile$ = "c:\folder\mytext.txt" ------------------------------- ****77;39;34(text:p)url$ = ConvertToURL( systemFile$ ) url$ = ConvertToURL( systemFile$ ) ------------------------------- ****78;39;10(text:p)print url$ print url$ ------------------------------- ****80;39;41(text:p)systemFileAgain$ = ConvertFromURL( url$ ) systemFileAgain$ = ConvertFromURL( url$ ) ------------------------------- ****81;39;22(text:p)print systemFileAgain$ print systemFileAgain$ ####Text\SBASIC\COMMON\03120400.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;21(subject)Editing String Length Bewerken tekenreekslengte ------------------------------- ****56;58;21(help:link)Editing String Length Bewerken tekenreekslengte ****57;39;80(text:p)The following functions are used to determine string length and compare strings. De volgende functies worden gebruikt om tekenreekslengte te bepalen en tekenreeksen te vergelijken. ####Text\SBASIC\COMMON\03120401.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;24(subject)InStr Function [Runtime] InStr functie [Runtime] ------------------------------- ****66;58;24(help:link)InStr Function [Runtime] InStr functie [Runtime] ****67;39;55(text:p)Returns the position of a string within another string. Geeft de positie van een tekenreeks binnen een andere tekenreeks weer. ------------------------------- ****69;39;122(text:p)The Instr function returns the position at which the match was found. If the string was not found, the function returns 0. De Instr-functie geeft de positie, waar de overeenstemming werd gevonden, weer. Als de tekenreeks niet werd gevonden, geeft de functie 0 weer. ------------------------------- ****70;71;6(text:span)Syntax Syntaxis ****70;89;1(): : ------------------------------- ****71;39;72(text:p)InStr ([Start As Integer,] Text1 As String, Text2 As String[, Compare]) InStr ([Start as Integer,] Text1 as String, Text2 as String[, Vergelijken]) ****71;133;5(keyword)InStr InStr ------------------------------- ****72;71;12(text:span)Return value Resultaatwaarde ****72;95;1(): : ------------------------------- ****73;39;7(text:p)Integer Integer ------------------------------- ****74;71;9(text:span)Parameter Parameter ****74;92;1(): : ------------------------------- ****75;39;193(text:p)Start: Any numeric expression that sets the position within the string at which to start searching for a given substring. If this parameter is omitted, the search starts at the first character. Start: Een willekeurige numerieke uitdrukking die de positie binnen de tekenreeks instelt waarop moet worden begonnen met zoeken naar een bepaaldesubtekenreeks. Als deze parameter is weggelaten begint de zoekoperatie bij het eerste teken. ------------------------------- ****76;39;44(text:p)Text1: String expression in which to search. Text1: tekenreeks-uitdrukking waarin moet worden gezocht. ------------------------------- ****77;39;39(text:p)Text2: String expression to search for. Text2: tekenreeks-uitdrukking waarnaar moet worden gezocht. ------------------------------- ****78;39;206(text:p)Compare: Optional numeric expression that defines the type of comparison. This parameter can be 0 or 1. The default value 0 specifies a binary comparison; 1 specifies a text comparison (not case-sensitive). Vergelijken: Optionele numerieke uitdrukking die het soort vergelijking definieert. Deze parameter kan zijn 0 of 1. De standaardwaarde 0 specificeert een binaire vergelijking; 1 specificeert een tekstvergelijking (niet Hoofdletter-gevoelig). ------------------------------- ****79;39;122(text:p)The parameter Compare should not be set, if the first return parameter is omitted. Otherwise it comes to a run time error. De parameter Vergelijken zou niet moeten worden ingesteld, als de eerste weergeef parameter is weggelaten. Anders komt er een run-time fout. ------------------------------- ****80;32;8(text:p)Example: Voorbeeld: ------------------------------- ****81;38;19(text:p)Sub ExamplePosition Sub VoorbeeldPositie ------------------------------- ****82;38;20(text:p)Dim sInput As String Dim sInput as String ------------------------------- ****83;38;19(text:p)Dim iPos as Integer Dim iPos as Integer ------------------------------- ****85;38;32(text:p)sInput = "Star Office" sInput = "OpenOffice.org" ------------------------------- ****86;38;34(text:p)iPos = Instr(sInput,"v") iPos = Instr(sInput,"v") ------------------------------- ****87;38;10(text:p)print iPos print iPos ------------------------------- ****88;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03120402.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;22(subject)Len Function [Runtime] Len functie [Runtime] ------------------------------- ****66;58;22(help:link)Len Function [Runtime] Len functie [Runtime] ****67;39;98(text:p)Returns the number of characters in a string, or the number of bytes required to store a variable. Geeft het aantal tekens in een tekenreeks weer of het aantal bytes benodigd om een variabele op te slaan. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;21(text:p)Len (Text As String) Len (Tekst as String) ****70;82;3(keyword)Len Len ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;4(text:p)Long Long ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;58(text:p)Text: Any string expression or a variable of another type. Tekst: Elke tekenreeks-uitdrukking of een variabele van een ander type. ------------------------------- ****75;32;8(text:p)Example: Voorbeeld: ------------------------------- ****76;38;14(text:p)Sub ExampleLen Sub VoorbeeldLen ------------------------------- ****77;38;19(text:p)Dim sText as String Dim sText as String ------------------------------- ****78;38;29(text:p)sText = "Las Vegas" sText = "Leeuwarden" ------------------------------- ****79;38;31(text:p)MsgBox Len(sText) REM Returns 9 MsgBox Len(sText) REM Geeft weer: 10 ------------------------------- ****80;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03120403.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;26(subject)StrComp Function [Runtime] StrComp functie [Runtime] ------------------------------- ****66;58;26(help:link)StrComp Function [Runtime] StrComp functie [Runtime] ****67;39;158(text:p)Compares two strings and returns whether the strings are equal, whether one of the strings is an empty string, or whether one string is longer than the other. Vergelijkt twee tekenreeksen en geeft weer: óf de tekenreeksen zijn gelijk, óf één van de tekenreeksen is een lege tekenreeks, óf of één tekenreeks langer is dan de andere. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;54(text:p)StrComp (Text1 As String, Text2 As String[, Compare]) StrComp (Text1 as String, Text2 as String[, Vergelijken]) ****70;115;7(keyword)StrComp StrComp ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;7(text:p)Integer Integer ------------------------------- ****73;71;9(text:span)Parameter Parameter ****73;92;1(): : ------------------------------- ****74;39;77(text:p)Text1: Any string expression to be compared with the one returned after that. Text1: Elke tekenreeksuitdrukking die moet worden vergeleken met degene die daarna wordt weergegeven. ------------------------------- ****75;39;73(text:p)Text2: Any string expression to be compared with the one returned before. Text2: Elke tekenreeks-uitdrukking die moet worden vergeleken met die welke werd weergegeven vóór. ------------------------------- ****76;39;191(text:p)Compare: This optional parameter sets the comparison method. If Compare = 0 the string comparison is case-sensitive. If Compare = 1 no difference is made between upper and lower case letters. Vergelijken: Deze optionele parameter stelt de vergelijkingsmethode in. Als Vergelijken = 0 is de tekenreeks-vergelijking Hoofdletter-gevoelig. Als Vergelijken = 1 wordt geen verschil gemaakt tussen Hoofd- en kleine letters. ------------------------------- ****77;39;121(text:p)Use this function to compare two strings with each other according to the conventions determined by the argument Compare. Gebruik deze functie om twee tekenreeksen met elkaar te vergelijken volgens de regels bepaald door het argument Compare. ------------------------------- ****78;39;40(text:p)The possible return values are -1, 0, 1: De mogelijke Resultaatwaarden zijn -1, 0, 1: ------------------------------- ****79;32;12(text:p)Return value Resultaatwaarde ------------------------------- ****80;39;69(text:p)-1 : Text1 > Text2 (e.g., "Time" and "Thyme"). -1 : Text1 > Text2 (bijv., "Tijd" en "Tijdens"). ------------------------------- ****81;39;77(text:p)0 : Both strings are identical (e.g., "Time" and "Time"). 0 : Beide tekenreeksen zijn identiek (bijv., "Tijd" en "Tijd"). ------------------------------- ****82;39;68(text:p)1 : Text1 < Text2 (e.g., "Thyme" and "Time"). 1 : Text1 < Text2 (bijv., "Tijdens" en "Tijd"). ------------------------------- ****83;39;88(text:p)Null : One of the strings is an empty string (e.g., "Peter" and ""). Nul : Eén van de tekenreeksen is een lege tekenreeks (bijv., "Peter" en ""). ------------------------------- ****84;32;8(text:p)Example: Voorbeeld: ------------------------------- ****85;38;18(text:p)Sub ExampleStrComp Sub VoorbeeldStrComp ------------------------------- ****86;38;18(text:p)Dim iVar As Single Dim iVar as Single ------------------------------- ****87;38;18(text:p)Dim sVar As String Dim sVar as String ------------------------------- ****88;38;14(text:p)iVar = 123.123 iVar = 123.123 ------------------------------- ****89;38;17(text:p)sVar = Str$(iVar) sVar = Str$(iVar) ------------------------------- ****90;38;35(text:p)Msgbox strcomp(sVar , Str$(iVar),1) Msgbox strcomp(sVar , Str$(iVar),1) ------------------------------- ****91;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03130000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;14(subject)Other Commands Andere Commando's ------------------------------- ****56;59;14(help:link)Other Commands Andere Commando's ****57;40;85(text:p)Here you will find all functions and statements not included in the other categories. Hier zult u alle functies en argumenten vinden, niet opgenomen in de andere categorieën. ####Text\SBASIC\COMMON\03130100.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;24(subject)Beep-statement [Runtime] Beep-argument [Runtime] ------------------------------- ****66;58;24(help:link)Beep-statement [Runtime] Beep-argument [Runtime] ****67;39;135(text:p)Sounds a tone through the computer's speaker. The tone is system-dependent and the volume and pitch can generally not be modified. Laat een toon horen door de computer's luidspreker. De toon is systeem-afhankelijk en het volume en hoogte kan in het algemeen niet worden gewijzigd. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;5(text:p)Beep Beep ****70;66;4(keyword)Beep Beep ------------------------------- ****71;32;8(text:p)Example: Voorbeeld: ------------------------------- ****72;38;15(text:p)Sub ExampleBeep Sub VoorbeeldBeep ------------------------------- ****73;38;4(text:p)beep beep ------------------------------- ****74;38;4(text:p)beep beep ------------------------------- ****75;38;4(text:p)beep beep ------------------------------- ****76;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03130500.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;24(subject)Shell Function [Runtime] Shell functie [Runtime] ------------------------------- ****66;58;24(help:link)Shell Function [Runtime] Shell functie [Runtime] ****67;39;81(text:p)Starts another application and defines the respective window style, if necessary. Start een andere toepassing en definieert de respectievelijke vensterstijl, indien nodig. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;81(text:p)Shell (Pathname As String[, Windowstyle As Integer][, Param As String][, bSync]) Shell (Padnaam as String[, Vensterstijl as Integer][, Param as String][, bSync]) ****70;142;5(keyword)Shell Shell ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;70(text:p)Pathname: Complete path and program name of the program to be started. Padnaam: Volledig pad- en programmanaam van het programma dat moet worden begonnen. ------------------------------- ****73;39;148(text:p)Windowstyle: Optional integer expression that specifies the style of the window in which the program is executed. The following values are possible: Vensterstijl: Optionele Integer-uitdrukking die de stijl van het venster waarin het programma wordt uitgevoerd specificeert. De volgende waarden zijn mogelijk: ------------------------------- ****74;39;11(text:p)Description Beschrijving ------------------------------- ****75;39;46(text:p)0 - The focus is on the hidden program window. 0 - De focus is op het verborgen programmavenster. ------------------------------- ****76;39;56(text:p)1 - The focus is on the program window in standard size. 1 - De focus is op het programmavenster in standaard grootte. ------------------------------- ****77;39;49(text:p)2 - The focus is on the minimized program window. 2 - De focus is op het geminimaliseerde programmavenster. ------------------------------- ****78;39;49(text:p)3 - The focus is on the maximized program window. 3 - De focus is op het gemaximaliseerde programmavenster. ------------------------------- ****79;39;48(text:p)4 - Standard size program window, without focus. 4 - standaard grootte programmavenster, zonder focus. ------------------------------- ****80;39;65(text:p)6 - Minimized program window, focus remains on the active window. 6 - GeMinimaliseerd programmavenster, focus blijft op het aktieve venster. ------------------------------- ****81;39;5(text:p)10 - 10 - ****81;53;20(text:p)Full-screen display. Volledig-scherm weergave. ------------------------------- ****82;39;74(text:p)Param: Any string expression that specifies the command line to be passed. Param: Elke tekenreeks-uitdrukking die de commandoregel die moet worden doorgegeven specificeert. ------------------------------- ****83;39;151(text:p)bSync: Boolean expression that defines whether a DDE connection to the application can be established immediately after starting (True) or not (False). bSync: Boolean-uitdrukking die definieert of een DDE verbinding naar de toepassing tot stand kan worden gebracht, meteen na beginnen (True) of niet (False). ------------------------------- ****84;32;8(text:p)Example: Voorbeeld: ------------------------------- ****85;38;22(text:p)Sub ExampleShellForWin Sub VoorbeeldShellForWin ------------------------------- ****86;38;39(text:p)Shell( "c:\win95\calc.exe",2) Shell( "c:\win95\calc.exe",2) ------------------------------- ****87;38;7(text:p)end sub end sub ####Text\SBASIC\COMMON\03130600.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;24(subject)Wait statement [Runtime] Wait argument [Runtime] ------------------------------- ****66;58;24(help:link)Wait statement [Runtime] Wait argument [Runtime] ****67;39;78(text:p)Interrupts the program execution for the given amount of time in milliseconds. Onderbeekt de uitvoering van het programma voor de bepaalde tijd in milliseconden. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;14(text:p)Wait millisec Wait millisec ****70;75;4(keyword)Wait Wait ------------------------------- ****71;71;9(text:span)Parameter Parameter ****71;92;1(): : ------------------------------- ****72;39;114(text:p)millisec: Numeric expression that contains the amount of time (in milliseconds) the program execution should wait. millisec: Numerieke uitdrukking die de tijd (in milliseconden) bevat waar de uitvoering van het programma op moet wachten. ------------------------------- ****73;32;8(text:p)Example: Voorbeeld: ------------------------------- ****74;38;15(text:p)Sub ExampleWait Sub VoorbeeldWait ------------------------------- ****75;38;17(text:p)Dim lTick As Long Dim lTick as Long ------------------------------- ****76;38;24(text:p)lTick = GetSystemTicks() lTick = GetSystemTicks() ------------------------------- ****77;38;9(text:p)wait 2000 wait 2000 ------------------------------- ****78;38;8(text:p)lTick = lTick = ****78;55;26(text:p)(GetSystemTicks() - lTick) (GetSystemTicks() - lTick) ------------------------------- ****79;38;26(text:p)MsgBox "" & MsgBox "" & ****79;73;62(text:p)lTick & " Ticks" ,0,"The pause lasted" lTick & " Tikken" ,0,"De pauze duurde:" ------------------------------- ****80;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03130700.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;33(subject)GetSystemTicks Function [Runtime] GetSystemTicks functie [Runtime] ------------------------------- ****66;58;33(help:link)GetSystemTicks Function [Runtime] GetSystemTicks functie [Runtime] ****67;39;224(text:p)Returns the system ticks provided by the operating system. The number of system ticks returned within a certain time frame is always dependent on the operating system. This function can be used to optimize certain processes. Geeft de systeemtikken weer, voorzien door het besturingssysteem. Het aantal systeemtikken, weergegeven binnen een bepaald tijdframe, is altijd afhankelijk van het besturingssysteem. Deze functie kan worden gebruikt om bepaalde processen te optimaliseren. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;17(text:p)GetSystemTicks() GetSystemTicks() ****70;78;14(keyword)GetSystemTicks GetSystemTicks ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;4(text:p)Long Long ------------------------------- ****73;32;8(text:p)Example: Voorbeeld: ------------------------------- ****74;38;15(text:p)Sub ExampleWait Sub VoorbeeldWait ------------------------------- ****75;38;17(text:p)Dim lTick As Long Dim lTick as Long ------------------------------- ****76;38;24(text:p)lTick = GetSystemTicks() lTick = GetSystemTicks() ------------------------------- ****77;38;9(text:p)wait 2000 wait 2000 ------------------------------- ****78;38;8(text:p)lTick = lTick = ****78;55;26(text:p)(GetSystemTicks() - lTick) (GetSystemTicks() - lTick) ------------------------------- ****79;38;26(text:p)MsgBox "" & MsgBox "" & ****79;73;62(text:p)lTick & " Ticks" ,0,"The pause lasted" lTick & " Tikken" ,0,"De pauze duurde:" ------------------------------- ****80;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03130800.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;26(subject)Environ Function [Runtime] Environ functie [Runtime] ------------------------------- ****66;58;26(help:link)Environ Function [Runtime] Environ functie [Runtime] ****67;39;129(text:p)Returns the value of an environment variable as a string. Environment variables are dependent on the respective operating system. Geeft de waarde van een omgevingsvariabele als een tekenreeks weer. Omgevingsvariabelen zijn afhankelijk van het respectievelijke besturingssysteem. ------------------------------- ****69;39;61(text:p)On a Macintosh computer the function returns an empty string. Op een Macintosh computer geeft de functie een lege tekenreeks weer. ------------------------------- ****70;71;6(text:span)Syntax Syntaxis ****70;89;1(): : ------------------------------- ****71;39;32(text:p)Environ (Environment As String) Environ (Omgeving as String) ****71;93;7(keyword)Environ Environ ------------------------------- ****72;71;12(text:span)Return value Resultaatwaarde ****72;95;1(): : ------------------------------- ****73;39;6(text:p)String String ------------------------------- ****74;71;9(text:span)Parameter Parameter ****74;92;1(): : ------------------------------- ****75;39;64(text:p)Environment: Environment variable for which to return the value. Omgeving: Omgevingsvariabele waarvoor de waarde wordt weergegeven. ------------------------------- ****76;32;8(text:p)Example: Voorbeeld: ------------------------------- ****77;38;18(text:p)Sub ExampleEnviron Sub VoorbeeldEnviron ------------------------------- ****78;38;19(text:p)Dim sTemp As String Dim sTemp as String ------------------------------- ****79;38;32(text:p)sTemp=Environ ("TEMP") sTemp=Environ ("TEMP") ------------------------------- ****80;38;59(text:p)If sTemp = "" Then sTemp=Environ("TMP") If sTemp = "" then sTemp=Environ("TMP") ------------------------------- ****81;38;108(text:p)MsgBox "'" & sTemp & "'" ,64,"Directory of temporary files:" MsgBox "'" & sTemp & "'" ,64,"Map voor tijdelijke bestanden:" ------------------------------- ****82;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03131000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;34(subject)GetSolarVersion Function [Runtime] GetSolarVersion functie [Runtime] ------------------------------- ****68;58;34(help:link)GetSolarVersion Function [Runtime] GetSolarVersion functie [Runtime] ****69;39;43(text:p)Returns the internal number of the current Geeft het interne getal van de huidige ****69;100;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****69;131;9() version. versie. ------------------------------- ****71;71;6(text:span)Syntax Syntaxis ****71;89;1(): : ------------------------------- ****72;39;20(text:p)s = GetSolarVersion s = GetSolarVersion ****72;81;15(keyword)GetSolarVersion GetSolarVersion ------------------------------- ****73;71;12(text:span)Return value Resultaatwaarde ****73;95;1(): : ------------------------------- ****74;39;6(text:p)String String ------------------------------- ****75;32;8(text:p)Example: Voorbeeld: ------------------------------- ****76;38;26(text:p)Sub ExampleGetSolarVersion Sub VoorbeeldGetSolarVersion ------------------------------- ****77;38;18(text:p)Dim sSep As String Dim sSep as String ------------------------------- ****78;38;22(text:p)sSep = GetSolarVersion sSep = GetSolarVersion ------------------------------- ****79;38;65(text:p)MsgBox sSep,64,"Version number of the solar technology" MsgBox sSep,64,"Versienummer van de solar technologie" ------------------------------- ****80;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03131300.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;33(subject)TwipsPerPixelX Function [Runtime] TwipsPerPixelX functie [Runtime] ------------------------------- ****66;59;33(help:link)TwipsPerPixelX Function [Runtime] TwipsPerPixelX functie [Runtime] ****67;40;62(text:p)Returns the number of twips representing the width of a pixel. Geeft het aantal twips weer, voorstellende de breedte van een pixel. ------------------------------- ****69;72;6(text:span)Syntax Syntaxis ****69;90;1(): : ------------------------------- ****70;40;19(text:p)n = TwipsPerPixelX n = TwipsPerPixelX ****70;81;14(keyword)TwipsPerPixelX TwipsPerPixelX ------------------------------- ****71;72;12(text:span)Return value Resultaatwaarde ****71;96;1(): : ------------------------------- ****72;40;7(text:p)Integer Integer ------------------------------- ****73;33;8(text:p)Example: Voorbeeld: ------------------------------- ****74;39;21(text:p)Sub ExamplePixelTwips Sub VoorbeeldPixelTwips ------------------------------- ****75;39;49(text:p)MsgBox "" & TwipsPerPixelX() & MsgBox "" & TwipsPerPixelX() & ****75;108;94(text:p)" Twips * " & TwipsPerPixelY() & " Twips",0,"Pixel size" " Twips * " & TwipsPerPixelY() & " Twips",0,"Pixelgrootte" ------------------------------- ****76;39;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03131400.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;33(subject)TwipsPerPixelY Function [Runtime] TwipsPerPixelY functie [Runtime] ------------------------------- ****66;58;33(help:link)TwipsPerPixelY Function [Runtime] TwipsPerPixelY functie [Runtime] ****67;39;63(text:p)Returns the number of twips representing the height of a pixel. Geeft het aantal twips weer, voorstellende de hoogte van een pixel. ------------------------------- ****69;71;6(text:span)Syntax Syntaxis ****69;89;1(): : ------------------------------- ****70;39;19(text:p)n = TwipsPerPixelY n = TwipsPerPixelY ****70;80;14(keyword)TwipsPerPixelY TwipsPerPixelY ------------------------------- ****71;71;12(text:span)Return value Resultaatwaarde ****71;95;1(): : ------------------------------- ****72;39;7(text:p)Integer Integer ------------------------------- ****73;32;8(text:p)Example: Voorbeeld: ------------------------------- ****74;38;21(text:p)Sub ExamplePixelTwips Sub VoorbeeldPixelTwips ------------------------------- ****75;38;49(text:p)MsgBox "" & TwipsPerPixelX() & MsgBox "" & TwipsPerPixelX() & ****75;107;94(text:p)" Twips * " & TwipsPerPixelY() & " Twips",0,"Pixel size" " Twips * " & TwipsPerPixelY() & " Twips",0,"Pixelgrootte" ------------------------------- ****76;38;7(text:p)End Sub end sub ####Text\SBASIC\COMMON\03131500.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;34(subject)CreateUnoStruct Function [Runtime] CreateUnoStruct functie [Runtime] ------------------------------- ****66;59;34(help:link)CreateUnoStruct Function [Runtime] CreateUnoStruct functie [Runtime] ****67;40;41(text:p)Creates an instance of a Uno struct type. Creëert een verzameling van een Uno struct type. ------------------------------- ****69;40;58(text:p)You should prefer a statement like the following, however: U zou een argument als het volgende willen gebruiken echter: ------------------------------- ****70;40;46(text:p)Dim oStruct as new com.sun.star.beans.Property Dim oStruct as new com.sun.star.beans.Property ------------------------------- ****71;72;6(text:span)Syntax Syntaxis ****71;90;1(): : ------------------------------- ****72;40;42(text:p)oStruct = CreateUnoStruct( Uno type name ) oStruct = CreateUnoStruct( Uno type naam ) ****72;104;15(keyword)CreateUnoStruct CreateUnoStruct ------------------------------- ****73;33;8(text:p)Example: Voorbeeld: ------------------------------- ****74;39;68(text:p)oStruct = CreateUnoStruct( "com.sun.star.beans.Property" ) oStruct = CreateUnoStruct( "com.sun.star.beans.Property" ) ####Text\SBASIC\COMMON\03131600.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;35(subject)CreateUnoService Function [Runtime] CreateUnoService functie [Runtime] ------------------------------- ****66;59;35(help:link)CreateUnoService Function [Runtime] CreateUnoService functie [Runtime] ****67;40;58(text:p)Instanciates a Uno service with the ProcessServiceManager. Verbindt een Uno dienst met de ProcessServiceManager. ------------------------------- ****69;72;6(text:span)Syntax Syntaxis ****69;90;1(): : ------------------------------- ****70;40;47(text:p)oService = CreateUnoService( Uno service name ) oService = CreateUnoService( Uno dienstnaam ) ****70;109;16(keyword)CreateUnoService CreateUnoService ------------------------------- ****71;33;8(text:p)Example: Voorbeeld: ------------------------------- ****72;39;81(text:p)oIntrospection = CreateUnoService( "com.sun.star.beans.Introspection" ) oIntrospection = CreateUnoService( "com.sun.star.beans.Introspection" ) ####Text\SBASIC\COMMON\03131700.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;43(subject)GetProcessServiceManager Function [Runtime] GetProcessServiceManager functie [Runtime] ------------------------------- ****66;59;43(help:link)GetProcessServiceManager Function [Runtime] GetProcessServiceManager functie [Runtime] ****67;40;63(text:p)Returns the ProcessServiceManager (central Uno ServiceManager). Geeft de ProcessServiceManager (centrale Uno ServiceManager) weer. ****67;125;21(keyword)ProcessServiceManager ProcessServiceManager ------------------------------- ****69;40;77(text:p)Needed when a service must be instanciated using CreateInstanceWithArguments. Nodig als een dienst moet worden verbonden met behulp van CreateInstanceWithArguments. ------------------------------- ****70;72;6(text:span)Syntax Syntaxis ****70;90;1(): : ------------------------------- ****71;40;44(text:p)oServiceManager = GetProcessServiceManager() oServiceManager = GetProcessServiceManager() ****71;106;24(keyword)GetProcessServiceManager GetProcessServiceManager ------------------------------- ****72;33;8(text:p)Example: Voorbeeld: ------------------------------- ****73;39;44(text:p)oServiceManager = GetProcessServiceManager() oServiceManager = GetProcessServiceManager() ------------------------------- ****74;39;94(text:p)oIntrospection = oServiceManager.createInstance("com.sun.star.beans.Introspection") ; oIntrospection = oServiceManager.createInstance("com.sun.star.beans.Introspection"); ------------------------------- ****76;39;44(text:p)this is the same as the following statement: dit is hetzelfde als het volgende argument: ------------------------------- ****78;39;79(text:p)oIntrospection = CreateUnoService("com.sun.star.beans.Introspection") oIntrospection = CreateUnoService("com.sun.star.beans.Introspection") ####Text\SBASIC\COMMON\03131800.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;34(subject)CreateUnoDialog Function [Runtime] CreateUnoDialog functie [Runtime] ------------------------------- ****66;59;34(help:link)CreateUnoDialog Function [Runtime] CreateUnoDialog functie [Runtime] ****67;40;85(text:p)Creates a Basic Uno object that represents a Uno dialog control during Basic runtime. Creëert een BASIC Uno object dat een Uno dialoogbeheer vertegenwoordigt gedurende BASIC runtime. ------------------------------- ****69;40;125(text:p)Dialogs are defined in the dialog libraries. To display a dialog, a "live" dialog must be created from the library. Dialogvensters worden gedefinieerd in de dialoogbibliotheken. Om een dialoogvenster weer te geven, moet een "levend" dialoogvenster zijn gemaakt van de bibliotheek. ------------------------------- ****70;40;4(text:p)See Zie ****70;66;8(help:link)Examples Voorbeelden ****70;86;1(). . ------------------------------- ****71;72;6(text:span)Syntax Syntaxis ****71;90;1(): : ------------------------------- ****72;40;27(text:p)CreateUnoDialog( oDlgDesc ) CreateUnoDialog( oDlgDesc ) ****72;89;15(keyword)CreateUnoDialog CreateUnoDialog ------------------------------- ****73;33;8(text:p)Example: Voorbeeld: ------------------------------- ****74;39;53(text:p)' Get dialog description from the dialog library ' Haal dialoogvensterbeschrijving uit de dialoogbibliotheek ------------------------------- ****75;39;43(text:p)oDlgDesc = DialogLibraries.Standard.Dialog1 oDlgDesc = DialogLibraries.Standard.Dialog1 ------------------------------- ****77;39;39(text:p)' generate "live" dialog ' genereren "levend" dialoogvenster ------------------------------- ****78;39;41(text:p)oDlgControl = CreateUnoDialog( oDlgDesc ) oDlgControl = CreateUnoDialog( oDlgDesc ) ------------------------------- ****80;39;38(text:p)' display "live" dialog ' weergeven "levend" dialoogvenster ------------------------------- ****81;39;19(text:p)oDlgControl.execute oDlgControl.execute ####Text\SBASIC\COMMON\03131900.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;21(subject)GlobalScope [Runtime] GlobalScope [Runtime] ------------------------------- ****99;59;21(help:link)GlobalScope [Runtime] GlobalScope [Runtime] ****100;40;64(text:p)Basic source code and dialogs are organized in a library system. BASIC broncode en dialogvensters worden georganiseerd in een bibliotheeksysteem. ****100;126;14(keyword)Library system Bibliotheeksysteem ------------------------------- ****104;35;39(text:p)The LibraryContainer contains libraries De LibraryContainer bevat bibliotheken ------------------------------- ****107;35;40(text:p)Libraries contain modules and/or dialogs Bibliotheken bevatten modules en/of dialogen ------------------------------- ****110;40;9(text:p)In Basic: In BASIC: ------------------------------- ****111;40;46(text:p)THe LibraryContainer is called BasicLibraries. De LibraryContainer is genaamd BasicLibraries. ------------------------------- ****112;40;11(text:p)In dialogs: In dialogen: ------------------------------- ****113;40;47(text:p)The LibraryContainer is called DialogLibraries. De LibraryContainer is genaamd DialogLibraries. ------------------------------- ****114;40;277(text:p)Both LibraryContainers exist in an application level and within every document. in the document Basic, the document's LibraryContainers are called automatically. If you want to call the global LibraryContainers from within a document, you must use the keyword GlobalScope. Beide LibraryContainers bestaan op een toepassingsniveau en binnen elk document. In het document BASIC, de document's LibraryContainers worden automatisch aangeroepen. Als u de globale LibraryContainers vanuit een document wilt aanroepen, moet u het sleutelwoord GlobalScope gebruiken. ------------------------------- ****115;72;6(text:span)Syntax Syntaxis ****115;90;1(): : ------------------------------- ****116;40;11(text:p)GlobalScope GlobalScope ****116;73;11(keyword)GlobalScope GlobalScope ------------------------------- ****117;33;8(text:p)Example: Voorbeeld: ------------------------------- ****118;39;29(text:p)Example in the document Basic Voorbeeld in het document BASIC ------------------------------- ****120;39;55(text:p)' calling Dialog1 in the document library Standard ' aanroepen Dialog1 in de documentbibliotheek Standard ------------------------------- ****121;39;43(text:p)oDlgDesc = DialogLibraries.Standard.Dialog1 oDlgDesc = DialogLibraries.Standard.Dialog1 ------------------------------- ****123;39;58(text:p)' calling Dialog2 in the application library Library1 ' aanroepen Dialog2 in de toepassingsbibliotheek Library1 ------------------------------- ****124;39;55(text:p)oDlgDesc = GlobalScope.DialogLibraries.Library1.Dialog2 oDlgDesc = GlobalScope.DialogLibraries.Library1.Dialog2 ####Text\SBASIC\COMMON\main0211.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;13(subject)Macro Toolbar Macro werkbalk ------------------------------- ****56;144;19(keyword)toolbars; Basic IDE werkbalken; BASIC IDE ****56;204;21(keyword)function bars; macros functiebalken; macro's ****56;266;20(keyword)macros; function bar macro's ; functiebalk ****56;327;13(help:link)Macro Toolbar Macro werkbalk ****57;71;168(help:help-text)The Macro toolbar contains important functions used to create and edit macros which facilitate your work. For example, you can test single steps, set break points, etc. De Macro-werkbalk bevat belangrijke functies gebruikt om macro's te creëren en te bewerken, welke uw werk faciliteren. U kunt bijvoorbeeld enkele stappentest , eindpunten zetten, etc. ------------------------------- ****59;39;56(text:p)For more information about the user interface in active Voor meer informatie over de gebruikersinterface in aktieve ****59;113;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****59;144;34() Basic documents, please refer to BASIC documenten, alstublieft bekijk de ****59;218;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****59;249;16() Basic Interface BASIC Interface ****59;277;1(). . ####Text\SBASIC\COMMON\main0601.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;37(subject)General %PRODUCTNAME Basic Functions Algemene %PRODUCTNAME BASIC Functies ------------------------------- ****77;123;8(help:link)General Algemene ****77;149;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****77;180;7() Basic BASIC ****77;196;9()Functions Functies ------------------------------- ****78;54;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****78;85;11() Basic Help BASIC Help ------------------------------- ****89;63;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****89;116;15(help:productversion)%PRODUCTVERSION %PRODUCTVERSION ****89;153;88() now provides a new Application Programming Interface (API) that enables you to control biedt nu een nieuw Applicatie Programmeren Interface (API) die het u mogelijk maakt om te beheren ****89;259;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****89;290;54() components by using various programming languages. A componenten met behulp van verschillende programmeertalen. Een ****89;362;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****89;415;15(help:productversion)%PRODUCTVERSION %PRODUCTVERSION ****89;452;64() Development Kit is available for the new programming interface. OntwikkelingsKit (Development Kit) is beschikbaar voor de nieuwe programmeer interface. ****90;126;27(text:a)For more information about Voor meer informatie over ****90;171;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****90;202;57() API Reference, please visit (http://api.openoffice.org/) API Bekijk alstublieft (http://api.openoffice.org/) ****91;45;33(text:p)The macros you have created with De macro's die u heeft gemaakt met ****91;96;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****91;127;97() Basic based on the old programming interface will no longer be supported by the current version. BASIC gebaseerd op de oud programmeer interface zal niet meer worden ondersteund door de huidige versie. ------------------------------- ****99;36;37(text:p)Guides for Basic Dialogs and Controls Gidsen voor BASIC Dialogvensters en Bedieningselementen ------------------------------- ****105;36;19(text:p)Help about the Help Help over de Help ------------------------------- ####Text\SBASIC\COMMON\01\06130000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;5(subject)Macro Macro ------------------------------- ****63;59;16(keyword)macro; Basic IDE macro; BASIC IDE ****63;116;16(keyword)Basic IDE; macro BASIC IDE; macro ****63;151;5(text:p)Macro Macro ------------------------------- ****64;105;49(help:help-text)In this dialog, you can organize and edit macros. In dit dialoogvenster kunt u macro's ordenen en bewerken. ------------------------------- ****65;106;10(text:p)Macro name Macronaam ------------------------------- ****66;72;96(help:help-text)In this field, insert the name of the currently selected macro or enter the name of a new macro. In dit veld, voeg de naam van de momenteel geselecteerde macro in of toets de naam van een nieuwe macro in. ------------------------------- ****67;115;76(help:help-text)In this list field, the macros will be displayed which are contained in the In deze keuzelijst worden de macro's getoond welke zijn opgenomen in de ****67;223;10(text:span)Macro from Macro van ****67;245;8() module. module. ****67;270;42() Click the macro you want to edit or view. Klik de macro die u wilt bewerken of weergeven. ------------------------------- ****68;78;10(text:p)Macro from Macro van ------------------------------- ****69;72;194(help:help-text)In this list field, you can select a module you want to edit as macro or which you want to insert a new macro. If you want to record the macro in a particular file, you must first open the file. In dezekeuzelijst, kunt u een module selecteren die u wilt bewerken als macro of die u wilt invoegen in een nieuwe macro. Als u de macro in een bepaald bestand wilt opnemen, moet u eerste het bestand openen. ------------------------------- ****70;106;3(text:p)Run Uitvoeren ------------------------------- ****71;72;104(help:help-text)If you have selected a macro name in the Macro name field, you can click this button to execute a macro. Als u een macronaam in het Macronaamveld heeft geselecteerd, kunt u op deze knop klikken om een macro uit te voeren. ------------------------------- ****72;109;6(text:p)Assign Toewijzen ------------------------------- ****73;72;25(help:help-text)Click here to access the Klik hier om toegang te krijgen tot het ****73;129;13(text:span)Configuration Configuratie ****73;154;83() dialog, where you can assign a new macro to a menu, a key combination or an event. dialoogvenster, waar u een nieuwe macro aan een menu, een toetscombinatie of een gebeurtenis kunt toekennen. ------------------------------- ****74;107;4(text:p)Edit Bewerken ------------------------------- ****75;72;57(help:help-text)Starts the Basic IDE and opens the selected macro module. Start de Basic IDE en opent de geselecteerde macromodule. ------------------------------- ****76;106;10(text:p)New/Delete Nieuw ------------------------------- ****77;72;69(help:help-text)Deletes the selected entry or adds an entry if a new name is entered. Verwijdert het geselecteerde item of voegt een item toe als een nieuwe naam is ingevoerd. ------------------------------- ****78;40;34(text:p)After you enter a new name in the Nadat u een nieuwe naam intoetst in het ****78;106;10(text:span)Macro name Macronaam ****78;128;18() field, click the veld, klik de ****78;178;3(text:span)New Nieuw/Wissen ****78;193;34() button to enter a new macro. The knop om een nieuwe macro in te toetsen. De ****78;245;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****78;276;105() Basic IDE appears and a text cursor in parentheses (Sub/ End Sub) indicates you can begin entering data. BASIC IDE verschijnt en een tekstcursor tussen ronde haakjes (Sub/ end sub) geeft aan dat u kunt beginnen met het invoeren van gegevens. ------------------------------- ****79;40;41(text:p)To delete a macro, select the respective Om een macro te verwijderen, selecteer de respectievelijke ****79;113;10(text:span)macro name macronaam ****79;135;15() and click the en klik de ****79;182;6(text:span)Delete Wissen ****79;200;93() button. A confirmation warning will appear before the macro is deleted from the source text. drukknop. Een bevestigingswaarschuwing zal verschijnen vóór de macro wordt verwijderd uit de brontekst. ------------------------------- ****80;127;9(text:p)Organizer Beheren ------------------------------- ****81;72;7(help:help-text)In the In het ****81;111;8(text:span)Organize Beheren ****81;131;64() dialog, you can manage existing modules, dialogs and libraries. dialoogvenster, kunt u bestaande modules, dialogen en bibliotheken beheren. ****81;212;153() You can activate individual libraries, add or delete libraries, or define new ones. Modules and dialogs can be defined, edited and deleted here as well. U kunt individuele bibliotheken activeren, bibliotheken toevoegen of verwijderen of nieuwe definiëren. Modules en dialogen kunnen hier eveneens worden gedefinieerd, bewerkt en verwijderd. ------------------------------- ****82;86;15(text:p)Module tab page Module tabpagina ------------------------------- ****83;72;34(help:help-text)Organize dialogs and modules here. Orden dialogen en modules hier. ------------------------------- ****84;37;13(text:p)Module/Dialog Module/Dialoog ------------------------------- ****85;40;6(text:p)Click Klik ****85;78;10(text:span)New Dialog Nieuwe Dialoog ****85;100;4() or of ****85;136;10(text:span)New Module Nieuwe Module ****85;158;64(). You will be asked for a name for the new module or new dialog. . U zal worden gevraagd naar een naam voor de nieuwe module of nieuw dialoogvenster. ------------------------------- ****86;86;13(text:p)Module/Dialog Module/Dialoog ------------------------------- ****87;72;95(help:help-text)Here you can find a list of existing modules and dialogs in the application and open documents. Hier kunt u een lijst vinden van bestaande modules en dialoogvensters in de toepassing en geopende documenten. ****87;184;105() Select the dialog or module to edit an element, or select a library if you want to insert a new element. Selecteer het dialoogvenster of module om een element te bewerken of selecteer een bibliotheek als u een nieuw element wilt invoegen. ------------------------------- ****88;40;113(text:p)You can move and copy elements from this list box via drag & drop between the application and open documents. U kunt elementen uit deze keuzelijst verplaatsen en kopiëren via Sleep & Laten vallen tussen de toepassing en geopende documenten. ------------------------------- ****89;40;170(text:p)To move an entry, drag it to another position in the list box. An outline next to the cursor indicates where the entry will be inserted when you release the mouse button. Om een item te verplaatsen, sleep het naar een andere positie in de keuzelijst. Een lijn bij de cursor geeft aan waar het item zal worden ingevoegd als u de muisknop loslaat. ------------------------------- ****90;40;19(text:p)To copy, press the Om te kopiëren, druk de ****90;113;9(text:p)(Option) (Option) ****90;148;5()(Alt) (Alt) ****90;182;20() key while dragging. toets tijdens het slepen. ------------------------------- ****91;104;4(text:p)Edit Bewerken ------------------------------- ****92;72;47(help:help-text)Click here to edit a selected module or dialog. Klik hier om een geselecteerde module of dialoogvenster te bewerken. ****92;136;17() Afterwards, the Hierna, het ****92;171;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****92;202;19() Basic IDE appears. BASIC IDE verschijnt. ------------------------------- ****93;106;10(text:p)New Module Nieuwe Module ------------------------------- ****94;72;34(help:help-text)Click here to create a new module. Klik hier om een nieuw module te creëren. ****94;123;98() The module is inserted in the library selected in the list box. You can enter a name in a dialog. De module wordt ingevoegd in de bibliotheek geselecteerd in de keuzelijst. U kunt een naam in een dialoogvenster invoeren. ------------------------------- ****95;40;16(text:p)Afterwards, the Hierna, de ****95;74;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****95;105;19() Basic IDE appears. BASIC IDE verschijnt. ------------------------------- ****96;106;10(text:p)New Dialog Nieuwe Dialoog ------------------------------- ****97;72;34(help:help-text)Click here to create a new dialog. Klik hier om creëer een nieuw dialoog. ****97;123;73() The dialog is inserted in the selected library under the specified name. Het dialoogvenster wordt ingevoegd in de geselecteerde bibliotheek onder de gespecificeerde naam. ------------------------------- ****98;40;16(text:p)Afterwards, the Hierna, de ****98;74;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****98;105;19() Basic IDE appears. BASIC IDE verschijnt. ------------------------------- ****99;84;18(text:p)Libraries tab page Bibliotheken tabpagina ------------------------------- ****100;72;71(help:help-text)Here you can organize the libraries containing the modules and dialogs. Hier kunt u de bibliotheken die de modules en dialoogvensters bevatten ordenen. ****100;160;80() You can activate or deactivate each library, and add, edit or delete libraries. U kunt elke bibliotheek activeren of deactiveren en bibliotheken toevoegen, bewerken of verwijderen. ------------------------------- ****101;101;22(text:p)Application / Document Toepassing / Document ------------------------------- ****102;72;119(help:help-text)In this list box, select the area of the application or of the open documents where you want to organize the libraries. In deze keuzelijst, selecteer het gebied van de toepassing of van de geopende documenten waar u de bibliotheken wilt ordenen. ------------------------------- ****103;83;7(text:p)Library Bibliotheek ------------------------------- ****104;72;80(help:help-text)In the large list field below, you can find the names of all existing libraries. In het grote lijstveld onderaan kunt u de namen van alle bestaand bibliotheken vinden. ------------------------------- ****105;102;4(text:p)Edit Bewerken ------------------------------- ****106;72;40(help:help-text)Click here to edit the selected library. Klik hier om de geselecteerde bibliotheek te bewerken. ****106;129;5() The De ****106;152;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****106;183;24() Basic IDE then appears. BASIC IDE verschijnt dan. ------------------------------- ****107;106;8(text:p)Password Wachtwoord ------------------------------- ****108;72;32(help:help-text)Click this button to access the Klik deze knop om toegang te krijgen tot het ****108;158;13(text:span)Edit Password Bewerken Wachtwoord ****108;195;8() dialog. dialoogvenster. ------------------------------- ****109;104;3(text:p)New Nieuw ------------------------------- ****110;72;35(help:help-text)Click here to create a new library. Klik hier om een nieuwe bibliotheek te creëren. ****110;124;5() The Het ****110;161;11(text:span)New Library Nieuwe Bibliotheek ****110;184;57() dialog will appear to enter the name of the new library. dialoogvenster zal verschijnen om de naam van de nieuwe bibliotheek in te voeren. ------------------------------- ****111;102;4(text:p)Name Naam ------------------------------- ****112;72;39(help:help-text)Enter the name of the new library here. Voer de naam van de nieuwe bibliotheek hier in. ------------------------------- ****113;104;3(text:p)Add Toevoegen ------------------------------- ****114;72;23(help:help-text)Click here to open the Klik hier om te openen het ****114;127;13(text:span)Add Libraries Bibliotheken toevoegen ****114;152;69() dialog, where you can select an existing library to add to the list. dialoogvenster, waar u een bestaand bibliotheek kunt selecteren om toe te voegen aan de lijst. ****114;238;31() This dialog is similar to the Deze dialoog lijkt op het ****114;301;4(text:span)Open Openen ****114;317;46() dialog. Select the desired library and click dialoogvenster. Selecteer de gewenste bibliotheek en klik ****114;395;4(text:span)Open Openen ****114;411;9(). In the . In het ****114;474;13(text:span)Add Libraries Bibliotheken toevoegen ****114;511;40() dialog, you can define further options. dialoogvenster, kunt u verdere opties definiëren. ------------------------------- ****115;40;33(text:p)You may select a *.sbl file from U kunt selecteren een *.sbl bestand uit ****115;91;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****115;122;33() 5.2 and previous versions. From 5.2 en voorgaande versies. Vanaf ****115;173;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****115;204;218() 6.0 on, you select the file script.xlb or dialog.xlb from the folder with the same name as the library. Alternatively select the catalog file script.xlc or dialog.xlc from a folder that contains other library folders. 6.0 selecteert u het bestand script.xlb of dialoog.xlb uit de map met dezelfde naam als de bibliotheek. Als alternatief selecteert u het catalogusbestand script.xlc of dialoog.xlc uit een map die andere bibliotheekmappen bevat. ####Text\SBASIC\COMMON\01\06130100.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;15(subject)Change password Wachtwoord veranderen ------------------------------- ****56;95;17(keyword)library; password bibliotheek; wachtwoord ****56;153;17(keyword)password; library wachtwoord; bibliotheek ****56;189;15(text:p)Change password Wachtwoord veranderen ------------------------------- ****57;72;59(help:help-text)In this dialog, you can protect your macro with a password. In dit dialoogvenster kunt u uw macro met een wachtwoord beveiligen. ****57;148;69() You can enter a new password or change an already existing password. U kunt een nieuw wachtwoord invoeren of een reeds bestaand wachtwoord veranderen. ------------------------------- ****58;37;8(text:p)Previous Oud Wachtwoord ------------------------------- ****59;40;62(text:p)A text field to enter the previous password can be found here. Een tekstveld om het voorgaande wachtwoord in te voeren kan hier worden gevonden. ------------------------------- ****60;103;8(text:p)Password Wachtwoord ------------------------------- ****61;72;49(help:help-text)Enter the previous password here (if one exists). Voer het voorgaande wachtwoord hier in (of een bestaand). ------------------------------- ****62;37;3(text:p)New Nieuw wachtwoord ------------------------------- ****63;40;28(text:p)Specify a new password here. Specificeer een nieuw wachtwoord hier. ------------------------------- ****64;103;8(text:p)Password Wachtwoord ------------------------------- ****65;72;28(help:help-text)Enter the new password here. Voer het nieuwe wachtwoord hier in. ------------------------------- ****66;106;6(text:p)Repeat Bevestigen ------------------------------- ****67;72;7(help:help-text)Repeat Bevestig ****67;88;31(help:help-text)the new password in this field. het nieuwe wachtwoord in dit veld. ####Text\SBASIC\COMMON\01\06130500.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;13(subject)Add libraries Toevoegen bibliotheken ------------------------------- ****58;111;17(keyword)libraries; adding bibliotheken; toevoegen ****58;169;14(keyword)add; libraries toevoegen; bibliotheken ****58;202;13(text:p)Add libraries Toevoegen bibliotheken ------------------------------- ****59;72;28(help:help-text)In this dialog, you can add In dit dialoogvenster kunt u toevoegen ****59;118;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****59;149;83() Basic libraries from a previously selected file to the already existing libraries. BASIC bibliotheken uit een eerder geselecteerd bestand naar de reeds bestaande bibliotheken. ------------------------------- ****60;86;10(text:p)File name: Bestandsnaam: ------------------------------- ****61;72;135(help:help-text)This field displays the file name of the selected file, and in the list box above you will see all the libraries contained in the file. Dit veld toont de bestandsnaam van het geselecteerde bestand en in de keuzelijst erboven ziet u alle bibliotheken opgenomen in het bestand. ****61;224;74() Select the libraries that you want to add by checking the respective box. Selecteer de bibliotheken die u wilt toevoegen in het respectievelijke vak. ------------------------------- ****62;37;7(text:p)Options Opties ------------------------------- ****63;40;37(text:p)You can define further settings here. U kunt verdere instellingen hier definiëren. ------------------------------- ****64;100;31(text:p)Insert as reference (read-only) Invoegen als verwijzing (alleen-lezen) ------------------------------- ****65;72;72(help:help-text)Mark this check box to insert the selected libraries as read-only files. Vink dit vinkvak aan om de geselecteerde bibliotheken als alleen-lezen bestanden in te voegen. ****65;161;141() This enables multiple users to access the same library managed on a central company server. The first time you run a macro after restarting Dit maakt het mogelijk voor meerdere gebruikers om toegang te krijgen tot dezelfde bibliotheek beheerd op een centrale bedrijfsserver. De eerste keer dat u een macro uitvoert na herstarten van ****65;320;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****65;351;54(), the current libraries are retrieved from the server. , worden de huidige bibliotheken opgehaald van de server. ------------------------------- ****66;101;26(text:p)Replace existing libraries Vervangen bestaande bibliotheken ------------------------------- ****67;72;81(help:help-text)Check this box to replace existing libraries with new libraries of the same name. Vink dit vak aan om bestaande bibliotheken door nieuwe bibliotheken met dezelfde naam te vervangen. ####Text\SBASIC\COMMON\02\11010000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;7(subject)Library Bibliotheek ------------------------------- ****65;106;7(help:link)Library Bibliotheek ****66;71;69(help:help-text)This list box enables you to switch to the first module of a library. Deze keuzelijst maakt het u mogelijk om om te schakelen naar de eerste module van een bibliotheek. ****66;157;128() From the list box, select the library you want to edit. Immediately afterwards, its first module is displayed in the Basic IDE. Uit de keuzelijst selecteer de bibliotheek die u wilt bewerken. Direct daarna, wordt de eerste module getoond in de Basic IDE. ------------------------------- ****78;43;16(text:p)Library List Box Bibliotheek Keuzelijst ####Text\SBASIC\COMMON\02\11020000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;7(subject)Compile Compileren ------------------------------- ****65;98;7(help:link)Compile Compileren ****66;71;41(help:help-text)Click here to re-compile the Basic macro. Klik hier om de BASIC macro te her-compileren. ****66;129;114() This is necessary after you make changes to a macro, and may be a good idea if you use single or procedure steps. Dit is nodig nadat u veranderingen heeft gemaakt in een macro en kan een goed idee zijn als u enkele- of procedurestappen gebruikt. ------------------------------- ****78;43;7(text:p)Compile Compileren ####Text\SBASIC\COMMON\02\11030000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;3(subject)Run Uitvoeren ------------------------------- ****65;94;3(help:link)Run Uitvoeren ****66;71;64(help:help-text)Click this icon to start the first macro of the current library. Klik dit icoon om de eerste macro van de huidige bibliotheek te starten. ------------------------------- ****78;43;3(text:p)Run Uitvoeren ####Text\SBASIC\COMMON\02\11040000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;4(subject)Stop Stop ------------------------------- ****68;95;16(keyword)macros; stopping macro's ; stoppen ****68;152;25(keyword)programs; stopping macros programma's ; macro's stoppen ****68;218;16(keyword)stopping; macros stoppen; macro's ****68;275;4(help:link)Stop Stop ****69;71;37(help:help-text)Click here to stop the current macro. Klik hier om de huidige macro te stoppen. ****69;206;38()Alternatively, you can use Ctrl+Alt+S. Als alternatief kunt u Ctrl+Alt+S gebruiken. ------------------------------- ****81;43;4(text:p)Stop Stop ####Text\SBASIC\COMMON\02\11050000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;11(subject)Single Step Stap voor Stap ------------------------------- ****65;99;11(help:link)Single Step Stap voor Stap ****66;71;78(help:help-text)Use this icon to start the macro and then interrupt it after the next command. Gebruik dit icoon om de macro te starten en dan na het volgende commando te onderbreken. ------------------------------- ****68;39;113(text:p)When you click the icon again, the next command will be carried out. This function is useful in conjunction with Wanneer u het icoon nogmaals klikt, wordt het volgende commando uitgevoerd. Deze functie is nuttig in samenhang met ****68;174;5(help:link)Watch Controle weergeven ****68;191;54() for finding and correcting program errors, as is the voor het vinden en corrigeren van programmafouten, net zoals de ****68;267;14(help:link)Procedure Step Procedurestap ****68;293;10() function. functie. ------------------------------- ****79;43;11(text:p)Single Step Stap voor Stap ####Text\SBASIC\COMMON\02\11060000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;14(subject)Procedure Step Procedurestap ------------------------------- ****65;99;14(help:link)Procedure Step Procedurestap ****66;71;72(help:help-text)Use this icon to start and interrupt the macro after the next procedure. Gebruik dit icoon om de macro te starten en te onderbreken na de volgende procedure. ------------------------------- ****68;39;121(text:p)When you click this icon again, the following procedure will be carried out. This function is useful in combination with Wanneer u dit icoon nogmaals klikt, wordt de volgende procedure uitgevoerd. Deze functie is nuttig in combinatie met ****68;182;5(help:link)Watch Controle weergeven ****68;199;54() for finding and correcting program errors, as is the voor het vinden en corrigeren van programmafouten, net zoals de ****68;275;11(help:link)Single Step Stap voor Stap ****68;298;10() function. functie. ------------------------------- ****79;43;14(text:p)Procedure Step Procedurestap ####Text\SBASIC\COMMON\02\11070000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;10(subject)Breakpoint Onderbrekingspunt ------------------------------- ****65;107;10(help:link)Breakpoint Onderbrekingspunt ****66;71;54(help:help-text)Click this icon to set a breakpoint in a program line. Klik dit icoon om een Onderbrekingspunt in een programmaregel te zetten. ------------------------------- ****68;39;161(text:p)The breakpoint is inserted at the cursor position. By using a breakpoint, you can interrupt a program just before an error occurs to then run the program in the Het Onderbrekingspunt wordt ingevoegd op de cursorpositie. Met behulp van een Onderbrekingspunt kunt u een programma onderbreken net vóórdat een fout voorkomt en dan het programma uitvoeren in de ****68;222;11(help:link)Single Step Stap voor Stap ****68;245;50() mode (row-wise) until the error occurs. Using the modus (regel-gewijze) totdat de fout voorkomt. Met gebruik van de/het ****68;317;5(help:link)Watch Controle weergeven ****68;334;64() icon, you can also check the content of the relevant variables. icoon, kunt u ook de inhoud van de relevante variabelen controleren. ------------------------------- ****79;43;10(text:p)Breakpoint Onderbrekingspunt ####Text\SBASIC\COMMON\02\11080000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;9(subject)Add Watch Controle weergeven ------------------------------- ****68;103;9(help:link)Add Watch Controle weergeven ****69;71;52(help:help-text)Click this icon to observe the variables in a macro. Klik dit icoon om de variabelen in een macro te bekijken. ------------------------------- ****71;39;58(text:p)Click the name of a variable to select it, then click the Klik de naam van een variabele om het te selecteren, klik dan het ****71;129;9(text:span)Add Watch Controle weergeven ****71;150;199() icon. The variable is displayed in the Watch window. When a value is assigned to the variable, it is displayed next to the name of the variable in the Watch window. This value is constantly updated. icoon. De variabele wordt getoond in het Controle-venster. Als een waarde is toegekend aan de variabele, wordt die getoond naast de naam van de variabele in het Controle-venster. Deze waarde wordt constant vernieuwd. ------------------------------- ****82;43;9(text:p)Add Watch Controle weergeven ------------------------------- ****88;39;120(text:p)To remove the variable watch, select the variable in the Watch window and click on the glasses icon marked with a red X. Om de variabelen-controle te verwijderen, selecteer de variabele in het Controle-venster en klik op het Bril-icoon aangevinkt met een rode X. ------------------------------- ****89;119;42(help:help-text)Removes the watch for a selected variable. Verwijdert de controle voor een geselecteerde variabele. ####Text\SBASIC\COMMON\02\11090000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;14(subject)Object Catalog Objectcatalogus ------------------------------- ****83;102;14(help:link)Object Catalog Objectcatalogus ****84;72;28(help:help-text)Click this icon to open the Klik dit icoon om te openen het ****84;132;7(text:span)Objects Objecten ****84;151;46() dialog where the Basic objects are organized. dialoogvenster waar de BASIC objecten worden beheerd. ------------------------------- ****86;40;107(text:p)You can insert already assigned module names directly at the cursor position, and jump to a certain module. U kunt de reeds toegekende modulenamen direct op de cursorpositie invoegen en springen naar een bepaalde module. ------------------------------- ****97;44;14(text:p)Object Catalog Objectcatalogus ------------------------------- ****103;85;4(text:p)Show Weergeven ------------------------------- ****104;72;104(help:help-text)If a module or a function is marked, click this icon to display the corresponding source text or dialog. Als een module of een functie is aangevinkt, klik dit icoon om de overeenkomstige brontekst of het dialoogvenster te tonen. ------------------------------- ****114;44;4(text:p)Show Weergeven ------------------------------- ****121;83;11(text:p)Window Area Venstergebied ------------------------------- ****122;72;57(help:help-text)Here you will find a hierarchical display of the current Hier vindt u een hiërarchische weergave van de huidige ****122;147;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****122;178;39() macro libraries, modules, and dialogs. macrobibliotheken, modules en dialogen. ****122;234;93()If you double click the respective entry, the subordinate elements will be displayed. In the Als u dubbelklikt op het respectievelijke item, worden de ondergeschikte elementen getoond. In de ****122;367;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****122;398;11() Basic Help BASIC Help ****122;421;47() you can discover which elements are available. kunt u ontdekken welke elementen beschikbaar zijn. ####Text\SBASIC\COMMON\02\11090100.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;11(subject)Description Beschrijving ------------------------------- ****72;36;11(text:p)Description Beschrijving ------------------------------- ****73;39;28(text:p)Click this icon to open the Klik dit icoon om te openen het ****73;99;11(text:span)Description Beschrijving ****73;122;101() dialog. In this dialog, you can assign a Help ID and a description for a function, module or dialog. dialoogvenster. In dit dialoogvenster kunt u een Help ID en een beschrijving voor een functie, module of dialoogvenster toekennen. ------------------------------- ****83;43;4(text:p)The Het ****83;79;11(text:span)Description Beschrijving ****83;102;77() icon can only be selected if a program code already exists for the function. icoon kan alleen worden geselecteerd als een programmacode reeds bestaat voor de functie. ------------------------------- ****89;36;10(text:p)Macro name Macronaam ------------------------------- ****90;39;48(text:p)The name of the current macro is displayed here. De naam van de huidige macro wordt hier getoond. ------------------------------- ****91;110;11(text:p)Description Beschrijving ------------------------------- ****92;71;33(help:help-text)You can enter a description here. U kunt hier een beschrijving invoeren. ****92;121;134() This description will be displayed in this dialog as well as in the macro dialog. The description used here is also displayed in the Deze beschrijving zal worden getoond in dit dialoogvenster, eveneens als in het macro dialoogvenster. De hier gebruikte beschrijving wordt ook getoond in het ****92;287;14(text:span)Object Catalog Objectcatalogus ****92;313;8() dialog. dialoogvenster. ------------------------------- ****93;36;16(text:p)Help Information Helpinformatie ------------------------------- ****94;39;187(text:p)You can define a help ID and file name here. Press F1 while a program is running to send this information to the Help program, which then displays the respective help topic you developed. U kunt hier een help ID en bestandsnaam definiëren. Druk F1 terwijl een programma wordt uitgevoerd om deze informatie naar het Help programmate zenden, welke dan het respectievelijke Help-onderwerp dat u ontwikkeld heeft, weergeeft. ------------------------------- ****95;110;7(text:p)Help ID Help ID ------------------------------- ****96;71;80(help:help-text)Enter a Help ID number to be transferred to the help program when it is started. Voer een Help ID getal in om te worden overgedragen naar het Help-programma als het wordt gestart. ------------------------------- ****97;104;14(text:p)Help file name Help-bestandsnaam ------------------------------- ****98;71;80(help:help-text)Enter the name of the help file to be downloaded when starting the help program. Voer de naam van het Help-bestand in dat moet worden geladen als het Help-programma begint. ####Text\SBASIC\COMMON\02\11100000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;6(subject)Macros Macro's ------------------------------- ****68;106;6(help:link)Macros Macro's ****69;71;28(help:help-text)Click this icon to open the Klik dit icoon om te openen het ****69;131;5(text:span)Macro Macro ****69;148;8() dialog. dialoogvenster. ------------------------------- ****81;43;6(text:p)Macros Macro's ####Text\SBASIC\COMMON\02\11110000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;7(subject)Modules Module ------------------------------- ****68;104;7(help:link)Modules Module ****69;71;23(help:help-text)Click here to open the Klik hier om te openen het ****69;165;15(text:span)Macro Organizer Macro's beheren ****69;204;8() dialog. dialoogvenster. ------------------------------- ****81;43;6(text:p)Module Module ####Text\SBASIC\COMMON\02\11120000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;14(subject)Search Bracket Haakjes zoeken ------------------------------- ****65;105;14(help:link)Search Bracket Haakjes zoeken ****66;71;69(help:help-text)Click this icon to check if a bracket in a macro is correctly closed. Klik dit icoon om te controleren of een haakje in een macro correct is gesloten. ------------------------------- ****68;39;177(text:p)The open bracket directly following the txet cursor will be checked. The area up to the closing bracket will be selected. If no closing bracket exists, no text will be selected. Het Open-haakje direct volgend op de tekstcursor zal worden aangevinkt. Het gebied tot het Sluiten-haakje zal worden geselecteerd. Als er geen Sluiten-haakje bestaat, zal geen tekst worden geselecteerd. ------------------------------- ****79;43;18(text:p)Search Parenthesis Haakjes zoeken ####Text\SBASIC\COMMON\02\11140000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;18(subject)Insert Source Text Brontekst invoegen ------------------------------- ****72;95;18(help:link)Insert Source Text Brontekst invoegen ****73;71;70(help:help-text)Click this icon to load the Basic source text in the Basic IDE window. Klik dit icoon om de BASIC-brontekst in het Basic IDE venster te laden. ------------------------------- ****75;39;97(text:p)Place the cursor on the position in the code where you want to insert the source text. Click the Plaats de cursor op de positie in de code waar u de brontekst wilt invoegen. Klik het ****75;168;18(text:span)Insert source text Brontekst invoegen ****75;198;170() icon and choose the file in the File Selection dialog that contains Basic source text. Confirm the File Selection dialog. The source text is inserted into the Basic IDE. icoon en kies het bestand in het Bestandselectie-dialoogvenster dat de BASIC brontekst bevat. Bevestig het Bestandselectie-dialoogvenster. De brontekst wordt ingevoegd in de Basic IDE. ------------------------------- ****86;43;18(text:p)Insert source text Brontekst invoegen ####Text\SBASIC\COMMON\02\11150000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;14(subject)Save Source As Brontekst opslaan als... ------------------------------- ****71;97;14(help:link)Save Source As Brontekst opslaan als... ****72;71;57(help:help-text)Click this icon to save the source code of a Basic macro. Klik dit icoon om de broncode van een BASIC macro op te slaan. ****72;145;11() Opens the Opent het ****72;188;4(text:span)Save Opslaan ****72;204;32() dialog which is similar to the dialoogvenster, dat vergelijkbaar is met het ****72;268;7(text:span)Save as Opslaan als ****72;287;8() dialog. dialoogvenster. ------------------------------- ****84;43;22(text:p)Save source text as... Brontekst opslaan als... ####Text\SBASIC\COMMON\02\11160000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;8(subject)Step Out Terugspringen ------------------------------- ****68;98;8(help:link)Step Out Terugspringen ****69;71;127(help:help-text)Click this icon to jump back to the previous routine in a macro. You will land at the next command not yet run in that routine. Klik dit icoon om naar de voorgaande routine in een macro terug te springen. U zult landen bij het volgende commando, nog niet uitgevoerd in die routine. ------------------------------- ****81;43;8(text:p)Step Out Terugspringen ####Text\SBASIC\COMMON\02\20000000.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;8(subject)Controls Besturingselementen ------------------------------- ****345;102;26(keyword)controls; in dialog editor besturingselementen; in dialoogeditor ****345;170;23(keyword)dialog editor; controls dialoogeditor; besturingselementen ****345;234;8(help:link)Controls Besturingselementen ****346;72;20(help:help-text)This icon opens the Dit icoon opent de ****346;124;8(text:span)Controls Besturingselementen ****346;144;18() floating toolbar. zwevende werkbalk. ------------------------------- ****358;44;8(text:p)Controls Besturingselementen ------------------------------- ****364;40;62(text:p)For more information about controls and their properties, see Voor meer informatie over besturingselementen en hun eigenschappen, zie ****364;223;64(text:a)http://api.openoffice.org/common/ref/com/sun/star/awt/index.html http://api.openoffice.org/common/ref/com/sun/star/awt/module-ix.html ****364;296;1(). . ------------------------------- ****367;35;70(text:p)In edit mode, double-click on a control to open the properties dialog. In bewerkmodus, dubbelklik op een besturingselement om het eigenschappen-dialoogvenster te openen. ------------------------------- ****370;35;99(text:p)In edit mode, in the context menu of your dialog you find commands to cut, copy and paste controls. In bewerkmodus vindt u, in het contextmenu van uw dialoogvenster, commando's om besturingselementen te knippen, kopiëren en plakken. ------------------------------- ****373;104;19(keyword)pushbutton; control drukknop; besturingselement ****373;165;19(keyword)control; pushbutton besturingselement; drukknop ****373;226;13(keyword)icon; control icoon; beheer ****373;281;13(keyword)control; icon besturingselement; icoon ****373;314;4(text:p)> > ****373;340;15(keyword)button; control drukknop; besturingselement ****373;397;15(keyword)control; button besturingselement; drukknop ****373;432;6(text:p)Button Knop ------------------------------- ****383;76;43(help:help-text)Click this icon to create a command button. Klik dit icoon om een commando-drukknop te creëren. ****383;136;105() This function can be used, for example, to execute a command for a defined event, such as a mouse click. Deze functie kan worden gebruikt, bijvoorbeeld, om een commando voor een gedefinieerde gebeurtenis, zoals een muisklik, uit te voeren. ****384;44;52(text:p)You can apply text and/or graphics to these buttons. U kunt tekst en/of afbeeldingen voor deze knoppen toepassen. ------------------------------- ****389;106;22(keyword)image control; control afbeeldingenbeheer; besturingselement ****389;170;22(keyword)control; image control besturingselement; afbeeldingenbeheer ****389;212;13(text:p)Image Control Afbeelding besturingselement ------------------------------- ****399;76;43(help:help-text)Click this icon to create an image control. Klik dit icoon om een afbeeldingen-besturingselement te creëren. ****399;136;23() It displays a graphic. Het geeft een afbeelding weer. ------------------------------- ****404;102;18(keyword)check box; control vinkvak; besturingselement ****404;162;18(keyword)control; check box besturingselement; vinkvak ****404;200;9(text:p)Check Box Vinkvak ------------------------------- ****414;76;38(help:help-text)Click this icon to create a check box. Klik dit icoon om een vinkvak te creëren. ****414;131;42() A checkbox toggles a function on and off. Een vinkvak schakelt een functie aan en uit. ------------------------------- ****419;105;21(keyword)radio button; control radiodrukknop; besturingselement ****419;168;21(keyword)control; radio button besturingselement; radiodrukknop ****419;231;22(keyword)option button; control optieknop; besturingselement ****419;295;22(keyword)control; option button besturingselement; optieknop ****419;337;13(text:p)Option Button Optieknop ------------------------------- ****429;76;43(help:help-text)Click this icon to create an option button. Klik dit icoon om een optieknop te creëren. ****429;136;298() This enables the user to choose one of several options. Grouped option buttons must have consecutive tab indices. They are commonly encircled by a group box. If you have two groups of option buttons, you must assign to the group frame a tab index that is between the tab indices of the two groups. Dit maakt het de gebruiker mogelijk één uit de verschillende opties te kiezen. Gegroepeerde optieknoppen moeten opeenvolgende tabindexen hebben. Zij worden normaal gesproken omgeven door een groepvak. Als u twee groepen optieknoppen heeft, moet u aan het groepvak een tabindex toekennen die tussen de tabindexen van de twee groepen ligt. ------------------------------- ****434;103;19(keyword)fixed text; control vaste tekst; besturingselement ****434;164;19(keyword)control; fixed text besturingselement; vaste tekst ****434;225;13(keyword)text; control tekst; besturingselement ****434;280;13(keyword)control; text besturingselement; tekst ****434;335;20(keyword)label field; control labelveld; besturingselement ****434;397;20(keyword)control; label field besturingselement; labelveld ****434;437;11(text:p)Label Field Labelveld ------------------------------- ****444;76;54(help:help-text)Click this icon to create a field for displaying text. Klik dit icoon om een veld voor het weergeven van tekst te creëren. ****444;147;94() These labels are only for displaying predefined text. Entries cannot be made in these fields. Deze labels zijn alleen voor het weergeven van voorgedefinieerde tekst. Invoer kan niet worden gepleegd in deze velden. ------------------------------- ****449;98;13(keyword)edit; control bewerken; besturingselement ****449;153;13(keyword)control; edit besturingselement; bewerken ****449;208;17(keyword)text box; control tekstvak; beheer ****449;267;17(keyword)control; text box beheer; tekstvak ****449;304;8(text:p)Text Box Tekstvak ------------------------------- ****459;76;46(help:help-text)Click this icon to create a text edit control. Klik dit icoon om een tekstbewerk-besturingselement te creëren. ****459;139;51() In edit controls the user can enter and edit text. In bewerken-bedieningselementen kan de gebruiker tekst intoetsen en bewerken. ------------------------------- ****464;101;17(keyword)list box; control lijstvak; besturingselement ****464;160;17(keyword)control; list box besturingselement; lijstvak ****464;197;8(text:p)List Box Lijstvak ------------------------------- ****474;76;37(help:help-text)Click this icon to create a list box. Klik dit icoon om een lijstvak te creëren . ****474;130;50() The user can choose from the entries in the list. De gebruiker kan kiezen uit de items in de lijst. ------------------------------- ****479;102;18(keyword)combo box; control combobox; besturingselement ****479;162;18(keyword)control; combo box besturingselement; combobox ****479;200;9(text:p)Combo Box Combinatievak ------------------------------- ****489;76;38(help:help-text)Click this icon to create a combo box. Klik dit icoon om een combinatievak te creëren. ****489;131;183() It is a one line list box that can be opened by the user. The property "read only" determines if the user can enter values into the list. The user can choose from the list. Het is een éénregelig lijstvak dat kan worden geopend door de gebruiker. De eigenschap "alleen lezen" bepaalt of de gebruiker waarden in de lijst kan intoetsen. De gebruiker kan kiezen uit de lijst. ------------------------------- ****494;104;19(keyword)scroll bar; control schuifbalk; besturingselement ****494;165;19(keyword)control; scroll bar besturingselement; schuifbalk ****494;226;30(keyword)horizontal scroll bar; control horizontale schuifbalk; besturingselement ****494;298;30(keyword)control; horizontal scroll bar besturingselement; horizontale schuifbalk ****494;370;19(keyword)scroll bar; control schuifbalk; besturingselement ****494;431;19(keyword)control; scroll bar besturingselement; schuifbalk ****494;470;21(text:p)Horizontal Scroll Bar Horizontale schuifbalk ------------------------------- ****503;75;64(help:help-text)Click this icon to create a horizontal scroll bar in the dialog. Klik dit icoon om een horizontale schuifbalk in het dialoogvenster te creëren. ------------------------------- ****507;104;28(keyword)vertical scroll bar; control verticale schuifbalk; besturingselement ****507;174;28(keyword)control; vertical scroll bar besturingselement; verticale schuifbalk ****507;222;19(text:p)Vertical Scroll Bar Verticale schuifbalk ------------------------------- ****516;75;62(help:help-text)Click this icon to create a vertical scroll bar in the dialog. Klik dit icoon om een verticale schuifbalk in het dialoogvenster te creëren. ------------------------------- ****520;102;18(keyword)group box; control groepvak; besturingselement ****520;162;18(keyword)control; group box besturingselement; groepvak ****520;200;9(text:p)Group Box Groepvak ------------------------------- ****530;76;69(help:help-text)Click this icon to create a frame to visually group several controls. Klik dit icoon om een frame te creëren om, visueel, verschillende bedieningselementen te groeperen. ****530;162;82() In this way, you can, for example, group check boxes or option fields in a frame. Op deze manier kunt u bijvoorbeeld vinkvakken of optievelden in een frame groeperen. ------------------------------- ****544;44;151(text:p)To define two different groups of option buttons, the tab index of the group frame must be between the tab indices of the two groups of option buttons. Om twee verschillende groepen van optieknoppen te definiëren, moet de tabindex van het groepframe zich bevinden tussen de tabindexen van de twee groepen optieknoppen. ------------------------------- ****549;105;21(keyword)progress bar; control voortgangsbalk; besturingselement ****549;168;21(keyword)control; progress bar besturingselement; voortgangsbalk ****549;209;12(text:p)Progress Bar Voortgangsbalk ------------------------------- ****558;75;55(help:help-text)Click this icon to create a progress bar in the dialog. Klik dit icoon om een voortgangsbalk in het dialoogvenster te creëren. ------------------------------- ****562;104;19(keyword)fixed line; control vaste lijn; besturingselement ****562;165;19(keyword)control; fixed line besturingselement; vaste lijn ****562;226;24(keyword)horizontal line; control horizontale lijn; besturingselement ****562;292;24(keyword)control; horizontal line besturingselement; horizontale lijn ****562;358;13(keyword)line; control lijn; besturingselement ****562;413;13(keyword)control; line besturingselement; lijn ****562;446;15(text:p)Horizontal Line Horizontale lijn ------------------------------- ****571;75;58(help:help-text)Click this icon to create a horizontal line in the dialog. Klik dit icoon om een horizontaal lijn in het dialoogvenster te creëren. ------------------------------- ****575;104;22(keyword)vertical line; control verticale lijn; besturingselement ****575;168;22(keyword)control; vertical line besturingselement; verticale lijn ****575;210;13(text:p)Vertical Line Verticale lijn ------------------------------- ****584;75;56(help:help-text)Click this icon to insert a vertical line in the dialog. Klik dit icoon om een verticale lijn in het dialoogvenster in te voegen. ------------------------------- ****588;103;19(keyword)date field; control datumveld; besturingselement ****588;164;19(keyword)control; date field besturingselement; datumveld ****588;203;10(text:p)Date Field Datumveld ------------------------------- ****598;76;39(help:help-text)Click this icon to create a date field. Klik dit icoon om een datumveld te creëren. ------------------------------- ****603;40;108(text:p)If the date field has the property "dropdown", the user can drop down a calendar to select a date. Als het datumveld de eigenschap "dropdown" heeft, kan de gebruiker een kalender naar beneden laten vallen om een datum te selecteren. ------------------------------- ****604;103;19(keyword)time field; control tijdveld; besturingselement ****604;164;19(keyword)control; time field besturingselement; tijdveld ****604;203;10(text:p)Time Field Tijdveld ------------------------------- ****614;76;39(help:help-text)Click this icon to create a time field. Klik dit icoon om een tijdveld te creëren. ------------------------------- ****619;106;22(keyword)numeric field; control numeriek veld; besturingselement ****619;170;22(keyword)control; numeric field besturingselement; numeriek veld ****619;212;13(text:p)Numeric Field Numeriek veld ------------------------------- ****629;76;42(help:help-text)Click this icon to create a numeric field. Klik dit icoon om een numeriek veld te creëren. ------------------------------- ****634;107;23(keyword)currency field; control valutaveld; besturingselement ****634;172;23(keyword)control; currency field besturingselement; valutaveld ****634;215;14(text:p)Currency Field Valuta Veld ------------------------------- ****644;76;43(help:help-text)Click this icon to create a currency field. Klik dit icoon om een valuta veld te creëren. ------------------------------- ****649;108;24(keyword)formatted field; control opgemaakt veld; besturingselement ****649;174;24(keyword)control; formatted field besturingselement; opgemaakt veld ****649;218;15(text:p)Formatted Field Opgemaakt veld ------------------------------- ****659;76;44(help:help-text)Click this icon to create a formatted field. Klik dit icoon om een opgemaakt veld te creëren. ****659;137;115() That is, a text box where you can define how the inputs and outputs are formatted and which limiting values apply. Dat is een tekstvak waar u kunt definiëren hoe de invoer en uitvoer moeten worden opgemaakt en welke grenswaarden moeten worden toegepast. ------------------------------- ****664;106;22(keyword)pattern field; control patroonveld; besturingselement ****664;170;22(keyword)control; pattern field besturingselement; patroonveld ****664;234;21(keyword)masked field; control gemaskeerd veld; besturingselement ****664;297;21(keyword)control; masked field besturingselement; gemaskeerd veld ****664;338;13(text:p)Pattern Field Patroonveld ------------------------------- ****674;76;58(help:help-text)Click this icon to create a pattern field or masked field. Klik dit icoon om een patroonveld of gemaskeerd veld te creëren. ****674;151;202() Masked fields consist of an input mask and a character mask. The input mask determines which user data can be entered. The character mask determines the state of the masked field when loading the form. Gemaskeerde velden bestaan uit een invoermasker en een karaktertekenmasker. Het invoermasker bepaalt welke gebruikersgegevens kunnen worden ingevoerd. Het karaktertekenmasker bepaalt de toestand van het gemaskeerde veld bij het laden van het formulier. ------------------------------- ****679;105;23(keyword)file selection; control bestandsselectie; besturingselement ****679;169;23(keyword)control; file selection besturingselement; bestandsselectie ****679;211;14(text:p)File Selection Bestandsselectie ------------------------------- ****689;76;65(help:help-text)Click this icon to create a button that enables a file selection. Klik dit icoon om een drukknop te creëren die het mogelijk maakt een bestand te selecteren. ------------------------------- ****694;100;18(keyword)selection; control selectie; besturingselement ****694;159;18(keyword)control; selection besturingselement; selectie ****694;196;6(text:p)Select Selecteren ------------------------------- ****704;76;138(help:help-text)Click this icon to activate or deactivate the Selection mode. In this mode, you can select the controls in a dialog in order to edit them. Klik dit icoon om de Selectie modus te activeren of te deactiveren. In deze modus, kunt u de besturingselementen in een dialoogvenster selecteren om ze te bewerken. ------------------------------- ****709;147;19(keyword)properties; control eigenschappen; besturingselement ****709;207;19(keyword)control; properties besturingselement; eigenschappen ****709;245;10(text:p)Properties Eigenschappen ------------------------------- ****718;75;79(help:help-text)Click here to open a dialog for editing the properties of the selected control. Klik hier om een dialoogvenster te openen om de eigenschappen van het geselecteerde besturingselement te bewerken. ------------------------------- ****722;102;18(keyword)test mode; control testmodus; besturingselement ****722;161;18(keyword)control; test mode besturingselement; testmodus ****722;198;18(text:p)Activate Test Mode Activeren testmodus ------------------------------- ****731;75;76(help:help-text)Activates the test mode. Use the dialog closer to return to the design mode. Activeert de testmodus. Gebruik de dialoogvenster-sluiter om terug te keren naar de ontwerpmodus. ####Text\SBASIC\guide\control_properties.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;43(subject)Properties of Controls in the Dialog Editor Eigenschappen van besturingselementen in de Dialoog-editor ------------------------------- ****107;58;43(keyword)properties of controls in the dialog editor eigenschappen van besturingselementen in de dialoog-editor ****107;188;43(help:link)Properties of Controls in the Dialog Editor Eigenschappen van besturingselementen in de Dialoog-editor ------------------------------- ****108;39;268(text:p)Colors, names, sizes, and interactions of controls are known as their properties. These properties can be changed when a dialog is created, as well as under program control during runtime. Some properties can only be changed at runtime, some other only in design mode. Kleuren, namen, afmetingen, en interacties van besturingselementen zijn bekend als hun eigenschappen. Deze eigenschappen kunnen worden veranderd wanneer een dialoogvenster wordt gemaakt, evenals onder programmabeheer gedurende runtime. Sommige eigenschappen kunnen alleen worden veranderd tijdens runtime, enige andere alleen in ontwerpmodus. ------------------------------- ****109;39;100(text:p)To change the properties of controls in design mode, use the properties window in the dialog editor. Om de eigenschappen van besturingselementen in ontwerpmodus te veranderen, gebruik het eigenschappenvenster in de dialoog-editor. ------------------------------- ****112;34;84(text:p)Click on the control for which you want to edit the properties, then click the icon Klik op het besturingselement waarvan u de eigenschappen wilt bewerken, klik dan op het icoon ****112;150;10(text:span)Properties Eigenschappen ****112;172;16() in the toolbar in de werkbalk ****112;220;8(text:span)Controls Besturingselementen ****112;240;32(). You see the properties window. . U ziet het eigenschappenvenster. ------------------------------- ****123;45;106(text:p)In the properties window, you see all the properties of the previously selected control that you can edit. In het eigenschappenvenster, ziet u alle de eigenschappen van het eerder geselecteerde besturingselement dat u kunt bewerken. ------------------------------- ****129;32;14(text:p)Related Topics Gerelateerde onderwerpen ------------------------------- ####Text\SBASIC\guide\create_dialog.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;21(subject)Create a Basic Dialog Maken van een BASIC Dialoogvenster ------------------------------- ****146;59;21(keyword)Basic dialog creation Maken van een BASIC Dialoogvenster ****146;162;21(help:link)Create a Basic Dialog Maken van een BASIC Dialoogvenster ------------------------------- ****147;40;49(text:p)To create a new Basic dialog, proceed as follows: Om een nieuw BASIC dialoogvenster te creëren, ga als volgt te werk: ------------------------------- ****150;35;66(text:p)If you are no longer in the Basic IDE, call it now: open the menu Als u niet meer in de Basic IDE bent, roep het nu aan: open het menu ****150;133;13(text:span)Tools - Macro Extra - Macro ****150;158;11(). Click on . Klik op ****150;201;9(text:span)Organizer Beheren... ****150;222;20() to call the dialog om op te roepen het dialoogvenster ****150;274;15(text:span)Macro Organizer Macro's beheren ****150;301;1(). . ------------------------------- ****165;35;117(text:p)In the dialog, below the entry "soffice" click on "Standard - Module1", then click on the button In het dialoogvenster, onder het item "soffice" klik op "Standard", klik dan op de knop ****165;184;10(text:span)New Dialog Nieuwe dialoog ****165;206;78(). In the dialog box enter a new name for the dialog, then click on the button . In het dialoogvak toets een nieuwe naam in voor het dialoogvenster, klik dan op de knop ****165;316;4(text:span)Edit Bewerken ****165;332;1(). . ------------------------------- ****180;35;46(text:p)To edit the name of the dialog, hold down the Om de naam van de dialoogvenster te bewerken, houd ingedrukt de ****180;135;5(text:p)(Alt) (Alt) ****180;166;5()(Alt) (Alt) ****180;200;94() key and click on the name "Dialog1". Now you can overwrite the name with a new one. toets en klik op de naam "Dialog1". Nu kunt u de naam met een nieuwe overschrijven. ------------------------------- ****183;40;127(text:p)At this time, you will only see the empty dialog on your screen. All the necessary tools are contained in the floating toolbar Nu zult u alleen het lege dialoogvenster op uw scherm zien. Alle benodigde werktuigen zijn opgenomen in de zwevende werkbalk ****183;208;8(text:span)Controls Besturingselementen ****183;228;106(), which you can find in the object bar of the dialog editor. Open the toolbar and position it accordingly. , welke u kunt vinden in de objectbalk van de dialoogeditor. Open de werkbalk en positioneer het overeenkomstig. ------------------------------- ****184;33;14(text:p)Related Topics Gerelateerde onderwerpen ------------------------------- ####Text\SBASIC\guide\insert_control.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;15;36(subject)Create Controls in the Dialog Editor Maken besturingselementen in de Dialoog-editor ------------------------------- ****98;58;37(keyword)controls in the dialog editor; create besturingselementen in de dialoog-editor; maken ****98;178;36(help:link)Create Controls in the Dialog Editor Maken besturingselementen in de Dialoog-editor ------------------------------- ****99;39;64(text:p)The tools to create a Basic dialog are contained in the toolbar De werktuigen om een BASIC dialoogvenster te creëren zijn opgenomen in de werkbalk ****99;135;8(text:span)Controls Besturingselementen ****99;155;108(). You can find it in the object bar of the dialog editor, and you can position it on the screen as you like. . U kunt het vinden in de objectbalk van de dialoogeditor en u kunt het positioneren op het scherm als u dat wilt. ------------------------------- ****102;34;23(text:p)Click e.g. on the icon Klik bijv. op het icoon ****102;89;11(text:span)Label Field Labelveld ****102;112;16() in the toolbar in de werkbalk ****102;160;8(text:span)Controls Besturingselementen ****102;180;52(). The mouse pointer gets the shape of a small cross. . de muisaanwijzer verandert naar de vorm van een klein kruis. ------------------------------- ****105;34;116(text:p)In the dialog insert the label field by dragging a rectangle with the mouse. Position it into the left upper corner. Voeg in het dialoogvenster het labelveld in door een rechthoek met de muis te slepen. Positioneer het in de linkerbovenhoek. ------------------------------- ****108;39;48(text:p)This positions the first control in your dialog. Dit plaatst het eerste besturingselement in uw dialoogvenster. ------------------------------- ****109;32;14(text:p)Related Topics Gerelateerde onderwerpen ------------------------------- ####Text\SBASIC\guide\sample_code.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;50(subject)Program Examples for Controls in the Dialog Editor Programmavoorbeelden voor besturingselementen in de Dialoog-editor ------------------------------- ****81;59;44(keyword)program examples for controls; dialog editor programmavoorbeelden voor besturingselementen; dialoog-editor ****81;183;50(help:link)Program Examples for Controls in the Dialog Editor Programmavoorbeelden voor besturingselementen in de Dialoog-editor ------------------------------- ****82;40;33(text:p)For these examples, create a new Voor deze voorbeelden, creëer een nieuw ****82;95;6(help:link)dialog dialoogvenster ****82;113;15() with the name met de naam ****82;160;7(text:span)Dialog1 Dialoog1 ****82;179;57(). In the dialog editor, create the following controls: a . In de dialoogeditor, creëer de volgende bestuingselementen: een ****82;268;9(text:span)check box vinkvak ****82;289;15() with the name met de naam ****82;336;9(text:span)CheckBox1 VinkVak1 ****82;357;4(), a , een ****82;393;11(text:span)label field labelveld ****82;416;15() with the name met de naam ****82;463;6(text:span)Label1 Label1 ****82;481;4(), a , een ****82;517;6(text:span)button drukknop ****82;535;15() with the name met de naam ****82;582;14(text:span)CommandButton1 DrukKnop1 ****82;608;8(), and a , en een ****82;648;8(text:span)list box lijstvak ****82;668;15() with the name met de naam ****82;715;8(text:span)ListBox1 LijstVak1 ****82;735;1(). . ------------------------------- ****92;46;90(text:p)Use consistent writing (upper/lower case) when you attach a control to an object variable. Gebruik een vaste schrijfwijze (Hoofd-/kleine letters) als u een besturingselement aan een objectvariabele verbindt. ------------------------------- ****97;81;22(keyword)example; load a dialog voorbeeld; laden van een dialoogvenster ****97;122;35(text:p)Global Function for Loading Dialogs Globale functie voor het laden van Dialoogvensters ------------------------------- ****98;39;84(text:p)Function LoadDialog(Libname as String, DialogName as String, Optional oLibContainer) Function LoadDialog(Libname as String, DialoogNaam as String, Optioneel oLibContainer) ------------------------------- ****99;39;18(text:p)Dim oLib as Object Dim oLib as Object ------------------------------- ****100;39;24(text:p)Dim oLibDialog as Object Dim oLibDialog as Object ------------------------------- ****101;39;28(text:p)Dim oRuntimeDialog as Object Dim oRuntimeDialog as Object ------------------------------- ****102;55;33(text:p)If IsMissing(oLibContainer ) then If IsMissing(oLibContainer ) then ------------------------------- ****103;71;31(text:p)oLibContainer = DialogLibraries oLibContainer = DialogLibraries ------------------------------- ****104;55;6(text:p)End If End If ------------------------------- ****105;55;34(text:p)oLibContainer.LoadLibrary(LibName) oLibContainer.LoadLibrary(LibName) ------------------------------- ****106;55;39(text:p)oLib = oLibContainer.GetByName(Libname) oLib = oLibContainer.GetByName(Libname) ------------------------------- ****107;55;39(text:p)oLibDialog = oLib.GetByName(DialogName) oLibDialog = oLib.GetByName(DialoogNaam) ------------------------------- ****108;55;44(text:p)oRuntimeDialog = CreateUnoDialog(oLibDialog) oRuntimeDialog = CreateUnoDialog(oLibDialog) ------------------------------- ****109;55;29(text:p)LoadDialog() = oRuntimeDialog LoadDialog() = oRuntimeDialog ------------------------------- ****110;39;12(text:p)End Function end function ------------------------------- ****111;59;25(keyword)example; display a dialog voorbeeld; weergeven een dialoogvenster ****111;103;16(text:p)Display a Dialog Een dialoogvenster weergeven ------------------------------- ****112;39;34(text:p)rem global definition of variables rem globale definitie van variabelen ------------------------------- ****113;39;22(text:p)Dim oDialog1 AS Object Dim oDialog1 as Object ------------------------------- ****115;39;16(text:p)Sub StartDialog1 Sub StartDialoog1 ------------------------------- ****116;55;64(text:p)oDialog1 = LoadDialog("Standard", "Dialog1") oDialog1 = LoadDialog("Standard", "Dialoog1") ------------------------------- ****117;55;18(text:p)oDialog1.Execute() oDialoog1.Execute() ------------------------------- ****118;39;7(text:p)end sub end sub ------------------------------- ****119;59;44(keyword)example; read or edit properties of controls voorbeeld; lezen of bewerken van eigenschappen van besturingselementen ****119;122;50(text:p)Read or Edit Properties of Controls in the Program Lezen of bewerken van eigenschappen van besturingselementen in het programma ------------------------------- ****120;39;11(text:p)Sub Sample1 Sub Voorbeeld1 ------------------------------- ****121;39;64(text:p)oDialog1 = LoadDialog("Standard", "Dialog1") oDialog1 = LoadDialog("Standard", "Dialoog1") ------------------------------- ****122;39;20(text:p)REM get dialog model REM toon dialoogvenster model ------------------------------- ****123;39;30(text:p)oDialog1Model = oDialog1.Model oDialog1Model = oDialoog1.Model ------------------------------- ****124;39;26(text:p)REM display text of Label1 REM weergeven tekst van Label1 ------------------------------- ****125;39;49(text:p)oLabel1 = oDialog1.GetControl("Label1") oLabel1 = oDialoog1.GetControl("Label1") ------------------------------- ****126;39;19(text:p)MsgBox oLabel1.Text MsgBox oLabel1.Text ------------------------------- ****127;39;35(text:p)REM set new text for control Label1 REM zet nieuwe tekst voor besturingselement Label1 ------------------------------- ****128;39;36(text:p)oLabel1.Text = "New Files" oLabel1.Text = "Nieuwe bestanden" ------------------------------- ****129;39;54(text:p)REM display model properties for the control CheckBox1 REM weergeven modeleigenschappen voor het besturingselement VinkVak1 ------------------------------- ****130;39;41(text:p)oCheckBox1Model = oDialog1Model.CheckBox1 oCheckBox1Model = oDialog1Model.VinkVak1 ------------------------------- ****131;39;37(text:p)MsgBox oCheckBox1Model.Dbg_Properties MsgBox oCheckBox1Model.Dbg_Properties ------------------------------- ****132;39;52(text:p)REM set new state for CheckBox1 for model of control REM zet nieuwe toestand voor VinkVak1 voor model van besturingselement ------------------------------- ****133;39;25(text:p)oCheckBox1Model.State = 1 oCheckBox1Model.State = 1 ------------------------------- ****134;39;55(text:p)REM display model properties for control CommandButton1 REM weergeven modeleigenschappen voor besturingselement DrukKnop1 ------------------------------- ****135;39;41(text:p)oCMD1Model = oDialog1Model.CommandButton1 oCMD1Model = oDialog1Model.DrukKnop1 ------------------------------- ****136;39;32(text:p)MsgBox oCMD1Model.Dbg_Properties MsgBox oCMD1Model.Dbg_Properties ------------------------------- ****137;39;48(text:p)REM display properties of control CommandButton1 REM weergeven eigenschappen van besturingselement DrukKnop1 ------------------------------- ****138;39;55(text:p)oCMD1 = oDialog1.GetControl("CommandButton1") oCMD1 = oDialoog1.GetControl("DrukKnop1") ------------------------------- ****139;39;27(text:p)MsgBox oCMD1.Dbg_Properties MsgBox oCMD1.Dbg_Properties ------------------------------- ****140;39;18(text:p)REM execute dialog REM uitvoeren dialoogvenster ------------------------------- ****141;39;18(text:p)oDialog1.Execute() oDialog1.Execute() ------------------------------- ****142;39;7(text:p)End Sub end sub ------------------------------- ****144;59;29(keyword)example; add entry to ListBox voorbeeld; toevoegen item aan Lijstvak ****144;107;25(text:p)Add an Entry to a ListBox Toevoegen van een item aan een lijstvak ------------------------------- ****145;39;12(text:p)Sub AddEntry Sub ToevoegenItem ------------------------------- ****146;39;64(text:p)oDialog1 = LoadDialog("Standard", "Dialog1") oDialog1 = LoadDialog("Standard", "Dialoog1") ------------------------------- ****147;39;35(text:p)REM adds a new entry to the ListBox REM voegt een nieuw item toe aan het lijstvak ------------------------------- ****148;55;30(text:p)oDialog1Model = oDialog1.Model oDialog1Model = oDialoog1.Model ------------------------------- ****149;55;52(text:p)oListBox = oDialog1.GetControl("ListBox1") oListBox = oDialoog1.GetControl("LijstVak1") ------------------------------- ****150;55;21(text:p)dim iCount as integer dim iCount as Integer ------------------------------- ****151;55;27(text:p)iCount = oListbox.ItemCount iCount = oListbox.ItemCount ------------------------------- ****152;55;53(text:p)oListbox.additem("New Item" & iCount,0) oListbox.additem("Nieuw Item" & iCount,0) ------------------------------- ****153;39;7(text:p)end sub end sub ------------------------------- ****154;59;34(keyword)example; remove entry from ListBox voorbeeld; verwijderen van een item uit lijstvak ****154;112;30(text:p)Remove an Entry from a ListBox Verwijderen van een item uit een lijstvak ------------------------------- ****155;39;15(text:p)Sub RemoveEntry Sub VerwijderItem ------------------------------- ****156;39;64(text:p)oDialog1 = LoadDialog("Standard", "Dialog1") oDialog1 = LoadDialog("Standard", "Dialoog1") ------------------------------- ****157;39;43(text:p)REM remove the first entry from the ListBox REM verwijder het eerste item uit het lijstvak ------------------------------- ****158;55;30(text:p)oDialog1Model = oDialog1.Model oDialog1Model = oDialoog1.Model ------------------------------- ****159;55;52(text:p)oListBox = oDialog1.GetControl("ListBox1") oListBox = oDialoog1.GetControl("Lijstvak1") ------------------------------- ****160;55;25(text:p)oListbox.removeitems(0,1) oListbox.removeitems(0,1) ------------------------------- ****161;39;7(text:p)end sub end sub ------------------------------- ****162;33;14(text:p)Related Topics Gerelateerde onderwerpen ------------------------------- ####Text\SBASIC\guide\show_dialog.xml translated (by/date): (Dick Groskamp 27-02-2003) reviewed (by/date) : (not reviewed yet) ------------------------------- ****6;16;32(subject)Show a Dialog Using Program Code Toon een dialoogvenster met behulp van programmacode ------------------------------- ****68;59;32(keyword)show a dialog using program code toon een dialoogveenster met behulp van programmacode ****68;171;32(help:link)Show a Dialog Using Program Code Toon een dialoogvenster met behulp van programmacode ------------------------------- ****69;40;141(text:p)After creating a dialog, you want to use it from inside your program code. You are still in the dialog editor, so you first go back into the Na het maken van een dialoogvenster wilt u het gebruiken in uw programmacode. U bent nog steeds in de dialoog-editor, dus u gaat eerst terug naar de ****69;199;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****69;230;11() Basic IDE. BASIC IDE. ------------------------------- ****70;59;34(keyword)toggle between modules and dialogs omschakelen tussen modules en dialogvensters ****70;112;34(text:p)Toggle between Modules and Dialogs Omschakelen tussen modules en dialoogvensters ------------------------------- ****71;40;217(text:p)There are two tabs in the lower part of the dialog editor, which are used to toggle between dialog and module. If you use multiple modules or dialogs, you see more tabs to jump to a dialog or module by name. Click on Er zijn twee tabs in het onderste deel van de dialoog-editor, welke worden gebruikt om om te schakelen tussen dialoogvenster en module. Als u meerdere modules of dialoogvensters gebruikt, ziet u meer tabs door te springen naar een dialoogvenster of module op naam. Klik op ****71;289;7(text:span)Module1 Module1 ****71;308;26(), now you are back in the , u bent nu terug in de ****71;352;12(help:productname)%PRODUCTNAME %PRODUCTNAME ****71;383;11() Basic IDE. BASIC IDE. ------------------------------- ****72;37;42(text:p)Show a Dialog from within the Program Code Toon een dialoogvenster in de programmacode ------------------------------- ****73;40;27(text:p)Create a sub with the name Maak een sub met de naam ****73;99;11(text:span)Dialog1Show Dialoog1Show ****73;122;1(). . ------------------------------- ****74;39;15(text:p)Sub Dialog1Show Sub Dialoog1Show ------------------------------- ****75;55;11(text:p)oDialog1 = oDialog1 = ****75;105;10(help:link)LoadDialog LoadDialog ****75;127;43()("Standard", "Dialog1") ("Standard", "Dialoog1") ------------------------------- ****76;55;18(text:p)oDialog1.Execute() oDialog1.Execute() ------------------------------- ****77;39;7(text:p)End Sub end sub ------------------------------- ****78;40;70(text:p)Without using "LoadDialog" you can call the code as follows: Zonder gebruik te maken van "LoadDialog" kunt u de code oproepen als volgt: ------------------------------- ****79;39;15(text:p)Sub Dialog1Show Sub Dialoog1Show ------------------------------- ****80;39;51(text:p)DialogLibraries.LoadLibrary( "Standard" ) DialogLibraries.LoadLibrary( "Standard" ) ------------------------------- ****81;39;62(text:p)oDialog1 = CreateUnoDialog( DialogLibraries.Standard.Dialog1 ) oDialog1 = CreateUnoDialog( DialogLibraries.Standard.Dialog1 ) ------------------------------- ****82;39;18(text:p)oDialog1.Execute() oDialog1.Execute() ------------------------------- ****83;39;7(text:p)End Sub end sub ------------------------------- ****85;40;21(text:p)If you start the sub Als u start de sub ****85;93;11(text:span)Dialog1Show Dialoog1Show ****85;116;117(), first your dialog appears. Close this dialog with the closer in the title bar, and the program continues execution. , verschijnt eerst uw dialoogvenster. Sluit dit dialoogvenster met de sluiter in de titelbalk en het programma vervolgt de uitvoering. ------------------------------- ****86;33;14(text:p)Related Topics Gerelateerde onderwerpen -------------------------------