Private Sub usrLoadSettingsCreep_GetUnitType() Handles usrLoadSettingsCreep.GetUnitType
Try
EH.ErrorMessage = String.Empty
If usrLoadSettingsCreep.cmbLoadUnitType.SelectedIndex <> -1 Then
If gblnLoadUnitTypeSelectedCreep Then
gblnLoadUnitTypeSelectedCreep = False
RemoveHandler usrLoadSettingsCreep.cmbLoadUnit.SelectedIndexChanged, AddressOf usrLoadSettingsCreep.cmbLoadUnit_SelectedIndexChanged
LoadCombo_LoadUnits(usrLoadSettingsCreep.cmbLoadUnitType.SelectedValue, usrLoadSettingsCreep.cmbLoadUnit)
AddHandler usrLoadSettingsCreep.cmbLoadUnit.SelectedIndexChanged, AddressOf usrLoadSettingsCreep.cmbLoadUnit_SelectedIndexChanged
End If
End If
Catch ex As Exception
EH.ErrorMessage = "frmCalibration_3/usrLoadSettingsCreep_GetUnitType() - " & ex.Message & "...Contact Engineering!" & "~E"
End Try
EH.ProcessMessages(Me, sbr, EH.ErrorMessage)
End Sub
'
'
'
Private Sub usrLoadSettingsRepeat_GetUnitType() Handles usrLoadSettingsRepeat.GetUnitType
Try
EH.ErrorMessage = String.Empty
If usrLoadSettingsRepeat.cmbLoadUnitType.SelectedIndex <> -1 Then
If gblnLoadUnitTypeSelectedRepeat Then
gblnLoadUnitTypeSelectedRepeat = False
RemoveHandler usrLoadSettingsRepeat.cmbLoadUnit.SelectedIndexChanged, AddressOf usrLoadSettingsRepeat.cmbLoadUnit_SelectedIndexChanged
LoadCombo_LoadUnits(usrLoadSettingsRepeat.cmbLoadUnitType.SelectedValue, usrLoadSettingsRepeat.cmbLoadUnit)
AddHandler usrLoadSettingsRepeat.cmbLoadUnit.SelectedIndexChanged, AddressOf usrLoadSettingsRepeat.cmbLoadUnit_SelectedIndexChanged
End If
End If
Catch ex As Exception
EH.ErrorMessage = "frmCalibration_3/usrLoadSettingsRepeat_GetUnitType() - " & ex.Message & "...Contact Engineering!" & "~E"
End Try
EH.ProcessMessages(Me, sbr, EH.ErrorMessage)
End Sub
'
'
'
Private Sub usrLoadSettingsLoad_GetUnitType() Handles usrLoadSettingsLoad.GetUnitType
Try
EH.ErrorMessage = String.Empty
If usrLoadSettingsLoad.cmbLoadUnitType.SelectedIndex <> -1 Then
If gblnLoadUnitTypeSelectedLoad Then
gblnLoadUnitTypeSelectedLoad = False
RemoveHandler usrLoadSettingsLoad.cmbLoadUnit.SelectedIndexChanged, AddressOf usrLoadSettingsLoad.cmbLoadUnit_SelectedIndexChanged
LoadCombo_LoadUnits(usrLoadSettingsLoad.cmbLoadUnitType.SelectedValue, usrLoadSettingsLoad.cmbLoadUnit)
AddHandler usrLoadSettingsLoad.cmbLoadUnit.SelectedIndexChanged, AddressOf usrLoadSettingsLoad.cmbLoadUnit_SelectedIndexChanged
End If
End If
Catch ex As Exception
End Try
End Sub
Experts Exchange always has the answer, or at the least points me in the correct direction! It is like having another employee that is extremely experienced.
When asked, what has been your best career decision?
Deciding to stick with EE.
Being involved with EE helped me to grow personally and professionally.
Connect with Certified Experts to gain insight and support on specific technology challenges including:
We've partnered with two important charities to provide clean water and computer science education to those who need it most. READ MORE