Specifications

166 Chapter 7
Measurement Result Processing
Using Marker Function
970 Open file For Output As #1
980 Print #1, "Marker Limit Test Results"
990 Print #1, ""
1000 Print #1, " Mkr freq.[MHz] lower actual
upper judge"
1010 Print #1,
"------------------------------------------------------------------
------"
1020 Print #1, "R", ref_stim / 1000000#, ref_low, ref_meas,
ref_upp, ref_judge
1030 For mkr = 1 To 8
1040 Print #1, mkr, mkr1_stim(mkr) / 1000000#,
mkr1_low(mkr), mkr1_meas(mkr), mkr1_upp(mkr), mkr1_judge(mkr)
1050 Next mkr
1060 Print #1,
"------------------------------------------------------------------
------"
1070 Print #1, " total
" & all_judge
1080 Close #1
1090
1100 MsgBox ("Marker Limit Test: " & all_judge)
1110 End If
1120
1130 End
1140
1150 End Sub