Sunday, April 10, 2016

Fahrenheit To Celsius Converter in Visual Basic.NET Version 2

Here is the second version of my program that I wrote before in Visual Basic.NET Fahrenheit to Celsius Converter in Visual Basic.NET the code is very simple and easy to understand.


Add me at Facebook my address is jakerpomperada@gmail.com and jakerpomperada@yahoo.com

My mobile number here in the Philippines is 09173084360.




Sample Program Output


Program Listing


Public Class Form1

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Label3.Visible = False
    End Sub

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Label3.Visible = True

        Dim F As Decimal

        Dim C As Decimal

        C = Val(TextBox1.Text)

        F = C * 1.8 + 32
        Label3.Text = "The temperature in Celsius is " & F & Chr(176) & "C"

    End Sub

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        TextBox1.Text = ""
        Label3.Text = ""
        TextBox1.Focus()
    End Sub
End Class

No comments:

Post a Comment