vb 文件模式错误

[复制链接]
查看11 | 回复3 | 2010-7-1 08:53:09 | 显示全部楼层 |阅读模式
Private Sub Command1_Click()
Open "e:\text.txt" For Output As #1
Print #1, "北京欢迎您府"
Close
MsgBox "输入数据成功"
End Sub
Private Sub Command2_Click()
Open "e:\text.txt" For Input As #1
Print #1, "上海", "青海"
Close
MsgBox "输入数据成功"
End Sub
执行到Print #1, "上海", "青海"时提示文件模式错误,我怎么看不出来哪儿有错啊?
input是从文件中获取数据返回为程序的变量,比如:
dim str as string
Open "e:\text.txt" For Input As #1
Print #1, str
Close
msgbox str
运行结果就是弹出提示框“北京欢迎您府”
回答者:机械l牛 -
按照这位老师的提示我试了一下,但是仍然提示模式错误。有没有完整的呢?我是初学,以前没有学过程序设计,所以所有都是零。谢谢各位指教。

回复

使用道具 举报

千问 | 2010-7-1 08:53:09 | 显示全部楼层
Private Sub Command1_Click()Open "e:\text.txt" For Output As #1 'output 为 输出模式,将数据输出到文件e:\text.txt Print #1, "北京欢迎您府" '输出的内容 Close MsgBox "输入数据成功"End SubPrivate Sub Command2_Click()Dim shuju As StringOpen "e:\text.txt" For Input As #1'Input 为 读入模式,将文件e:\text.txt的内容读入Input #1, shuju 'input将读入的数据赋值给变量 Clo
回复

使用道具 举报

千问 | 2010-7-1 08:53:09 | 显示全部楼层
汗.... 有两个错误,第一个错误如雪花飘飘所说,第二个错误是你没搞明白文件模式
output是程序把数据输入到文件中,如:Open "e:\text.txt" For Output As #1 Print #1, "北京欢迎您府" Close或:s= "北京欢迎您府"Open "e:\text.txt" For Out
回复

使用道具 举报

千问 | 2010-7-1 08:53:09 | 显示全部楼层
Print #1, "上海" & "青海" 或者Print #1, "上海,青海" 看你想用什么格式了
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行