ab.com コミュニティ

ご報告ありがとうございます。次回のバージョンアップで修正しますので、今しばらくお待ちください。

#console

dim true_ans as char
dim user_ans as char

open "Test.txt" for output as #1

randomize
while -1
	true_ans = Fix(Rnd() * 4)
	input "数字",user_ans
	print #1, true_ans;
	print #1, ",";
	print #1, user_ans
	if true_ans = user_ans then
	    exit while
	else
		print "ハズレ"
    end if
wend

close #1
Exec "Test.txt"

はじめましてponponと申します。あまり自信がないのですが、
バグと思われるものを発見致しましたので報告します。

[code]#console

dim true_ans as char
dim user_ans as char

open "Test.txt" for output as #1

randomize
while -1
true_ans = Fix(Rnd() * 4)
input "数字",user_ans
print #1, true_ans;
print #1, ",";
print #1, user_ans
if true_ans = user_ans then
exit while
else
print "ハズレ"
end if
wend

close #1
Exec "Test.txt"[/code]

このようなプログラムを書くと、最後にファイルを開くときに
中身の数値がおかしくなっていました。ちなみに、変数の型
を"integer型"にすると直りました。

バージョンは 4.20.00 です。