Konversi Suhu

Program konversi suhu merupakan suatu program sederhana yang berfungsi mengubah nilai suhu celcius ke Fahrenheit. Aplikasi konversi suhu dari derajat celcius ke derajat fahrenheit dengan rumus konversi F = C * 1.8 + 32.
Untuk membuat suatu aplikasi suhu sederhana, kita membutuhkan 1 buah textbox, 1 button dan 2 label. Untuk keterangan properties-nya, dapat dilihat dari tabel berikut:

Setelah proses desain objek-objek VB selesai, selanjutnya tinggal melakukan coding  (penulisan kode program) agar program dapat digunakan. Ketikkan code berikut:
Public Class Form1

    Private Sub cmdKonversi_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdKonversi.Click
        Dim Hasil As Double
        Hasil = Val(txtCelcius.Text) * 1.8 + 32
        lblFahrenheit.Text = Hasil & " Fahrenheit"
    End Sub

End Class

Untuk mendapatkan file pdf-nya klik download