Pertemuan 4, 2 Maret 2015 LATIHAN MEMBUAT INPUT DATA

INPUT DATA KALKULASI

Untuk membuat aplikasi tersebut yuk kita belajar bersama dan lihat tutorialnya ya…

1.       Pertama kita buka vb.netnya, lalu buat program baru.dengan cara KLIK - NEW-PROJECT

Maka tampilan awal akan seperti gambar dibawah ini.

1.       Pada jendela tampilan diatas pilih Windows Form Application,dan pada Nama,ganti dengan nama project yang ingin kita buat yaitu kalkulator. pada Location pilih folder untuk menyimpan project lalu KLIK OK.maka akan tampil seperti gambar dibawah ini.

1.       Tools Yang dibutuhkan

Label                              : 3

TextBox                        : 3

Button                           : 3

1.       1.1 Label ubahlah propertisnya menjadi

Name     : Label1

Text        : Full Tank

1.2  Label ubahlah propertisnya menjadi

Name     : Label2

Text        : Jarak yg ditempuh

                       1.3   Label ubahlah propertisnya menjadi

Name     : Label3

Text        : Km/Liter

2.       2.1  TexBox ubahlah propertisnya menjadi

        Name     : txtTank

        Text        : (kosongkan)

2.2  TexBox ubahlah propertisnya menjadi

        Name     : txtJarak

        Text        : (kosongkan)

2.3  TexBox ubahlah propertisnya menjadi

        Name                     : txtKm

        Text                        : (kosongkan)

        Back Color           : Button Shadow

3.       3.1 Button ubahlah propertisnya menjadi

Nama     : btnKalkulasi

Text        : Kalkulasi

       3.2   Button ubahlah propertisnya menjadi

Nama     : btnClear

Text        : Clear

3.3  Button ubahlah propertisnya menjadi

Nama     : ctnExit

Text        : Exit

 Langsung saja membuat Desainya ya..,pertama klik tool label yang ada disebelah kiri lalu tempatkan pada form yang telah ada.lihat gambar.

1.       Selanjutnya kita mulai membuat script kodenya.

1.1    Double Klik pada button1 (Kalkulasi) maka form baru akan tampil.lalu masukan kode script dibawah ini

Private Sub btnKalkulasi_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnKalkulasi.Click
        txtKm.Text = txtJarak.Text / txtTank.Text & "  km /liter"
      End Sub

                  1.2    Double Klik pada button1 (Clear) maka form baru akan tampil.lalu masukan kode                               script dibawah ini

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

1.3    Double Klik pada button1 (Exit) maka form baru akan tampil.lalu masukan kode script dibawah ini

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

   End Sub

 Lihat Gambar Seperti Dibawah ini

          Setelah selesai Coba di RUN  atau tekan F5 pada keyboard anda.LIHAT HASILNYA.

Bila angka pertama dan angka kedua telah diisi klik tombol yang anda inginkan maka hasilnya dapat anda lihat.pada textbox.

Hasilnya seperti gambar dibawah ini.

Selesai !!!
Selamat Mencoba… J

“jangan menyerah sebelum mencoba dan berusaha”