VB中调用并处理txt数据

Question

比如 txt中数据为
1 25
2 30
在VB中实现插值计算，比如输入1.5 输出为 27.5，求高手指点迷津，小生谢过，积分奉上~

Answer 1

Dim x,y As Single
dim xX as Integer
Dim f() As Single
'读取文件到f()
'序列号与TXT内前面编号一样 数值为编号后一组数就你的例子：f(1)=25 f(2)=30
do while x.... '这里需要增加一个不超过范围的判断 x....为对x的值判断的表达式
'要求输入数据到x=inputbox(......)

loop
xx = Int(x)
y = f(xx)*(f(xx + 1) / f(xx))'如果需要多少位小数就另外计算四舍五入多少位小数
'输出y

Answer 2

我大概知道你的意思了
你是要读取TXT文件的数据 在程序中输出 但是输出一个经过计算的值
我给你个思想吧
就是先做读取TXT文件的程序 然后得到的值给一个变量 这个变量经过一个计算后 值给另一个变量 最终输出结果 OK？很简单

Answer 3

你可以去学学对象FSO的用法，他可以允许你读取数据并保存到变量，还可以写入数据到txt.ini后缀的文件等等等等
先告诉你，使用FSO对象前，先写这个语句：set 变量 = createobject("filesystemobject") 之后你就可以用这种语法执行文件操作了：变量（就是之前的）.方法 方法的参数

Answer 4

1 25
2 30
为什么你输入1.5 输出就是27.5?用什么方法计算？