combobox mes e dia actual

[fr]

no load qual é a propriedade de uma combobox? ja vi que nao era a text....pq eu fiz isto no load do form : diacombobox.text=weekday(now) e nao aparece nada

[CrzB]

no load qual é a propriedade de uma combobox? ja vi que nao era a text....pq eu fiz isto no load do form : diacombobox.text=weekday(now) e nao aparece nada

tenta isto : diacombobox.text=weekday(Date)

[fr]

DiaComboBox.Text = Weekday(Of Date)()

aparece isto automaticamente :s e da erro... --'

[anolsi]

Não percebi bem o que é que queres, queres meter um valor directo na combobox, no load do formulário?

[fr]

é assim eu tenho um "diacombobox","mescombobox"e um "anotextbox" e eu quero que no load apareça a data actual: o dia na "diacombobox" o mes na "mescombobox"e o ano na "anotextbox" que é para se o utilizador se esquecer de inserir a data aparecer a actual... mas nao quero que apareça uma msgbox do tipo "esqueceu-se de inserir a data", quero mesmo que apareça a actual

😛 obrigada

[fr]

yap (anolsi)

[anolsi]

É fácil:

Me.ComboBox1.Text = My.Computer.Clock.LocalTime.Day.ToString
Me.ComboBox2.Text = My.Computer.Clock.LocalTime.ToString("MMMM")
Me.ComboBox3.Text = My.Computer.Clock.LocalTime.Year.ToString

[fr]

já deu  😁

brigadão.

[fr]

só mais uma questaozita o que eu quero em relaçao a isto aparece no load mas eu quero que apareça sempre e nao só no load...

pq este form serve para fazer encomendas e quando eu carrego num botao "nova ecomenda" cria-se uma nova linha no datagridview mas as combobox ficam apagadas....

ja inseri os codigos nas proprias combobox's so que nao da

podem ajudar? Obrigada

[fr]

ah! e pus o codigo tb no botao "nova encomenda" e continua sem dar

[anolsi]

Tens que por o código no botão, mas a direccionar para as novas comboboxes, e tem que dar.

[fr]

olha tenho isto no botao "nova encomenda" no evento click:

    AnoTextBox.Text = Now.Year

        Me.DiaComboBox.Text = My.Computer.Clock.LocalTime.Day.ToString

        Me.MesComboBox.Text = My.Computer.Clock.LocalTime.ToString("MMMM")

        Material_a_encomendarBindingSource.AddNew()

e este no load:

        AnoTextBox.Text = Now.Year

        Me.DiaComboBox.Text = My.Computer.Clock.LocalTime.Day.ToString

        Me.MesComboBox.Text = My.Computer.Clock.LocalTime.ToString("MMMM")

só que nao da :S

[anolsi]

Porque tu alteras o valor antes de fazer novo, que te vai apagar os valores dos campos. Tenta fazer só depois do AddNew

[fr]

iii pois é  ?

nao sabia que isso da ordem dos codigos tinha relevância.

bem obrigada  👍