Использование аргументов командной строки

Тип Arguments позволяет работать с аргументами командной строки внутри программы на Small Basic. Объект Arguments включает в себя свойство Count, которое хранит в себе общее количество аргументов, а так же метод GetArgument(index), который позволяет получить доступ к каждому аргументу по его индексу (порядковому номеру).

Приведенная ниже программа выводит все простые числа, которые меньше, чем число, переданное в аргумент.

Чтобы выполнить пример, нужно сохранить текст программы на жестком диске вашего компьютера, затем скомпилировать ее нажатием на кнопку Run (F5). Получится .exe файл, который уже можно запускать с аргументом (например: testprogram.exe 10).

If (Arguments.Count = 1) Then
 maxNumber = Arguments.GetArgument(1)
 
 If (maxNumber < 2) Then
  TextWindow.WriteLine("No Primes less than 2.")
 EndIf
 
 For i = 2 To maxNumber
  CheckPrime()
  If (isPrime = "True") Then
   TextWindow.WriteLine(i)
  EndIf
 EndFor
Else
 TextWindow.WriteLine("Usage: prime.exe ")
EndIf

Sub CheckPrime
 isPrime = "True"
 For j = 2 To Math.SquareRoot(i)
  If (Math.Remainder(i, j) = 0) Then
   isPrime = "False"
  EndIf
 EndFor
EndSub

* This source code was highlighted with Source Code Highlighter.

Источник: официальный блог Small Basic.