Visual Basic не инициализируется до 0

У меня есть следующий код, который должен конвертировать из Цельсия в Фаренгейт и Кельвин, и наоборот. Я хочу, чтобы значения были инициализированы, чтобы текстовое поле по Цельсию начиналось с 0 градусов при первом запуске программы. По какой-то причине, когда код выполняется, он выводит длинное значение -5.52644350035633E-14, которое практически эквивалентно 0, в текстовом поле Цельсия. Я не понимаю, почему программа не будет печатать простой 0 в текстовом поле Цельсия, поскольку я попытался инициализировать его в следующем коде. Может ли кто-нибудь объяснить, что здесь происходит? Пытаюсь понять, что происходит. Спасибо! Кроме того, я француз, поэтому некоторые из моих имен переменных и подпрограмм написаны на французском языке. Извини за это:)

Private Sub ConversionDeTempératures_Load(sender As Object, e As EventArgs) Handles MyBase.Load

    'Initialize the text boxes 
    'Set the initial Celsius value to 0  
    ValeurCelsius = 0.00

    'Calculate the other temperatures when Celsius is 0
    ValeurFahrenheit = ValeurCelsius * 9.0 / 5.0 + 32.0
    ValeurKelvin = ValeurCelsius + 273.15

    'Display the values
    'InputCelsius.Text = ValeurCelsius.ToString()
    'InputFahrenheit.Text = ValeurFahrenheit.ToString()
    'InputKelvin.Text = ValeurKelvin.ToString()
    InputCelsius.Text = System.Convert.ToString(ValeurCelsius)
    InputFahrenheit.Text = System.Convert.ToString(ValeurFahrenheit)
    InputKelvin.Text = System.Convert.ToString(ValeurKelvin)

End Sub

0 ответов

Другие вопросы по тегам