Question

vb 从txt文本导入数据到MSFlexGrid1，可以从第五行开始导入吗，代码怎么写？

Answer 1

当然可以了
dim sA as string
Open App.Path & "\1.ini" For Input As #1
dim iA as integer
do while not eof(1)
Line Input # 1,sA
ia=ia+1
if ia>4 then ‘从第五行开始处理
'写导入代码
end if
loop

Answer 2

Private Sub Command1_Click()
Dim T As String, S() As String
Open "d:\vb.txt" For Input As #1
T = StrConv(InputB(LOF(1), 1), vbUnicode)
Close #1
S = Split(T, vbCrLf)
With MSFlexGrid1
.Rows = UBound(S) - 3
For i = 5 To UBound(S)
.TextMatrix(i - 4, 0) = S(i)
Next
End With
End Sub
'请参考。