data

[fr]

alguem sabe como converter uma data de por exemplo 15, Maio de 2009 para 15-05-2009 ??

agradecia a ajuda  😛

[duduml]

como assim???

tens de explicar melhor o que pretendes...

CUMPS

[Dotinho]

é muito simples, fazes assim:

Dim dt As Date = Date.Parse("15, Maio de 2009 ")    //Entre os parentesis poes oa tua string da data original

Dim s As String = Format(dt, "dd-MM-yyyy")                //Aqui tens uma string <s> que tem a data como queres..

cmps

[fr]

é assim normalmente a data num monthcalendar fica 15, maio de 2009 por exemplo

mas eu quero que esta data fique convertida no formato dd-mm-aaaa

para mais tarde comparar estes valores pois quero que num datagridview apareçam os trabalhos em atraso

[fr]

mas as datas sao muitas , podem ser 15 maio de 2009 , 13 de junho de 2003... aquela foi so um exemplo...

[Dotinho]

claro, é a mesma coisa: a dataorig é a data que tens, num calendarview ou num datepick, eu explico:

a função Data.Parse() lê qualaquer data e tenta-a converter para data de sistema, depois o forma() converta da maneura que nos quisermos..

Onde é que se encontra a tua data? qual é a variavel?

E qual é o destino?

dim dataorig as date

Dim dt As Date = Date.Parse(dataorig)    //Entre os parentesis poes oa tua string da data original

Dim s As String = Format(dt, "dd-MM-yyyy")                //Aqui tens uma string <s> que tem a data como queres..

cmps

==Modificado==

para a data seleccionada aparecer como tu queres: Crias um usas o calendario e poes:

Dim s As String = Format( MonthCalendar1.SelectionStart, "dd-MM-yyyy") 

na string S tens a data no teu formato. (faz copy paste do codigo, e substitui o nome do calendario se for necessario.

cmps

[fr]

acho que percebi no dataorig ponho por exemplo (me.monthcalendar.textbox),nao sei se textbox é uma propriedade do monthcalendar, mas é algo parecido com isto?

[Dotinho]

O calendar nao ten textbox.. eu tambem nao sou experiente em datagrid.

[fr]

pois nao deve ter  😛 mas tem outra qualquer...

[jpaulino]

pois nao deve ter  😛 mas tem outra qualquer...

.SelectionStart

[PNDmartins]

e senão me engano o .SelectionStart devolve-te logo a data no formato "15-02-2009" por exemplo... ou seja, devolve logo como queres.

[Dotinho]

eu já disse isso no meu exemplo, mas nao querem acreditar em mim 😛

Dim s As String = Format( MonthCalendar1.SelectionStart, "dd-MM-yyyy") 

na string S tens a data no teu formato. (faz copy paste do codigo, e substitui o nome do calendario se for necessario.

mesmo que o selectionstart seja igual ou diferente, nao tem difrerença nenhuma..

[fr]

óptimo =D , num monthcalendar nao ha hipotese de obter dois valores? ou seja clico numa data aparece numa textbox e clico noutro dia aparece na segunda caixa de texto, resumindo tenho um monthcalendar e 2 textbox e quero que a primeira textbox tenha uma data seleccionada no monthcalendar e a segunda textbox tem outra data seleccionada.

[duduml]

eu não percebo muito, mas penso que se criares outro monthcalendar resolve a situação...😛

[fr]

pois isso seria a ultima hipotese mas eu queria fazer so com um se possivel....

[devin]

ou simplesmente fazes uma verificação das textbox

quando fores a guardar a data

if textbox1.text = "" then
''insere a data neste
elseif textbox2.text = ""  then
''insere neste.

e assim sucessivamente. pode haver maneiras mais simples mas foi o que me veio a cabeça.

[fr]

hmm...

mas e se a pessoa se enganar e quiser alterar as datas?

faço um botao para apagar o texto das textbox e volta a fazer esse if outra vez né?

[devin]

testado por mim agora mesmo.

Public Class Form1
    ''quando se escolhe uma data diferente ele mete a data automaticamente na textbox. podes usar antes um botão para isso.
    Private Sub DateTimePicker1_ValueChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DateTimePicker1.ValueChanged
        ''formata o valor acrual seleccionado
        Dim s As String = Format(DateTimePicker1.Value, "dd-MM-yyyy")
        ''se a radio button1 estiver seleccionada guarda na textbox1 independentemente se já tem valores ou não.
        If RadioButton1.Checked = True Then
            TextBox1.Enabled = True
            TextBox1.Clear()
            TextBox1.Text = s
       ''faz o mesmo para a radiobutton 2
        ElseIf RadioButton2.Checked = True Then
            TextBox2.Enabled = True
            TextBox2.Clear()
            TextBox2.Text = s
        End If
    End Sub
End Class

[fr]

obrigada pela ajuda  🙂

vou experimentar..

[devin]

depois diz se funciona como querias