ifstring1.via

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

// IfString1.lnl

application PE GUI entry main;

import MessageBox ascii lib "USER32.DLL",4;

string message[10];
string messageII[10];

frame main();

    message = "Compare"; messageII = "Compare";

    if(message=messageII) {
        MessageBox(0,"Equal","Strings..",0);
    } else {
        MessageBox(0,"Not Equal","Strings..",0);
    }
end;