UWSC辞典

構文

String = REPT( str, num )

引数

str

num

戻値

プログラム

//////////////////////////////////////////////////
// 【引数】
//   str 
//   num 
// 【戻値】
// 
//////////////////////////////////////////////////
FUNCTION REPT(str, num)
	DIM res
	IFB ABS(INT(num)) <> num THEN
		RESULT = ERR_VALUE
		EXIT
	ENDIF
	FOR n = 1 TO num
		res = res + str
	NEXT
	RESULT = res
FEND//////////////////////////////////////////////////
// 【引数】
//   str 
//   num 
// 【戻値】
// 
//////////////////////////////////////////////////
FUNCTION REPT(str, num)
	DIM res
	IFB ABS(INT(num)) <> num THEN
		RESULT = ERR_VALUE
		EXIT
	ENDIF
	FOR n = 1 TO num
		res = res + str
	NEXT
	RESULT = res
FEND