myPattern(ix - 1) = CByte("&H" & Mid(DataString, ix, 1))
Case AgilentBertEDPatternFormatRaw
myPattern(ix - 1) = CByte(Mid(DataString, ix, 1))
End Select
Next
SetPatternData = myPattern
End Function
2 A Typical SerialBERT Program
18 Agilent J-BERT N4903B High-Performance Serial BERT