JCL_str_RandomAlphabets

/ JCL_str / By

指定した文字数のランダムなアルファベットを返す。大文字小文字が混じる。

使い方
$letters:=JCL_str_RandomAlphabets (3)

引数
$1: 文字数（整数）
$0: 文字列（文字数で指定した桁）

最初のランダムコマンドで大文字か小文字を決定し、あとは２６文字のいずれかに絞る。

//JCL_str_RandomAlphabets
//20250208 wat@KUALA LUMPUR
//id生成ロジックが必要になり、ランダムにアルファベットを返すメソッドを作成
//A:65 - Z:90, a:97 - z:122
C_LONGINT($1; $numOfLetters)
$numOfLetters:=$1
C_TEXT($0; $randoms)
$randoms:=""C_LONGINT($i)
C_TEXT($letter)
C_LONGINT($alphabetIndex)

For ($i; 1; $numOfLetters)
	//指定された文字数だけ連続
		If ((Random%2)=1)
		//大文字、Capital letter
		$alphabetIndex:=(Random%26)+65
		$letter:=Char($alphabetIndex)
	
		Else
 		//小文字、Small letter
		$alphabetIndex:=(Random%26)+97
		$letter:=Char($alphabetIndex)
	
		End if
 		$randoms:=$randoms+$letter
	
End for
 $0:=$randoms

大文字、小文字に加えて数字も混じるタイプはこちら。→　JCL_str_RandomAlphaNumbers