April 06, 2013

Konversi suhu Vb.Net 2008


Visual Basic 2008 Express Edition, mengingat untuk versi ini
Microsoft membolehkan kita untuk men-download sekaligus melakukan registrasi softwarenya
dengan gratis. Berikut Link download untuk versi express
http://www.microsoft.com/Express/Download/ dari link tersebut akan mengunduh (download)
file setupvb.exe yang berikutnya akan dilakukan installasi secara on-line.
Tampilan Project Baru


Pada Toolbox VB Kelompok All Windows Forms tambahkanlah objek 1 buah Button ( ), 1 buah objek Textbox () dan 2 buah objek Label () kedalam Objek Form, sehingga tampilan 

Form-nya seperti Gambar dibawah ini,


Aturlah posisi objeknya sesuai keinginan atau seperti gambar diatas. Selanjutnya, lakukan
perubahan nilai (value) pada properties objek sebagai berikut :



Perubahan nilai properties objek-objek diatas dimaksudkan untuk melakukan perubahan dasar
pada objek-objek yang digunakan, hasil akhir tampilannya menjadi seperti gambar dibawah ini :

Tampilan form setelah dilakukan perubahan nilai pada properties



Setelah proses desain objek-objek VB selesai, selanjutnya tinggal melakukan coding (penulisan
kode program) agar program dapat digunakan.
Untuk menambahkan kode perintah (coding) pada latihan kita kali ini, lakukanlah klik ganda pada objek Button  (Tombol )
  sehingga tampil jendela baru yaitu Form1.vb. dengan
baris kode yang telah ada sebagai berikut :


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"
diantara Private Sub dan End Sub, sehingga kode perintah lengkapnya menjadi seperti :
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

Start Debugging atau dengan menekan tombol fungsi F5 atau bisa juga dengan mengklik tombol
 Jika tidak ada kesalahan dalam penulisan kode program, maka hasilnya adalah sebagai berikut :
Isilah nilai derajat Celcius kedalah textbox, kemudian lakukan klik pada tombol sehingga
hasilnya konversi ditampilkan pada Label Fahrenheit.



 .  

No comments:

Post a Comment

:)

 Selamat ulang tahun annaku SYFIA NUR SHABRINA ke -3tahun di tahun 2024   semoga Allah SWT mempertemukan kita kelak di dalam Surga Firdaus...