各位大哥,大姐:请帮帮我,在毕业设计中遇到了这个麻烦,现有两个变量值分别记录“检测值”和“检测角度”,然后把这两个值对应到修正表中去进行修正,问题就是修正表的建立问题,我现简单的把修正表的格式给你们说说:
检测值 检测角度
Rm -90 -60 -45 -30 90 60 45 30
20.1 -6.0 -5.0 -4.0 -3.0 2.5 3.0 3.5 4.0
检测值 检测角度
Rm -90 -60 -45 -30 90 60 45 30
20.1 -6.0 -5.0 -4.0 -3.0 2.5 3.0 3.5 4.0
检测值 检测角度
Rm -90 -60 -45 -30 90 60 45 30
20.1 -6.0 -5.0 -4.0 -3.0 2.5 3.0 3.5 4.0
20.2 -5.9 -4.9 -3.9 -2.9 2.4 2.9 3.4 3.9
我这只列了2条记录。
劳请各位知道者给予解答!先谢谢了,
一个表A 放角度(角度ID和角度值二个字段)
一个表B 放Rm(RmID和Rm值二个字段)
一个表C 放修正值(角度ID,RmID和修正值三个字段)三表关系 A 和 C 的角度ID是一对多关系
三表关系 B 和 C 的RmID是一对多关系
一个表存检测值与修正值,第一个字段为检测值,第二字段到第九字段对应修正值
Rm xiu1 xiu2 xiu3 xiu4 xiu5 xiu6 xiu7 xiu8
20.1 -6.0 -5.0 -4.0 -3.0 2.5 3.0 3.5 4.0
20.2 -5.9 -4.9 -3.9 -2.9 2.4 2.9 3.4 3.9
另一个表存检测角度与修正值字段的序号,第一个字段为检测角度,第二字段为修正值字段的序号 检测角度 序号
-90 1
-60 2
-45 3
-30 4
90 5
60 6
45 7
30 8Private Sub Command2_Click()
Dim tt As Integer
Dim rs1 As Recordset
Dim rs2 As Recordset rs2.FindFirst "检测角度=" & Val(Text2.Text) & ""
tt = rs2.Fields(1)
rs1.FindFirst "rm =" & Val(Text1.Text) & ""
Text3.Text = rs1.Fields(tt)
End Sub
我看你贴出的那几行对照表,好像有规律可循,如该修正表有数学模型,还是实现该模型的算法更好