Public Class frmValidatorSearch Public Sub RefreshTab1() If Me.InvokeRequired() Then Me.Invoke(Sub() RefreshTab1()) Else 'Code to refresh your textbox here End If End Sub Private Sub frmValidatorSearch_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing Try ' Position und Größe speichern My.Settings.frmValidatorSearchSize = Me.Size My.Settings.frmValidatorSearchPosition = Me.Location My.Settings.Save() Catch ex As Exception LOGGER.Error(ex) LOGGER.Info("Error in Save FormLayout: " & ex.Message) End Try End Sub Private Sub frmValidatorSearch_Load(sender As Object, e As EventArgs) Handles Me.Load If My.Settings.frmValidatorSearchPosition.IsEmpty = False Then If My.Settings.frmValidatorSearchPosition.X > 0 And My.Settings.frmValidatorSearchPosition.Y > 0 Then Location = My.Settings.frmValidatorSearchPosition End If End If If My.Settings.frmValidatorSearchSize.IsEmpty = False Then Size = My.Settings.frmValidatorSearchSize End If End Sub End Class