|
Pour ceux qui ont besoin d'un langage simple base sans les complications d'objets et de cadres , Just base de Liberty Basic est le choix parfait . La langue peut être téléchargé sans frais et quiconque est familier avec Basic traditionnel peut atteindre une vitesse presque immédiatement . Bien que la langue n'a pas des déclarations comme impression Utilisation et Format , elle offre l'onglet and Space $ fonctions et ce sont tous ceux qui sont nécessaires pour aligner les nombres décimaux . En suivant quelques étapes simples, vous pouvez créer une liste d'épicerie formaté en utilisant seulement Basic. Choses que vous devez
juste la version de base 1,01
Voir Plus Instructions
1 ouvert juste Basic et créez un nouveau projet. Cliquez sur " Fichier", puis " Nouveau fichier de base de Source ».
2 Utilisez l'instruction d'impression pour imprimer le titre et têtes de colonne comme suit :
Imprimer " liste d'épicerie " ImprimerImprimer " Quantité " , onglet (5); «Description» , onglet (30); «prix»
la déclaration d'impression envoie tout texte qu'il suit à la fenêtre d'impression. La fonction de tabulation déplace le curseur sur la colonne de la ligne d'impression. Cela vous permet de placer les en-têtes de colonnes directement sur les données
3 Format de la première ligne de produits d'épicerie comme suit: .
Impression 5 , onglet (5); "Pommes" , onglet (30) ; FormatNum $ ( 1,25, 4)
Cette déclaration met la quantité 5 à la première colonne , les onglets sur la cinquième colonne et place les mots « pommes », puis onglets pour colonne 30 de placer le montant de 1,25. La fonction FormatNum $ ajoute menant des espaces pour chaque numéro d'aligner en virgule
4 ajouter quelques lignes de produits d'épicerie à la liste comme suit :
impression 1 ; onglet. (5); "Milk " , onglet (30); FormatNum $ (2,29 , 4 ) print 1 , onglet (5 ), " Pot Roast " , onglet (30); FormatNum $ ( 12,95 , 4 ) print 1; onglet (5); " Chocolate Bar " , onglet (30); FormatNum $ (0,59 à 4) pour les 5 Imprimer le total
onglet d'impression (5); ». ; totale »; onglet (30); . FormatNum $ ( 1,25 + 2,29 + 0,59 +12.95 , 4)
Cette ligne place le mot Total dessous les descriptions d'article met ensuite le total ci-dessous les numéros
6 définir la fonction FormatNum $ . Placez ce code ci-dessous les instructions d'impression .
Fonction FormatNum $ (x, i) s = $ str $ ( x ) l = len ( str $ (int (x)) ) si l < i thens $ = espace $ ( i - l) $ end fonction
la de + s $ end ifFormatNum $ = la première ligne déclare la fonction de x contenant la quantité et I contenant le nombre de caractères désirés avant la virgule < . br> ligne 2 enregistre le nombre sous forme de chaîne de caractères dans la variable $ s .
ligne 3 compte le nombre de chiffres actuellement devant la virgule. Si le nombre est 12,34 , l'entier est de 12 alors je contiendra la valeur 2.
Ligne 3 à 5 utilise la fonction $ d'espace pour ajouter des espaces à l'avant de s $ . Si l est 2 et les espaces souhaités ( i ) est de 4 , nous devons ajouter deux places supplémentaires à l'avant de s $ .
Line 6 renvoie le nombre formaté retour au programme appelant .
< Br > 7 exécuter le programme. Cliquez sur les touches F5 Maj et en même temps de voir les résultats .
|
