Private Sub ValidateLoadEnvironmentValues(uc As UserControl, testType As String)
Select Case testType
Case "Load"
uc = DirectCast(uc, userLoad)
Case "Creep"
uc = DirectCast(uc, userCreep)
Case "Repeat"
uc = DirectCast(uc, userRepeat)
End Select
Try
EH.ErrorMessage = String.Empty
GetEnvironmentReadings(uc, testType)
If EH.ErrorMessage = String.Empty Then
AreTestsComplete(uc)
End If
ProcessMessage:
Catch ex As Exception
EH.ErrorMessage = "frmCalibration_3/ValidateLoadEnvironmentValues() - " & ex.Message & "...Contact Engineering!" & "~E"
End Try
End Sub
ASKER
ASKER
ASKER
Visual Basic .NET (VB.NET) is an object-oriented programming language implemented on the .NET framework, but also supported on other platforms such as Mono and Silverlight. Microsoft launched VB.NET as the successor to the Visual Basic language. Though it is similar in syntax to Visual Basic pre-2002, it is not the same technology,
TRUSTED BY