nsfl10n

Lotus Notes/Domino のブログ。nsf:Notes Storage Facility。l10n:Localization。

スポンサーサイト

上記の広告は1ヶ月以上更新のないブログに表示されています。
新しい記事を書く事で広告が消せます。
  1. --/--/--(--) --:--:--|
  2. スポンサー広告|
  3. トラックバック(-)|
  4. コメント(-)

桁数を揃える新しいベターな方法

Pad.png


A new, better pad technique

 0埋めしたいとき、どんなに数が大きくても問題ない方法について解説します。@if で書き分けることも、とても大きな桁数を使うことで常にゼロ埋め状態にすることも出来る。このコードはxより小さかったら0を埋めて、もしxより大きかったらそのままにする方法だ。

Code

REM "The Code";
StringToPad := "12345";
StringLength := 4;
PadChar := "0";
UsualWay := @Right(@Repeat(PadChar; StringLength) + StringToPad ; StringLength);
MyWay:=@Repeat(PadChar;@Max(StringLength-@Length(StringToPad);0))+StringToPad;

REM "Sample outputs for testing";
@Prompt([OK];"よくある方法-Pad("+@Text(StringLength)+"): "+StringToPad;UsualWay);
@Prompt([OK];"私の方法-Pad("+@Text(StringLength)+"): "+StringToPad;MyWay)


==============

StringLength := 4の数字を変えてみると使い方が判ります。
スポンサーサイト
  1. 2005/05/14(土) 01:32:55|
  2. Designer|
  3. トラックバック:0|
  4. コメント:0
<<返答がある文書が削除されないようにするには | ホーム | ロータススクリプトからHTMLコードを取得するには>>

コメント

コメントの投稿

管理者にだけ表示を許可する

トラックバック

トラックバックURLはこちら
http://nsfl10n.blog9.fc2.com/tb.php/7-e314e623
07 | 2017/08 | 09
Sun Mon Tue Wed Thu Fri Sat
- - 1 2 3 4 5
6 7 8 9 10 11 12
13 14 15 16 17 18 19
20 21 22 23 24 25 26
27 28 29 30 31 - -

Search

Featured Entries

Recent Entries

Recent Comments

Recent Trackbacks

Archives

Category

Links

Ads

上記広告は1ヶ月以上更新のないブログに表示されています。新しい記事を書くことで広告を消せます。