各位大侠：
    小弟是初学VB的，有一个问题请教：
    有一组数据存放在文本文件中(如E:\a.txt),当然放在dat格式文件中也可。我要用VB编写一个程序，把数据进行处理后输出到另一个文件中E:\b.txt。数据例如：
电压    电阻
2    10
4    30
5    20
1    25
3    100
2    50
处理后:
电压    电阻    电流
2    10    0.2
4    30    0.13
5    20    0.25
1    25    0.04
3    100    0.03
2    50    0.04
本人欲学习VB在数值计算上的一些知识，想拜师学习，请高手老师与我联系：QQ450730465

1.打开文件，按行读数据
2.按行进行数据处理I=U/R
3.写文件，按照格式把读到的数据和处理得到的数据写入即可！
代码不会很多，只要会简单的文件操作就能搞定！

能写出源程序代码吗？

Private Sub Command1_Click()
Dim a As String: Dim b As String: Dim indata As String: Dim s As String
Dim U As Single, I As Single, R%
Dim filenum1 As Integer
filenum1 = FreeFile
a = "h:\a.txt"
b = "h:\b.txt"

Open a For Input As #filenum1
Open b For Output As #2
Do While Not EOF(1)
    Line Input #filenum1, indata
    U = Val(Trim(Left(indata, 3)))
    R = Val(Trim(Right(indata, 5)))
    I = U / R
    s = U & "     " & R & "     " & Format(I, "0.00")
    Print #2, s
Loop
Close
End Sub
看看我写的这个！写得不好！还请各位不要见笑！有哪里不对的，还望指出！

谢谢了!方法可用的，今后学习中有什么问题还请各位大侠讲解与指导!

呵呵  真巧啦  我正在学循环语句...那位大侠的代码能看懂啦 呵呵