如何一开始让DTPicker控键的值不要显示,也就是空白?

       在做机房收费系统的时候,做到“余额退还信息查询”时有“起始日期”和“终止日期”,看似非常神奇,然后较劲脑子思索怎么写着代码呀?

            其实,它只是被一个神奇的东西摆弄了一下下,只是一个控件的问题。

        DTPicker控键是一个日期控件,在VB下点击工具--部件(或是Ctrl+T添加“部件”)--控件--在“Microsoft  Windows  Common  Controls-2.6.0”前面的方框打钩--应用--确定即可使用。

        完成添加之后,和其他控件的使用方法一样。但有一点不同就是在运行程序的时候DTPicker控键自动显示日期,查东西的时候如果不注意日期就有可能出现查到的内容与想要查的内容不相符,如何一开始让DTPicker控键的值不要显示,也就是空白?

Private Sub Form_Load()
    DTPicker1.Format = dtpCustom
    DTPicker1.CustomFormat = " "
    DTPicker1.Value = 0
End Sub

Private Sub DTPicker1_Change()
  If IsNull(DTPicker1.Value) Then
    DTPicker1.CustomFormat = " "
  Else
    DTPicker1.CustomFormat = "yyyy/MM/dd "
  End If
End Sub
        注意的是月份的代号必须是大写的“M”,否则日期会出错,就是月份不对永远只有一个值。


 

你可能感兴趣的:(如何一开始让DTPicker控键的值不要显示,也就是空白?)