command.CommandText = _
"update results set sin=@sin,cos=@cos where id=@id"
command.Parameters.Add(New SqlParameter("@id", SqlDbType.NChar, 10))
command.Parameters.Add(New SqlParameter("@sin", SqlDbType.SmallInt))
command.Parameters.Add(New SqlParameter("@cos", SqlDbType.SmallInt))
'
command.Parameters("@id").Value = a
b = command.Parameters("@sin").Value
command.Parameters("@sin").Value = b + 1
command.Parameters("@cos").Value = 1
|