asked on
objStreamWriter.WriteLine(_partfile.PartfileData(intloop).FeatureName.PadRight(10, " "c) & " " & "-" & " " & _partfile.PartfileData(intloop).FeatureType.PadRight(5, " "c) & " " & "-" & " " & _partfile.PartfileData(intloop).FeatureComment)
objStreamWriter.WriteLine(_partfile.PartfileData(intloop).FeatureName.PadRight(10, " "c) & " " & "X" & " " & _partfile.PartfileData(intloop).X.ToString("0.000").PadLeft(11, " "c) & _partfile.PartfileData(intloop).X.ToString("0.000").PadLeft(11, " "c) & " " & _partfile.PartfileData(intloop).X.ToString("0.000").PadLeft(10, " "c) & " " & _partfile.PartfileData(intloop).X.ToString("0.000").PadLeft(10, " "c))
objStreamWriter.WriteLine(" " & " " & "Y" & " " & _partfile.PartfileData(intloop).Y.ToString("0.000").PadLeft(11, " "c) & _partfile.PartfileData(intloop).Y.ToString("0.000").PadLeft(11, " "c) & " " & _partfile.PartfileData(intloop).Y.ToString("0.000").PadLeft(10, " "c) & " " & _partfile.PartfileData(intloop).Y.ToString("0.000").PadLeft(10, " "c))
objStreamWriter.WriteLine(" " & " " & "Z" & " " & _partfile.PartfileData(intloop).Z.ToString("0.000").PadLeft(11, " "c) & _partfile.PartfileData(intloop).Z.ToString("0.000").PadLeft(11, " "c) & " " & _partfile.PartfileData(intloop).Z.ToString("0.000").PadLeft(10, " "c) & " " & _partfile.PartfileData(intloop).Z.ToString("0.000").PadLeft(10, " "c))
objStreamWriter.WriteLine(" " & " " & "D" & " " & PointList.Item(intloop).D_value.ToString("0.000").PadLeft(11, " "c) & _partfile.PartfileData(intloop).Nominal.ToString("0.000").PadLeft(11, " "c) & " " & _partfile.PartfileData(intloop).USL.ToString("0.000").PadLeft(10, " "c) & " " & _partfile.PartfileData(intloop).LSL.ToString("0.000").PadLeft(10, " "c))