主题：远程数据保存时，如何提示保存成功了？

自定义进行保存，比如在窗口增加一个标签，保存代码

For Each dt As DataTable In DataTables
    If dt.HasChanges Then
        e.Form.Controls("Label1").text = "正在保存数据..."
        Application.Doevents
        dt.Save
        e.Form.Controls("Label1").text = ""
    Else
        e.Form.Controls("Label1").text = ""
    End If
Next