ifstring2.via

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

// IfString2.lnl

application PE GUI;

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

string message;
string messageII;

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

end.