小编T-R*_*Rex的帖子

检查访问表单字段是否为空,如果不为空,则调用添加功能

我有这个简单的访问表单,当你填写表单并忘记填写业务单位字段时,会弹出一个msgBox告诉你这样,并将setFocus设置为那个非常组合框.如果它不为null,我想调用下一个功能.这段代码的第一部分可以工作,但是当它不是Null时它不会继续.

 Private Sub Image_AddNon_RPS_Button_Click()

 If IsNull(Me.BU_Selected_Add) Then
    MsgBox "Please Select a Business Unit!", vbOKOnly
            Exit Sub
         End If
    Me.Combo_BU_Selector.SetFocus
    Exit Sub
If Not IsNull(Me.BU_Selected_Add) Then
    Call Add_RPS_LINE
        End If
End Sub
Run Code Online (Sandbox Code Playgroud)

有人看到我完全在左外野的地方吗?

ms-access vba access-vba

3
推荐指数
1
解决办法
8万
查看次数

标签 统计

access-vba ×1

ms-access ×1

vba ×1