Kamis, 26 Februari 2015

Pertemuan 3, 23 Februari 2015 : menghitung penggunaan bensin dalam 1 km" menggunakan Microsoft Visual Basic 2010 Express



Halooooo ..
Kali ini saya akan membuat program untuk menghitung berapa liter bensin  yang kita gunakan dalam satu kilometer. Berikut langkah-langkahnya :
1.       Buka aplikasi  Microsoft visual basic 2010 express ->file->New Project->Windows Form Application, isikan namanya terserah. Kemudian klik ok.


2.       Lalu buatlah tampilan seperti di bawah ini , yang  terdiri dari 3 textbox 3 button dan 3 label.




Ubah nama textnya menjadi seperti di bawah:
Label1 = Full Tank(liter)
Label2 = Jarak yang bias dicapai(Km)
Label3 = Km/liter
Button1= Kalkulasi
Button2= Clear
Button3=Exit
Form name = Bensin


Tampilan yang sudah jadinya adalah seperti ini :




3.       Masukan source kode nya untuk masing-masing button :
Untuk button kalkulasi sourse kode nya adalah sebagai berikut

Private Sub btnkalkulasi_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnkalkulasi.Click
        txtBensin.Text = CInt(txtJarak.Text) / CInt(txtTank.Text)
    End Sub





  Untuk button Clear source kode nya adalah sebagai berikut

Private Sub btnClear_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnClear.Click
        txtBensin.Clear()
        txtJarak.Clear()
        txtTank.Clear()

    End Sub



       Untuk button Exit source kode nya adalah sebagai berikut

Private Sub btnExit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnExit.Click
        Me.Close()

    End Sub



4.       Apabila sudah selesai run programnya. Tampilannya seperti ini :




 Saya ambil contoh full tanknya adalah 5 liter dan jarak yang bisa di tempuhnya adalah 20 km, kemudian klik kalkulasi.  Maka tampilannya akan seperti di bawah ini :




Clear untuk menghapus semua nilai yang sudah di inputkan, tampilannya seperti berikut :




Exit untuk keluar dari program .



Terimakasih sudah berkunjung .
Selamat mencoba …. Semoga berhasil !!


 


Tidak ada komentar:

Posting Komentar