是帮助错误,应该是
Dim dp1 As WinForm.DateTimePicker = Forms("窗口1").Controls("DateTimePicker1")dp1.DateTimeFormat = DateTimeFormatEnum.DateLongTime