'all pass If ((VoltageTestBool = False) And (TimeKeepTestBool = False) And (LCDtestBool = False) And (RFtestBool = False) And (RFxtalBool = False) And (RFtestHighBool = False) And (QuiescentBool = False)) Then Result_Save += "Unit Passed," + DateAndTime.Now outPass.WriteLine(Result_Save) outPass.Close() End If 'volts fail If ((VoltageTestBool = True) And (TimeKeepTestBool = False) And (LCDtestBool = False) And (RFtestBool = False) And (RFxtalBool = False) And (RFtestHighBool = False) And (QuiescentBool = False)) Then Result_Save += "Voltge Test Failed," + DateAndTime.Now outFail.WriteLine(Result_Save) outFail.Close() StopTests = True End If
File.AppendAllText()
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)