新增一張簡潔的Bos單據，功能：當文本1輸入框裏輸入的內容是“222”，則保存數據，當內容是其他的，則拒絕保存

這裏還要獲取文本1的字段名

接下來是VB插件開發了

Private Sub m_BillInterface_BeforeSave(bCancel As Boolean)　　　　　　//觸發事件，在單據保存前
 Dim z As String　　　　　　　　　　　　　　
     
     z = m_BillInterface.GetFieldValue("FText1")　　　　　　　　　　　　//定義變量  獲取文本1的內容
    
    If (z <> "
 
222") Then　　　　　　　　　　　　　　　　　　　　　　　　　　//如果文本1的內容不等於“222”，

    MsgBox "錯誤"　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　//提示錯誤，設置這一句的意思是：假如這句代碼出現錯誤，我要判斷代碼有沒有執行到這裏


    bCancel = True　　　　　　　　　　　　　　　　　　　　　　　　　　　　　//bCancel(是本事件的參數)默認為false,當為True時，則拒絕保存   
    
    Else
    MsgBox "haha"
    End If
End Sub

金蝶VB插件開發，單據不滿足條件，拒絕保存