如何检测周末Outlook自定义表单?

Question

我说的是Outlook自定义表单，而不是VBA Userform。

我使用olkdatecontrol工具作为日期选择器。有什么方法来检测周末使用这个工具吗?

我试了以下方法。

Sub cmdbutTest_Click
getdate = Item.UserProperties.Find("Start").Value

If(getdate = vbSunday or vbSaturday)then
MsgBox "Date may not start on the weekend"  
End If
End Sub

Answer 1

这个对我很有效。从https://stackoverflow.com/a/33115260/10711853得到的

MsgBox Weekday(MyDate, vbMonday) > 5