DATAS
Boas ppl
Tenho o seguinte código que me mostra o valor mais pequeno de uma coluna do datagrid.
Mas na colunaos dados estão em forma de data!
O que devo mudar para utilizar este código para datas?!
[ô]Valor Data de Fim
Dim valor8 As Decimal
For Each col As DataGridViewRow In DataGridView3.Rows
If col.Cells(10).Value.ToString <> [Ô][Ô] Then
[ô]Verifica se o valor da célula é maior que o armazenado
If col.Cells(10).Value > valor8 Then
valor8 = col.Cells(10).Value
End If
End If
Next
TextBox8.Text = valor8
Tenho o seguinte código que me mostra o valor mais pequeno de uma coluna do datagrid.
Mas na colunaos dados estão em forma de data!
O que devo mudar para utilizar este código para datas?!
[ô]Valor Data de Fim
Dim valor8 As Decimal
For Each col As DataGridViewRow In DataGridView3.Rows
If col.Cells(10).Value.ToString <> [Ô][Ô] Then
[ô]Verifica se o valor da célula é maior que o armazenado
If col.Cells(10).Value > valor8 Then
valor8 = col.Cells(10).Value
End If
End If
Next
TextBox8.Text = valor8
Amigo não dei para entender exatamente o que queres. Posta ai como esta ficando e como quer que fique.
Até mais.
Até mais.
Se for números! ele acha o numero mais pequeno e mostra na textbox!
Mas agora estou precisando utilizar esse código para uma coluna onde tenho datas!
Preciso de achar a data mais pequena e postar no textbox!
Mas agora estou precisando utilizar esse código para uma coluna onde tenho datas!
Preciso de achar a data mais pequena e postar no textbox!
Como você faz para pegar o menor numero?
Utilizo a formula em cima....
Comparando Datas...
DateTime.Compare(Data1, Data2)
Se retornar -1 a Data1 é menor
Se retornar 1 a Data1 é maior
Se retornar 0 são iguais
Abraços
DateTime.Compare(Data1, Data2)
Se retornar -1 a Data1 é menor
Se retornar 1 a Data1 é maior
Se retornar 0 são iguais
Abraços
Assim:
Até mais.
Valor Data de Fim
Dim valor8 As date
For Each col As DataGridViewRow In DataGridView3.Rows
If col.Cells(10).Value.ToString <> [Ô][Ô] Then
[ô]Verifica se o valor da célula é maior que o armazenado
If col.Cells(10).Value > valor8 Then
valor8 = col.Cells(10).Value
End If
End If
Next
TextBox8.Text = valor8
Até mais.
If col.Cells(10).Value > valor8 Then
Nessa linha ele dá esse erro:
Operator [ô]>[ô] is not defined for type [ô]Double[ô] and type [ô]Date[ô].
Nessa linha ele dá esse erro:
Operator [ô]>[ô] is not defined for type [ô]Double[ô] and type [ô]Date[ô].
Posta ai como ficou seu codigo;
Citação::
If col.Cells(10).Value > valor8 Then
Nessa linha ele dá esse erro:
Operator [ô]>[ô] is not defined for type [ô]Double[ô] and type [ô]Date[ô].
Pra comparar datas use meu post acima !
não entendi.
Uso o seu código no do altair
Uso o seu código no do altair
Tópico encerrado , respostas não são mais permitidas