[RESOLVED] DTpicker only year and month

[mutley]

Hi

Is there some way to set dtpicker for to show onlye year and month ?

Some Format ?


Tia

[Siddharth Rout]

yes it is

Right Click on the DTP and Click on properties and change the values as shown in the picture

Hope this helps...

[LaVolpe]

And to follow up with Sid's reply, the dtpicker's custom format is case sensitive (i.e., M and m mean 2 different things). Here is a listing of the formats

[Siddharth Rout]

Nice one Keith.. I missed that... was typing too fast I guess

[mutley]

Thank you all

more I put in my code

dtpDe.CustomFormat = "MM/yyyy"

But show all day of month

[Siddharth Rout]

You didn't understand post 2

Try this...

Private Sub Form_Load()
    dtpDe.Format = dtpCustom
    dtpDe.CustomFormat = "MM/YYYY"
End Sub

[mutley]

I already tried like below

 Case "CRONOGRAMA"
        fraFiltrosA = "FILTROS PARA GERAÇÃO DO CRONOGRAMA"
        fraFiltrosA.ForeColor = &H80FF&
        fraFiltrosA.Enabled = True
        fraFiltrosB.Enabled = True

        tbRelatorio.Buttons("TABELADINAMICA").Value = tbrUnpressed
        tbRelatorio.Buttons("GRUPOSEITENS").Value = tbrUnpressed
        tbRelatorio.Buttons("GERAR").Enabled = True
        dtpDe.Format = dtpCustom
        dtpDe.CustomFormat = "MM/yyyy"

Please see attachment , figura_003.jpg

[Siddharth Rout]

So What is your question?

As far as I can see it has formatted as per your requirement? It does show "08/2010" Right?

[mutley]

yes, but I do not wnat to show days of calendar

[LaVolpe]

yes, but I do not wnat to show days of calendar

Well to turn off the GUI calendar, change the UpDown property to True. Otherwise, you may want to consider doing away with the dtpicker & using 2 combo boxes or something similar.

[VeenaMG]

Hi,

Even if you CustomFormat, The dropdown shows complete calender (with days)

So, why not add a Combobox, and populate it..? something like this :

Private Sub FillMonths(ByVal MFStart As Date, ByVal MFEnd As Date) 
    Dim Tdate As Date
    cmbMonth.Clear
    Tdate = MFStart
    Do
        cmbMonth.AddItem Format(Tdate, "mmm-yyyy")
        Tdate = DateAdd("m", 1, Tdate)
    Loop Until Tdate > MFEnd
End Sub

Regards
Veena

[Siddharth Rout]

Oh!

Yeah in that case, DTP is a wrong choice...

Create a Combo as Keith or Veena suggested.

[mutley]

Very Good, I will to use Combobox