簡単な例を。dim v as variantopen "test.txt" for output as #1for each v in array("あ",123.345,"い","-49","う",False,"え","お") write #1,v;nextclose