Chapter 4 105
Preparation for Accurate Measurement
Fixture Compensation
4. Preparation for
Accurate Measurement
990
1000 End Function
1010
1020 Sub Inp_data(Mes As String, Inp_val As Double)
1030
1040 Inp_val = Val(InputBox(Mes, "Input values"))
1050
1060 End Sub
