我寫了以下的程式﹐但是執行時出現compile error. Expected array。請問該如何寫arrar的code呢﹖
Private Sub cmdCreate_Click()
Dim name As String
Dim score As Integer
Open "c:\tempfile.txt" For Output As #1
For i = 1 To 4
name$ = InputBox("Student Name?", "Seq")
score = InputBox("Score?", "Seq")
Write #1, name$(i), score(i)
Next i
Close #1
End Sub
Private Sub cmdCreate_Click()
Dim name As String
Dim score As Integer
Open "c:\tempfile.txt" For Output As #1
For i = 1 To 4
name$ = InputBox("Student Name?", "Seq")
score = InputBox("Score?", "Seq")
Write #1, name$(i), score(i)
Next i
Close #1
End Sub
請先 登入 以發表留言。