UC知道跪求VB中的问题
来源：百度知道 编辑：UC知道 时间：2024/05/25 17:35:08
程序中这一句有问题：Print #1, "007", "周星驰", 100。改成write #1, "007", "周星驰", 100就没事，请问这是为什么？？？
Private Sub Command1_Click()
Open "e:\zhu zhong zhi\scores.dat" For Output As #1
Write #1, "200700103033", "朱中志", 98
Write #1, "200700103001", "袁文登", 88
Print #1, "007", "周星驰", 100
Close #1
End Sub
Private Sub Command2_Click()
Open "e:\zhu zhong zhi\scores.dat" For Input As #1
Dim no, name As String, score As Integer
Dim count, sum As Integer, ave As Single
Do While Not EOF(1)
Input #1, no, name, score
count = count + 1
sum = sum + score
Loop
ave = sum / count
Print ave
Close #1
End Sub
0
我要推荐
Private Sub Command1_Click()
Open "e:\zhu zhong zhi\scores.dat" For Output As #1
Write #1, "200700103033", "朱中志", 98
Write #1, "200700103001", "袁文登", 88
Print #1, "007", "周星驰", 100
Close #1
End Sub
Private Sub Command2_Click()
Open "e:\zhu zhong zhi\scores.dat" For Input As #1
Dim no, name As String, score As Integer
Dim count, sum As Integer, ave As Single
Do While Not EOF(1)
Input #1, no, name, score
count = count + 1
sum = sum + score
Loop
ave = sum / count
Print ave
Close #1
End Sub
0
我要推荐
print 后面跟的是字符串，输出的是字符串的内容。
write 后面跟什么就输出什么.
100不是字符所以不行：改成这样就可以了，Print #1, "007", "周星驰", "100"。
总的输出结果见下，自己比较一下print与write的区别。
"200700103033","朱中志",98
"200700103001","袁文登",88
007 周星驰 100
print 是在表单或表单控件上显示文字或图像，不能用于向文件写内容
必须要用write