FORMATAR VALOR AO DIGITAR DATAGRIDVIEW EDITAVEL
Olá, amigos.
Tenho um datagridview que pode ser editado, portanto o usuário pode alterar as datas.
é uma grid que mostra os valores e os vencimentos das duplicatas do cliente.
AÃ, no caso, como posso formatar a coluna de data da datagridview para que o usuário digite como se estivesse digitando numa MaskedTextBox?
O DatagridView permite, ou tem que ser na [Ô]raça[Ô]?
Ah, e o campo de valor, também tem que ser formatado.
Até mais.
Tenho um datagridview que pode ser editado, portanto o usuário pode alterar as datas.
é uma grid que mostra os valores e os vencimentos das duplicatas do cliente.
AÃ, no caso, como posso formatar a coluna de data da datagridview para que o usuário digite como se estivesse digitando numa MaskedTextBox?
O DatagridView permite, ou tem que ser na [Ô]raça[Ô]?
Ah, e o campo de valor, também tem que ser formatado.
Até mais.
cara é meio dificil essa de formatar datagriview principamente cpf cnpj e I.E
mas eu creio que assim funciona com datas
datagridview1.Columns([Ô]nome ou indice[Ô]).DefaultCellStyle.Format = [Ô]d ou g[Ô]
para telefone tem esse aqui
crie um modulo e coloque isso
Public Function FormatarMascaraTelefone(ByVal texto As String)
[ô]If texto.Length = 8 Then
[ô] Return Mid(texto, 1, 4) & [Ô]-[Ô] & Mid(texto, 5)
[ô]End If
If texto.Length = 10 Then
Return [Ô]([Ô] & Mid(texto, 1, 2) & [Ô])[Ô] & Mid(texto, 3, 4) & [Ô]-[Ô] & Mid(texto, 7)
End If
If texto.Length = 11 Then
Return [Ô]([Ô] & Mid(texto, 1, 2) & [Ô])[Ô] & Mid(texto, 3, 5) & [Ô]-[Ô] & Mid(texto, 8)
End If
[ô]If texto.Length = 11 Then
[ô] Return IIf(Mid(texto, 1, 4) = [Ô]0800[Ô], Mid(texto, 1, 4) & [Ô] [Ô] & Mid(texto, 5, 3) & [Ô] [Ô] & Mid(texto, 8), [Ô]([Ô] & Mid(texto, 1, 3) & [Ô]) [Ô] & Mid(texto, 4, 4) & [Ô]-[Ô] & Mid(texto, 8))
[ô]End If
Return texto
End Function
e no formulario coloque isso
For index As Integer = 0 To .Rows.Count - 1
datagriview1.Rows(index).Cells(11).Value = FormatarMascaraTelefone(.Rows(index).Cells(11).Value) [ô] tel resi
datagriview1.Rows(index).Cells(12).Value = FormatarMascaraTelefone(.Rows(index).Cells(12).Value) [ô]tel cel
Next
mas eu creio que assim funciona com datas
datagridview1.Columns([Ô]nome ou indice[Ô]).DefaultCellStyle.Format = [Ô]d ou g[Ô]
para telefone tem esse aqui
crie um modulo e coloque isso
Public Function FormatarMascaraTelefone(ByVal texto As String)
[ô]If texto.Length = 8 Then
[ô] Return Mid(texto, 1, 4) & [Ô]-[Ô] & Mid(texto, 5)
[ô]End If
If texto.Length = 10 Then
Return [Ô]([Ô] & Mid(texto, 1, 2) & [Ô])[Ô] & Mid(texto, 3, 4) & [Ô]-[Ô] & Mid(texto, 7)
End If
If texto.Length = 11 Then
Return [Ô]([Ô] & Mid(texto, 1, 2) & [Ô])[Ô] & Mid(texto, 3, 5) & [Ô]-[Ô] & Mid(texto, 8)
End If
[ô]If texto.Length = 11 Then
[ô] Return IIf(Mid(texto, 1, 4) = [Ô]0800[Ô], Mid(texto, 1, 4) & [Ô] [Ô] & Mid(texto, 5, 3) & [Ô] [Ô] & Mid(texto, 8), [Ô]([Ô] & Mid(texto, 1, 3) & [Ô]) [Ô] & Mid(texto, 4, 4) & [Ô]-[Ô] & Mid(texto, 8))
[ô]End If
Return texto
End Function
e no formulario coloque isso
For index As Integer = 0 To .Rows.Count - 1
datagriview1.Rows(index).Cells(11).Value = FormatarMascaraTelefone(.Rows(index).Cells(11).Value) [ô] tel resi
datagriview1.Rows(index).Cells(12).Value = FormatarMascaraTelefone(.Rows(index).Cells(12).Value) [ô]tel cel
Next
Tópico encerrado , respostas não são mais permitidas