Private Sub UltraCalculator1_BeforeActionButtonPressed(ByVal sender As Object, _ ByVal e As _ Infragistics.Win.UltraWinEditors.UltraWinCalc.OnCalculateImmediateEventArgs) _ Handles UltraCalculator1.BeforeActionButtonPressed ' Check the key of the button pressed If e.Operation = "A1" Then ' You would implement the code here to save to the database, then print ' out the data to the user Me.UltraLabel1.Text = "The current Value, " + _ e.CurrentValueDecimal.ToString() + _ ", has been saved to your database." End If End Sub