Jump to content
obamaself

Conversão de valores de Datagridview

Recommended Posts

obamaself

Boas eu carrego uma datagridview através de SQL.

E quero fazer cálculos com valores de lá.

O problema é que se lê valores com casas decimais ele põe tudo junto. Se tiver 16.3 ele lê 163.

Não consigo converter.

Obrigada

Share this post


Link to post
Share on other sites
obamaself

Isto é um exemplo de um select case.

  If dg.Item("ElasTe", dg.Rows(i).Index).Value.ToString <> "" And dg.Item("ElasTr", dg.Rows(i).Index).Value.ToString <> "" Then
                                Dim normal_te As single= dg.Item("ElasTe", dg.Rows(i).Index).Value
                                Dim normal_tr As single= dg.Item("ElasTr", dg.Rows(i).Index).Value
                                Dim normal_ficha_te As String = ficha.ElasTe
                                Dim normal_ficha_tr As String = ficha.ElasTr
                              
                                'Verificação da existência de *
                                If normal_ficha_te.Contains("*") Then
                                    normal_ficha_te = normal_ficha_te.Replace("*", "")
                                End If
                                If normal_ficha_tr.Contains("*") Then
                                    normal_ficha_tr = normal_ficha_tr.Replace("*", "")
                                End If

                                Dim t1 As Single = normal_ficha_te
                                Dim t2 As Single = normal_ficha_tr

                                'Comparação dos valores
                                If normal_te < t1 Then
                                    dg.Item("ElasTe", dg.Rows(i).Index).Style.BackColor = Color.Tomato

                                End If
                                If normal_tr < t2 Then
                                    dg.Item("ElasTr", dg.Rows(i).Index).Style.BackColor = Color.Tomato
                                End If

                            End If

Share this post


Link to post
Share on other sites
Caça

E de onde é que vem esse 16.3?


Pedro Martins

Não respondo a duvidas por PM

Share this post


Link to post
Share on other sites
obamaself

o 16.3 é o que esta na datagirdview. mas ao passar para a variável (normal_te ou normal_tr) fica 163.

Share this post


Link to post
Share on other sites
Caça

Tenta assim

Dim normal_te As single = Val(dg.Item("ElasTe", dg.Rows(i).Index).Value)
Dim normal_tr As single = Val(dg.Item("ElasTr", dg.Rows(i).Index).Value)


Pedro Martins

Não respondo a duvidas por PM

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

×
×
  • Create New...

Important Information

By using this site you accept our Terms of Use and Privacy Policy. We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.