| いくつかの方法はありますが、ここではマクロだけで対応する方法を紹介します。次の例は、与えられた文字列($orgStr)のうちで、半角英文字だけを大文字にします。手軽ですが、大量の文字列を変換するには向いているとは言えません(2バイト文字がある場合も考慮されていません)。
//------- サンプルマクロ -------//
$orgStr="abcDeFあいAAAbbbうえお*+-/ABcd";
call CaseToUPPER $orgStr;
message $$return;
endmacro;
CaseToUPPER:
##s = strlen( $$1 );
while( ##s > 0 ){
##s = ##s - 1;
##code = ascii( midstr( $$1, ##s, 1 ) );
if( ##code > 96 && ##code < 123 )##code = ##code - 32;
$$str = char( ##code ) + $$str;
}
return $$str;
// ---------------------------- //
|
|