如果表单中有空单元格，我想控制另一种形式的按钮

Question

如果表单中有空单元格，我想在第一个表单的单元格上控制另一个表单中的按钮。所以我试过了，但它没有工作：

Private Sub Form_Current()
If IsNull(TodayDate) Then
Form_FrmTransferProjectReports.CmdLg.Visible = False
Else
Form_FrmTransferProjectReports.CmdLg.Visible = True
End If
End Sub

我该怎么办？