如果子表单没有数据，则为空白父表单

Question

我有我的常规表格，并附有一个连续表格。在子表单没有数据之前一切正常。 这是带有数据的子表单
image1

如果子表单中没有数据，表单会变成这样。
图 2

我在主窗体的当前事件中使用以下代码：

Function RefreshCOunt()
If Me.frmVerifyEquipmentSub.Form.Recordset.RecordCount = 0 Then

    Me.frmVerifyEquipmentSub.Visible = False
    Me.txtTotal = 0
    Me.Refresh

Else
    Me.frmVerifyEquipmentSub.Visible = True
    Me.frmVerifyEquipmentSub.Form.Requery
    Forms![test3].txtTotal = Me.frmVerifyEquipmentSub.Form.txtSum
    Me.Refresh
    Forms![test3].Refresh

End If
End Function

Private Sub Form_Current()
Call RefreshCOunt
End Sub

Private Sub Form_GotFocus()
Call RefreshCOunt
End Sub

这是我的子表单上的代码，当我的用户单击保存按钮时，此函数将运行。

Function RefreshCOunt()
If Me.txtCount = 0 Then
    Forms![test3].SetFocus
Else
    Me.Requery
    Forms![test3].txtTotal = Me.txtSum
    Me.Refresh
    Forms![test3].Refresh

End If
End Function

我在子表单后面有一个文本，上面写着“没有可用的数据要显示”

这种情况下的2个问题是：

1. 如图 2 所示的空表单视图（已解决，因为我已将主表单的记录源链接到也用于子表单的表）

2. 一旦用户验证了所有设备，就隐藏子表单。 - 目前我的代码仅在第一次加载表单时有效。 -一旦用户验证了所有设备，子表单就不会隐藏

我知道如何使用 HAsData 函数在报表中执行此操作，但我不确定如何在 Forms 中执行此操作。

Answer 1

听起来您对主表单的查询与子表单的表（或与此表的查询）有一个内部连接。

删除此联接或将其更改为外部联接。