ゴミが...
path = "" ;or sdim path
notesel textdata
input path,220,20
button goto "参照" ,*fileopen
button goto "OK" ,*pathsave
stop
*fileopen
dialog "*",16
objprm 0,refstr
noteadd refstr
stop
*pathsave
notesave "text.txt"
end