VB考试习题1231323

【文件属性】：

文件名称：VB考试习题1231323

文件大小：5.62MB

文件格式：DOC

更新时间：2013-11-09 06:15:55

asf

Option Base 1 Dim a(100) As Integer Dim i As Integer Private Sub Cmd1_Click() Open App.Path & "\in1.txt" For Input As #1 For i = 1 To 100 Input #1, a(i) Next