任何幫助,請爲什麼mysql的值變爲零它有double類型後,在MySQL擁有價值0.50成爲0.00MySQL的值成爲0(零)
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`
不確定,但是您將值作爲字符串發送到數據庫,這看起來很奇怪 - 是使用逗號作爲小數分隔符嘗試解決語言設置嗎?我猜想MySQL不知道如何將'0,5'解析爲雙精度值,並且出現0(可能停在逗號處)。如果是這種情況,使用參數化命令可能會起作用(通常情況會更好),但使用句點作爲分隔符格式化double也可能起作用。 – Mark 2014-12-04 16:27:41
hellow mark yes你真的我改變控制面板區域昏迷及其work.thanks求助 – 2014-12-08 14:18:13