问题描述：
英语翻译
input as #1
do while not
lint.input #1,stra
text1.text=text1.text+stra+chr(13)+chr(10)
下面还有
open commondialog1.file name for out put as #2
write #2.text1.text
input as #1
do while not
lint.input #1,stra
text1.text=text1.text+stra+chr(13)+chr(10)
下面还有
open commondialog1.file name for out put as #2
write #2.text1.text
问题解答：
我来补答展开全文阅读