Imports kp.Toaster Public Class ToastMessage Public Sub ShowToastMessage(o As Object, title As String, message As String, type As ToastType, duration As ToastDuration) If My.Settings.ShowToast = True Then Toast.show(o, title, message, type, duration) End If End Sub Public Sub ShowSaveMesasge(o As Object) If My.Settings.ShowToast = "True" Then Toast.show(o, "Speichern", "Daten erfolgreich gespeichert", ToastType.INFO, ToastDuration.SHORT) End If End Sub End Class