DTPicker如何让默认焦点在“日”上

Question

DTPicker控件的默认焦点在“年”上，即初次点上下箭头进行更改时默认改的是年份。请问如何让这个默认值变成“日”？谢谢！

Answer 1

这个……应该不行吧……试了下这样
不好用～Private Sub DTPicker1_GotFocus()
    SendKeys "{RIGHT}{RIGHT}"
End Sub

Answer 2

可以在Form_Load中加入：
Private Sub Form_Load()
Me.Show
DTPicker1.SetFocus
SendKeys "{RIGHT}"
End Sub不要在DTPicker1_GotFocus中送按键码，那样第二次获得焦点时就不对了。

Answer 3

哦，应该是送“Left”，我错写成Right了。

Answer 4

以上的效果都不是很理想啊，请问有没有判断DTPicker控件上下箭头被鼠标点击的事件？

Answer 5

标准答案来了：采用控件组合用法：一个textbox和dtpicker控件
其中把dtpicker缩小成只显示右边的小三角按钮，放丰textbox的右边，这样可以重新组合成一个类似dtpicker的控件，代码如下：
Private Sub DTPicker1_Change()
Text1.Text = Format(DTPicker1.Value, "YYYY-MM-DD")
End SubPrivate Sub Text1_GotFocus()
Text1.SelStart = 8
Text1.SelLength = 2
End Sub
当然你也可以用这种方式写成自己的控件，然后再用。