WinForm ToolStrip添加DateTimePicker日历控件

Vb.Net：

'有DateTimePicker事件时定义
Private WithEvents dtp As New DateTimePicker
'无DateTimePicker事件时定义
Dim dtp As New DateTimePicker

dtp.Format = DateTimePickerFormat.Short
Controls.Add(dtp)
Me.ToolStrip1.Items.Insert(1,New ToolStripControlHost(dtp))

图示：