Vb.net Winforms:Remove"；“今天”；来自日期时间选择器

我试图删除datetimepicker控件底部显示的Today链接。 我在代码中发现了类似的问题，但这似乎不起作用-我的转换是否存在问题，或者此方法是否不再有效（Visual Studio 2012）

类MyDateTimePicker
继承日期时间选择器
已创建受保护的重写子句柄（e作为事件参数）
整数形式的Dim样式=CInt（SendMessage（Me.Handle，DTM_GETMCSTYLE，IntPtr.Zero，IntPtr.Zero））
style=style或MCS\u NOTODAY或MCS\u NOTODAY循环
SendMessage（Me.Handle，DTM_SETMCSTYLE，IntPtr.Zero，CType（0，IntPtr））
MyBase.OnHandleCreated（e）
端接头
Private Const DTM_FIRST作为整数=&H1000
Private Const DTM_SETMCSTYLE As Integer=DTM_FIRST+11
Private Const DTM_GETMCSTYLE As Integer=DTM_FIRST+12
Private Const MCS_notodycle作为整数=&H8
Private Const MCS_NOTODAY作为整数=&H10
_
私有共享函数SendMessage（hWnd作为IntPtr，msg作为Integer，wp作为IntPtr，lp作为IntPtr）作为IntPtr
端函数
末级

---

来源：

您没有发送样式：

更改此项：

SendMessage(Me.Handle, DTM_SETMCSTYLE, IntPtr.Zero, CType(0, IntPtr))

为此：

SendMessage(Me.Handle, DTM_SETMCSTYLE, IntPtr.Zero, CType(style, IntPtr))

---

您没有发送样式：

更改此项：

SendMessage(Me.Handle, DTM_SETMCSTYLE, IntPtr.Zero, CType(0, IntPtr))

为此：

SendMessage(Me.Handle, DTM_SETMCSTYLE, IntPtr.Zero, CType(style, IntPtr))

---

不，这在VS2012和Win8中仍然可以正常工作。但是，您没有正确复制代码。使用CType（样式，IntPtr），而不是0。不，这在VS2012和Win8中仍然可以正常工作。但是，您没有正确复制代码。使用CType（样式，IntPtr），而不是0。