文件名称：VB 检测绑定控件值是否被修改.rar
文件大小：5KB
文件格式：RAR
更新时间：2022-07-30 11:27:19
VB源码-数据库实例
VB 检测绑定控件值是否被修改，Data控件的标题设为当前记录号加1，如果被修改则以MsgBox的方式弹出提示。下面是相关代码： Private Sub Data1_Reposition() Data1.Caption = Data1.Recordset.AbsolutePosition 1 'Data控件的标题设为当前记录号加1 End Sub Private Sub Data1_Validate(Action As Integer, Save As Integer) Dim an As Integer If Save Then '如果被修改则提示 an = MsgBox("数据被修改，是否保存？", vbQuestion vbYesNo, "确认") If an = vbYes Then Save = True '保存修改 Else Save = False End If '拒绝修改 End If
【文件预览】：
srcfans.com
----MsgBox()
--------E409.vbp(839B)
--------Form1.frm(4KB)
--------student.mdb(50KB)
--------MSSCCPRJ.SCC(331B)
--------E409.vbw(50B)