MySQL의 값은 0 (영)

Question

는 MySQL의 가치 0.50이 후 그것이 0.00

Sub absennaik() 
    Dim u As Double 
    Dim i As Integer = 0 
    For i = 0 To dgv.Rows.Count - 1 
     inputabsen = Val(dgv.Rows(i).Cells(4).Value) 
     If inputabsen <= absenbagus Then 
      u = 0 
     ElseIf inputabsen >= absenburuk Then 
      u = 1 
     Else 
      u = (inputabsen - absenburuk)/(absenburuk - absenbagus) 
     End If 
     Dim cmd = New Odbc.OdbcCommand("select * from fuzzy where fkode='" & i & "'", conn) 
     Dim rd = cmd.ExecuteReader 
     rd.Read() 
     If Not rd.HasRows Then 
      Dim sqltambah As String = "insert into fuzzy(fkode,faktifbaik) values " & "('" & i & "','" & u & "')" 
      Dim cmd1 = New Odbc.OdbcCommand(sqltambah, conn) 
      cmd1.ExecuteNonQuery() 
     Else 
      Dim sqledit As String = "Update fuzzy set " & "faktifbaik ='" & u & "' where fkode = '" & i & "'" 
      Dim cmd1 = New Odbc.OdbcCommand(sqledit, conn) 
      cmd1.ExecuteNonQuery() 
     End If 
    NextEnd Sub` 

Answer 1

아니, 난이,이 것 모르는되었다 double 형을하시기 바랍니다 이유는 MySQL의 값이 0이되었다 도움이되었다 나는 이것이 답변으로 제출하는 이유 인 주석에 비해 너무 컸다. 그러나이 중 일부는 실제로 도움이 될 수있다.

귀하의 질문은 약하며, 누구든지 귀하를 돕기에 충분한 정보를 실제로 식별 할 수있는 정보가 충분하지 않습니다. inputabsen <= absenbagus이고 변수가 0이되기 때문에 0으로 설정됩니까?

실제 질문을 작성하고 정보, 데이터베이스 스키마 정보, 추적, 디버그 문 등을 제공해야합니다. 수정 구슬이없는 사람을 실제로 도울 것입니다.

일부는 MySQL과 VB.NET을 사용하고 있습니다. the MySQL .NET provider을 사용하지 않은 이유는 실제로 매우 훌륭하고 일반적인 ODBC 공급자가 아니라 MySQL을 밀접하게 알고 있도록 설계된 이유입니다.

은 정말 중요하다 당신이 인라인 SQL보다는 여기에 정수 있지만 매개 변수를 다루고있는 알 - 당신이 응용 프로그램 논리의 여부를 확인하기 위해 첨부 디버거 코드 불구 밟은 SQL Injection Attack

구글을 검색하십시오 문제를 일으키는 데이터베이스 논리가 아닌?

데이터베이스에 대해 직접 실행하여 생성 된 SQL을 확인하십시오.

업데이트하려는 열의 데이터 유형을 10 진수로 표시하고 정밀도는 무엇입니까?

문화권 문제입니까 (x.xx 대 x, xx)?

새로운 프로그래밍을 추측하고 나 자신을 더 도울 수 있도록 유용한 제안을 제공하려고했습니다. 예를 들어 "Update fuzzy set " & "faktifbaik ='" &과 같이 소스 코드를 읽음으로써 결론에 도달했습니다. 이것은 완전히 중복되는 문자열입니다. concatanation 및 경험있는 사람이 만드는 실수가 아니에요, 난 정말 당신을 불쾌하게하거나 어떤 식 으로든 무례하게하려는 의도가 아니라, 앞으로 나아가고 희망적으로 문제를 해결하는 방법에 대한 명확한 조언을 제공합니다.