急！如何按下选择按钮可以弹出日历！

Question

Project(工程)-->Components-->Microsoft Windows Common Controls-2 6.0
选择后有一个MonthView控件.
Private Sub f51_Click()
     month_view.Visible = True
     month_view.SetFocus
     month_view.Value = Date
     f51.Enabled = False
End Sub

Answer 1

直接用Dtpticker, 很容易用的。

Answer 2

對﹐就這么簡單﹗Project(工程)-->Components-->Microsoft Windows Common Controls-2 6.0
选择后有一个MonthView控件.   OR   直接用Dtpticker

Answer 3

在单击事件中写入如下程序if dtpticker.visible=true then
   Dtpticker.visible=false 
else
   Dtpticker.visible=true
   dtpticker.setfoce
endif