Voor degenen die een eenvoudige Basic taal nodig hebben, zonder de complicaties van objecten en kaders , Just Basic van Liberty Basic is de perfecte keuze . De taal kan worden gedownload zonder kosten en iedereen die bekend is met de traditionele Basic kan oplopen tot bijna onmiddellijk versnellen . Hoewel de taal ontbreekt uitspraken als Druk af via en Format , biedt het aan de Tab en Space $ functies en deze zijn allemaal die nodig zijn om line-up decimale getallen . Door het volgen van een paar eenvoudige stappen , kunt u een geformatteerde boodschappenlijstje met behulp Gewoon eenvoudig te creëren . Wat je nodig hebt enkel Basic versie 1.01 Toon Meer Aanwijzingen 1 Open Gewoon Basic en maak een nieuw project . Klik op " File " en vervolgens " New Basic Source File . " Kopen van 2 Gebruik de opdracht Print om de titel en de kolomkoppen afdrukken als volgt : Print " Grocery List " printprint " Aantal " ; tab ( 5 ) ; " Beschrijving " ; tab ( 30 ) ; " Prijs " Print statement stuurt alle tekst die volgt op het afdrukvenster . De functie Tab verplaatst de cursor naar die kolom van de afdruk lijn . Hierdoor kunt u de kolomkoppen direct over de gegevens te plaatsen 3 Format de eerste regel van kruidenierswaren als volgt : . Print 5 ; tab ( 5 ) ; " Appels " ; tab ( 30 ) ; FormatNum $ ( 1.25 , 4 ) op Twitter Deze verklaring plaatst de hoeveelheid 5 in de eerste kolom , tabs boven aan de vijfde kolom en plaatsen het woord " Apples " dan tabs om kolom 30 de hoeveelheid 1.25 plaatsen . De FormatNum $ functie voegt leidt spaties om elk nummer te lijnen door komma 4 Voeg een paar meer lijnen van kruidenierswaren aan de lijst als volgt : afdruk 1 ; tabblad . ( 5 ) ; " Milk " , tab ( 30 ) ; FormatNum $ ( 2.29 , 4 ) print 1 ; tab ( 5 ) ; " stoofvlees " ; tab ( 30 ) ; FormatNum $ ( 12.95 , 4 ) druk 1 ; tab ( 5 ) ; " Chocolate Bar " ; tab ( 30 ) ; FormatNum $ ( 0.59 , 4 ) 5 Print het totale tabblad letter (5 ) ; . " , Total " , tab ( 30 ) ; . FormatNum $ ( 1,25 + 2,29 12,95 + 0,59 , 4 ) op Twitter Deze lijn plaatst onderstaande itembeschrijvingen het woord Total plaatst dan de totale onder de nummers < br > 6 Definieer de FormatNum $ functie . Plaats deze code onder de Print verklaringen . Functie FormatNum $ ( x , i ) s = $ str $ ( x ) l = Len ( str $ ( int ( x ) ) ) als l < i thens $ = ruimte $ ( i - l ) + s $ end ifFormatNum $ = s $ end functie de eerste regel verklaart de functie met x met het bedrag en ik met het aantal tekens gewenst voor de komma < . br lijn 2 > slaat het getal als een tekenreeks in de variabele s $ . lijn 3 telt het aantal cijfers op dit moment in de voorkant van de decimale punt . Als het nummer 12.34 , het gehele getal is 12 dus ik zal de waarde 2 bevatten . Lijn 3 tot en met 5 gebruikt de Space $ functie om ruimte toe te voegen aan de voorzijde van s $ . Als l is 2 en de gewenste ruimten ( i ) is 4 , moeten we twee extra ruimten voor s $ toe te voegen . Line 6 rendementen de geformatteerde nummer terug naar het oproepende programma . < Br > 7 Voer het programma uit . Klik op de SHIFT -en F5 -toetsen samen om de resultaten te zien .
|