- Buat Projek baru
- Buat tampilan seperti gambar dibawah ini:
 |
Konversi Suhu |
- Text pada Label1 dihapus saja.
 |
Text pada label dikosongkan saja |
- Sehingga hasilnya seperti ini:
 |
Konversi suhu |
- Pada Button Konvrt ketikan kode berikut:
If RadioButton1.Checked = True Then
Label1.Text = TextBox1.Text & " Celsius = " & (TextBox1.Text - 32) / 1.8 & " Fahrenheit"
ElseIf RadioButton2.Checked = True Then
Label1.Text = TextBox1.Text & " Fahrenheit = " & (TextBox1.Text * 1.8) + 32 & " Celsius"
End If
 |
Aplikasi Konversi Suhu |