Access 2013 VBA如果不是日期格式拋出錯誤

-1

我在Access 2013中有一個表單。我在標有ExpDateField的表單上有一個字段。我需要將日期格式化爲「ddmmmyyyy」，即22Dec2015。如果日期沒有格式化，我想拋出一個錯誤。迄今爲止，我嘗試了一百萬種方法。我沿着線的東西：Access 2013 VBA如果不是日期格式拋出錯誤

Private Sub ExpDateField_AfterUpdate() 

If Not IsDate("ddmmmyyyy") Then 
    MsgBox "Error" 
End If 

End Sub

我自己也嘗試格式（2015年2月15日，「ddmmmyyyy」），並拋出一個類型的錯誤。

2016-01-15 EKim

爲什麼輸入日期必須在格式？只需要時將日期和格式存儲爲ddmmmyyyy。 – Jules

我想爲我的公司制定一個有效的系統。因此，它必須採用這種格式。 – EKim

-1

嘗試Err.Raise方法：

Sub erri() 
err.Raise (100) 
End Sub

2016-01-15 00:40:03 anefeletos

回答