请教：删除员工信息，同时对应表中的员工也删除，但是出现问题？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

If Tables("人员信息").Current Is Nothing Then
    Return
End If
Dim Result As DialogResult
Result = MessageBox.Show("确定删除吗?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If Result = DialogResult.Yes Then
    Dim gh As String
    gh=Tables("人员信息").current("员工号")
    Tables("人员信息").Current.Delete
    DataTables("全部").deletefor("员工号 = '" & gh & "'")
    DataTables("工资信息").deletefor("员工号 = '" & gh & "'")
    DataTables("绩效奖金").deletefor("员工号 = '" & gh & "'")
    DataTables("其他补贴奖项").deletefor("员工号 = '" & gh & "'")
End If

主题：请教：删除员工信息 ，同时对应表中的员工也删除，但是出现问题？

主题：请教：删除员工信息，同时对应表中的员工也删除，但是出现问题？