count.via

来自「一个用VB写的很好的编译器,功能超好,不过就是代码有点多,是进一步学习编译的好」· VIA 代码 · 共 17 行

// Count.lnl

application PE GUI entry main;

import MessageBox alias MessageBoxA lib "USER32.DLL",4;

frame main();
    dword i; string sBuffer;

    while(i<=10) {
        Format(sBuffer,"i = %d",i);
        MessageBox(0,sBuffer,"Count..",0);
        i = i + 1;
    }

    MessageBox(0,"Done.","Linley",0); 
end;