Warning: file_get_contents(/data/phpspider/zhask/data//catemap/9/google-apps-script/5.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Ms access 我可以在Access中的Private Sub中添加IF语句吗?_Ms Access_Vba - Fatal编程技术网

Ms access 我可以在Access中的Private Sub中添加IF语句吗?

Ms access 我可以在Access中的Private Sub中添加IF语句吗?,ms-access,vba,Ms Access,Vba,这只是一个数据库,我正在努力使填充数据变得更容易。自动填充已经设置好,当您输入游戏PN(数据)时,它会自动添加版本(数据)和名称(数据)。但我也希望添加密钥(数据),但前提是密钥单元格为空 如果关键单元格为空,则执行3次自动填充,否则仅执行2次自动填充。我的代码在下面,但不起作用。我试过用“空”替换“空”。我试过用“假”替换“真”,并把sub换了个遍,我想我试过反过来。谢谢你的帮助 Private Sub Game_PN_AfterUpdate() If Me.Key_PN = IsNull(

这只是一个数据库,我正在努力使填充数据变得更容易。自动填充已经设置好,当您输入游戏PN(数据)时,它会自动添加版本(数据)和名称(数据)。但我也希望添加密钥(数据),但前提是密钥单元格为空

如果关键单元格为空,则执行3次自动填充,否则仅执行2次自动填充。我的代码在下面,但不起作用。我试过用“空”替换“空”。我试过用“假”替换“真”,并把sub换了个遍,我想我试过反过来。谢谢你的帮助

Private Sub Game_PN_AfterUpdate()

If Me.Key_PN = IsNull(True) Then

Me.Key_PN = Me.Game_PN.Column(3)
Me.Game_Rev = Me.Game_PN.Column(2)
Me.Game_Name = Me.Game_PN.Column(1)

Else:

Me.Game_Rev = Me.Game_PN.Column(2)
Me.Game_Name = Me.Game_PN.Column(1)

End If

End Sub

我想提出如下建议:

Private Sub Game_PN_AfterUpdate()
    If IsNull(Me.Key_PN) Then Me.Key_PN = Me.Game_PN.Column(3)
    Me.Game_Rev = Me.Game_PN.Column(2)
    Me.Game_Name = Me.Game_PN.Column(1)
End Sub

也就是说,如果您的
Key\u PN
字段为空,则使用
Game\u PN.列(3)
中的值填充
Key\u PN
字段;不管怎样,都要更新其他两个字段。

你有没有尝试过
如果是Me.Key\u PN=“”,那么…
?你的代码有点奇怪。我建议你遵循一个好的教程
IsNull(True)
返回
True
,因为
True
不是null。然后将
True
Me.Key\u PN
进行比较。另外,
Else
后面的冒号不应出现。