Private Sub Reset_settings()
        Try
            My.Settings.RemoteIP = "xx"
            My.Settings.RemotePort = "xx"
            My.Settings.Autoscroll = True
            My.Settings.AutoScrollAffectedCabins = True
            My.Settings.ClearAlarmSummary = False
            My.Settings.ClearStyatistics = True
            My.Settings.AutoConnect = False
            My.Settings.Password = "xxx"
            My.Settings.AutoSave = True
            My.Settings.Clearlog = True
            My.Settings.AutoSequence = False
            My.Settings.firststart = False
            My.Settings.Save()
        Catch ex As Exception
            MessageBox.Show("Reset: " & ex.Message)
        End Try
    End Sub