DTPicker1控件的下拉按钮
请问怎么写
代码可以使得DTPicker
控件的下拉
日期表显示出来呢?!
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" _ (ByVal hWnd As Long, _ ByVal wMsg As Long, _ ByVal wParam As Long, _ lParam As Boolean) As Long Private Sub CommandButton1_Click() SendMessage DTPicker1.hWnd, &H100, &H73, &H3E0001 End Sub