VB:这段代码里面的通用变量“Dim a(1 To 100) As Integer”有什么用啊?不要可以吗?
Dima(1To100)AsIntegerPrivateSubCmd1_Click()OpenApp.Path&"\in5.txt"ForInputAs#1Text1.T...
Dim a(1 To 100) As Integer
Private Sub Cmd1_Click()
Open App.Path & "\in5.txt" For Input As #1
Text1.Text = ""
For i = 1 To 100
Input #1, a(i)
Text1.Text = Text1.Text & a(i) & Space(5)
Next i
Close #1
End Sub 展开
Private Sub Cmd1_Click()
Open App.Path & "\in5.txt" For Input As #1
Text1.Text = ""
For i = 1 To 100
Input #1, a(i)
Text1.Text = Text1.Text & a(i) & Space(5)
Next i
Close #1
End Sub 展开
4个回答
展开全部
当然不行了
For i = 1 To 100
Input #1, a(i)
这里不是用到了 a 吗
将文件内容读入了 a 这个数组啊
For i = 1 To 100
Input #1, a(i)
这里不是用到了 a 吗
将文件内容读入了 a 这个数组啊
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
如果仅仅是这段代码 是可以不用的 但是如果还有其他地方调用那就不能去掉
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
你把FOR I=1 TO 100 改成FOR I=1 TO 101运行下看看提示,再把它改成FOR I=0 TO 100 运行看看提示你就知道DIM A(1 TO 100) AS Integer是什么意思了。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询