1

好的，尝试在我的数据库中创建新记录时出现错误 2447。这是拥有的代码。

'This checks the record each time a record is changed to see if it needs to display the text boxes
Private Sub Form_Current()
If Me.SigCheck = 1 then <--This is where I'm getting the error.
SigSerialtxt.Visible = True
SigSeriallbl.Visible = True
SigAssettxt.Visible = True
SigAssetlbl.Visible = True
Else
SigSerialtxt.Visible = False
SigSeriallbl.Visible = False
SigAssettxt.Visible = False
SigAssetlbl.Visible = False
End if
End Sub

我试图将变量更改为 True，以及 -1，但都没有工作。我不知道该用什么。

4

1 回答 1

0

修复了这个问题，我将默认设置为 0，现在没有错误并且可以正常工作。

于 2018-10-10T17:18:00.650 回答