• Home
 · 
• Miscellaneous
 · 
• This code will identify the changes of data in a Textbox and do something accordingly.

This code will identify the changes of data in a Textbox and do something accordingly.

This code will identify the changes of data in a Textbox and do something accordingly.

API Declarations



Private flDataChanged as Boolean



Rate This code will identify the changes of data in a Textbox and do something accordingly.

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

  If Text1.DataChanged = True Then
     Text1.Datachanged = Not Text1.Datachanged
     flDataChanged = True
  Else If Text2.DataChanged = True Then
     Text2.Datachanged = Not Text1.Datachanged
     flDataChanged = True
  Else If Text3.DataChanged = True Then
     Text3.Datachanged = Not Text1.Datachanged
     flDataChanged = True
  End If
End Sub

Private Sub cmdSave_Click()
  Dim ans As vbMsgboxResult 

  'Call the subroutine to check the changes
  CheckData
  If flDataChanged Then
    ans = MsgBox "Your Data has been Changed " & vbCrLf & _
           "Save Now ?" , vbYesNo
    If ans = vbYes Then
        'Code to Save Changes
    End If
  End If
End Sub