如何判断多个文本框,下拉列别,复选框中的值是否发生了变化?

Question

如果变化，进行下一步操作，如果没变化让其继续在该页面填写信息。

Answer 1

VB6的话：
通常可在Change事件内做判断。
如果在Validate事件做判断的话，可用SendMessage这个API来做：
Public Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Public Const EM_GETMODIFY = &HB8

If SendMessage(控件.hwnd, EM_GETMODIFY, 0, 0) Then
msgbox "有变化"
end if来自：求助得到的回答