[5分]寻找更好的思路，财务经营账数据计算难题

我曾经用过的：

1,首先将必填项的名字改一下，比如 ”建设期间隔” 改成 ”bt建设期间隔”，以此类推...bta,btb,btc,......等等，有几个改几个，不能和程序原有的名字的前缀有重复！非必填项不用改！

2，在计算按钮中添加如下代码：

 For Each ctr In Me.Controls
        If Left(ctr.Name, 2) = "bt" Then
                If Len(Nz(ctr)) = 0 Then
                   ctr.SetFocus
                  MsgBox ctr.Name & "为空"
                      Beep
                    If TypeOf ctr Is ComboBox Then
                        ctr.Dropdown
                    End If
                    Exit Sub
            End If
        End If
    Next