好的，明白了，还有一个问题，就是如截图所示，我想通过“保存当前数据”这个按钮触发一个提醒事件，
提醒窗口类型为PopupForm，在客户端的ReceiveMessage谢判断语句如下：
If User.Name = "yoko" And dr.DataTable.Name = "total" Then
If dr IsNot Nothing AndAlso dr.IsNull("面试状态") Then
Forms("审核提示").Open()
ElseIf User.Name = "may" Then
Forms("审核申请").Open()
ElseIf User.Name = "anna" Then
Forms("入职申请").Open()
End If
End If
保存当前行 这个的按钮的代码如下：
Dim r As Row = Tables("total").Current
Dim p As String = IIF(r.DataRow.RowState = DataRowState.Added, "A#", "U#")
r.Save()
QQClient.Send("yoko","+@|" & r("序号") & "|" & r("姓名") & "|" & User.Name)
Dim msg As String = p & "total" & "#" & r("序号")
For Each bd As QQBuddy In QQClient.Buddies
If bd.Online Then
QQClient.Send(bd.name, msg)
End If
Next
MessageBox.Show("已成功保存!","提示", MessageBoxButtons.OK ,MessageBoxIcon.Information)
Forms("人事详情").Close()
保存成功后不能触发PopupForm的窗口，请问问题出在哪里？谢谢
加好友 
发短信
Post By：2016/4/13 20:40:00 [只看该作者]
此主题相关图片如下：qq截图20160413201343.jpg
