VB提取字符串
我F盘有个文本F:\1.txt，内容格式如下
158621148 09530
158621149 23247
有很多行上面这样的数字格式，我要提取每行的倒数第一二位数字（如第一行就是30），然后输出到F:\2.txt。
接着再提取每行的倒数第四五位数字（如第一行就是09），然后输出到F:\3.txt。
希望大家帮帮忙，尽量详细一点，谢谢！~~~
[解决办法]
Private Sub Form_Load()
Dim tmp As String, M As Long
Open "F:\1.txt" For Input As #1
Open "F:\2.txt" For Output As #2
Open "F:\3.txt" For Output As #3
Do While Not EOF(1)
Line Input #1, tmp
If Len(tmp) > 5 Then
Print #2, Right(tmp, 2)
Print #3, Mid(tmp, Len(tmp) - 4, 2)
End If
Loop
Close #3
Close #2
Close #1
MsgBox "完成！"
End Sub
