高校问答浙江云森集团有限:vb 的小问题
来源：百度文库 编辑：高校问答 时间：2024/04/28 15:08:34
我用
Open "d:\a\我的程序\1.txt" For Append As #2
Input #2, s
读取文件，为什么会有错了，错误提示在“Input #2, s”行
s 是字符串变量啊，就提示编译错误
Open "d:\a\我的程序\1.txt" For Append As #2
Input #2, s
读取文件，为什么会有错了，错误提示在“Input #2, s”行
s 是字符串变量啊，就提示编译错误
On Error GoTo xp1
Dim strLine As String
Open "d:\a\我的程序\1.txt" For Input As #2 '打开选择的文件
Do Until EOF(2) '循环到结束
Line Input #2, strLine '一次读入一行，并赋值于strLine
T1.TEXT = T1.TEXT + strLine + Chr(13) + Chr(10)
Loop '循环
Close #2 '关闭打开的文件
Exit Sub
xp1:
MsgBox "晕！"
s是什么东西？
错误提示是什么？请放出来
格式错误，你要把s字符串Append（追加）到文件， 要把 Input改成print，
Input改成write
write #2,s
晕APPEND后面跟INPUT，你搞笑。。。。