XB++教程

http://www.pygzs.com/SoftWare/XBPP/Help/

函数、方法和语句，举例：

#include "XB++.h"
#pragma comment(lib,"XB++Lib.lib")
 
Integer TestLoopUntil()
BEGIN
    Integer i;
    DO
        i=i+1;
        If i==5 Then
            ExitDo;
        EndIf
    LoopUntil(i==10)
 
    ExitFunction(i);

    i=i+10;
 
    Return i;
END
 
Sub TestWhile()
BEGIN
    Integer i;
    DoWhile(i<10)
        If i==5 Then
            ExitDo;
        EndIf
        i=i+1;
    Loop
 
    Debug.Print(i);
END
 
Sub TestFor()
BEGIN
    Integer i, j;
 
    For(i, 1, 10)
 
        If i >= 5 Then
            ExitFor;
        Else
            j = j + 1;
        EndIf
 
    NEXT
 
    ExitSub;
 
    Debug.Print(j);
END
 
int main()
BEGIN
 
TestFor();
    TestWhile();
    Debug.Print(TestLoopUntil());
    
    Return 0;
END

累加求和，举例：

#include "XB++.h"
#pragma comment(lib,"XB++Lib.lib")
 
/*
累加求和
参数：
num - 累加次数
返回值：
累加求和结果
*/
Integer AddedToSum(Integer num)
BEGIN
    Integer i;
    Integer intSum;
 
    For(i, 1, num)
        intSum = intSum + i;//可使用intSum += i;
    NEXT
 
    Return intSum; 
END
 
int main()
BEGIN
    Integer a;
    Integer b;
 
    a = 12;
    b = AddedToSum(a);
    Debug.Print(b);
END