求救阿,哪位大哥帮帮忙看看代码哪里错了?
Private Sub Form_Load()
Dim K As String, iCount As Integer
Dim Word As String, Explanation As String
K = App.Path
If Right(K, 1) <> "\" Then K = K + "\"
Open K + "dic.txt" For Input As #1
iCount = 1
Do Until EOF(1)
Input #1, Word, Explanation
If idxLetter(Asc(UCase(Word)) - 65) = 0 Then idxLetter(Asc(UCase(Word)) - 65) = iCount
List1.AddItem Word
iCount = iCount + 1
Loop
End Sub
这是我程序里面的代码,我用来实现从文本文件中读取纪录,可是我的纪录超过一定大小了,就会报错“调用参数错误”,谁能帮我看看阿?我急!!!