Materi Perkuliahan: April 2018

Tujuan
Memberikan pemahaman tentang tipe data dan variabel.

Tipe Data
Seperti bahasa pemrograman yang lain, Visual Basic .Net juga menyediakan berbagai tipe data yang dapat digunakan oleh pemrograman sesuai dengan konteks pemakaiannya. Berikut beberapa tipe data yang tersedia dalam VB.Net yang sering digunakan.

Variabel
Variabel merupakan tempat penyimpanan data. Variabel memiliki sebuah nama disertai dengan tipe data yang akan ditampung oleh variabel tersebut.
Berbeda dengan VB6, variabel dalam VB.Net harus dideklarasikan terlebih dahulu, jika tidak akan terjadi kesalahan Compiler.

Deklarasi Variabel
Dim merupakan keyword dalam pendeklarasian variabel.
Bentuk penulisan Deklarasi Variabel:

Contoh:
Dim a,b as integer
Dim i as string

Pemberian Nilai Awal pada Variabel
Bentuk Penulisan:

Contoh:
a=10
b=5
i=“Visual Basic”

Pendeklarasian Variabel disertai pemberian Nilai Awal
Bentuk Penulisan:

Contoh:
Dim a as integer = 10
Dim i as string = “Visual Basic”

Contoh Program
Private Sub Button1_Click(ByVal sender As System.Object,
   Dim x,y,z as integer
   x=15
   y=5
   z=x*y
   TextBox1.Text=z
End Sub

Operasi Terhadap Tipe Data Numeric
Operasi terhadap tipe data numeric sama halnya melakukan perhitungan matematik atau aritmatika. Ada penjumlahan, pengurangan, perkalian, pembagian, dan sebagainya.

Untuk melakukan perhitungan matematika dibutuhkan operator aritmatika.
Berikut operator aritmatika sesuai urutan pengerjaannya :
^   :     Perpangkatan
*    :     Perkalian
/    :     Pembagian
+    :     Penjumlahan
-    :     Pengurangan

Contoh Program:

Langkah 1

Buka Aplikasi Microsoft Visual Basic → File → New Project → WindowsApplication1 pada Name kita ubah sesuai keinginan → Klik OK

Maka akan muncul tampilan seperti dibawah

Langkah 2
Pada lembar kerja Form1, buatlah Objek seperti dibawah ini

Setelah itu kita ganti Nama Objek berikut dengan cara Klik 1x Objek → Properties → Text.

Maka Hasilnya seperti dibawah

Langkah 3
Pada TextBox 1-3 kita ubah Namanya menjadi:

TextBox1 → TxBil1

TextBox2 → TxBil2

TextBox3 → Txhasil

Langkah 4
Pada Objek (^) (*) (/) (+) (-) (Bersih) (Tutup) kita ubah Namanya menjadi:

(^)→ Btnpangkat

(*)→ Btnkali

(/)→ Btnbagi

(+)→ Btntambah

(-)→ Btnkurang

(Bersih)→ Btnbersih

(Tutup)→ Btntutup

Langkah 5
Setelah semua sudah diberi Nama, mari kita isi Programnya dengan cara dibawah ini:
- Klik 2x Objek (^) maka akan muncul Program dan kita isi dengan
Txhasil.Text = TxBil1.Text ^ TxBil2.Text

- Klik 2x Objek (*) maka akan muncul Program dan kita isi dengan
Txhasil.Text = TxBil1.Text * TxBil2.Text

- Klik 2x Objek ( / ) maka akan muncul Program dan kita isi dengan
Txhasil.Text = TxBil1.Text / TxBil2.Text

- Klik 2x Objek (+) maka akan muncul program dan kita isi dengan
Txhasil.Text = Val(TxBil1.Text) + TxBil2.Text

Catatan:
Val : berfungsi untuk mengubah tipe data string menjadi Numeric.

- Klik 2x Objek (-) maka akan muncul program dan kita isi dengan
Txhasil.Text = TxBil1.Text - TxBil2.Text

- Klik 2x Objek (Bersih) maka akan muncul program dan kita isi dengan
TxBil1.Text = ""
TxBil2.Text = ""
Txhasil.Text = ""

- Klik 2x Objek (Tutup) maka akan muncul program dan kita isi dengan
End

Langkah 6
Setelah semua sudah selesai klik File → lalu Save

Setelah itu mari kita jalankan Aplikasi Operasi Matematikanya, dengan cara Klik Start Debugging atau tekan tombol F5.
Untuk menghentikan Aplikasi tekan Stop Debugging atau Tutup pada Aplikasi tersebut.


Hasil KALI 9*9

Sekian dulu dari saya, semoga Tutorial ini berguna bagi teman-teman semua. Terimakasih 😇

Script Kode diatas sbb:

Public Class Form1
    Private Sub Btnpangkat_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btnpangkat.Click
        Txhasil.Text = TxBil1.Text ^ TxBil2.Text
    End Sub

    Private Sub Btnkali_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btnkali.Click
        Txhasil.Text = TxBil1.Text * TxBil2.Text
    End Sub

    Private Sub Btnbagi_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btnbagi.Click
        Txhasil.Text = TxBil1.Text / TxBil2.Text
    End Sub

    Private Sub Btntambah_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btntambah.Click
        Txhasil.Text = Val(TxBil1.Text) + TxBil2.Text
    End Sub

    Private Sub Btnkurang_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btnkurang.Click
        Txhasil.Text = TxBil1.Text - TxBil2.Text
    End Sub

    Private Sub Btnbersih_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btnbersih.Click
        TxBil1.Text = ""
        TxBil2.Text = ""
        Txhasil.Text = ""
    End Sub

    Private Sub btntutup_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btntutup.Click
        End
    End Sub
End Class

Catatan:
Val : berfungsi untuk mengubah tipe data string menjadi Numeric.

===========================

LATIHAN 1

Membuat Program untuk Luas dan Keliling Persegi Panjang dengan tampilan sbb:

1. Desain Program

2. Pengaturan Properties

Rumus Luas dan Keliling Persegi Panjang:
Keliling = (2 x Panjang) + (2 x Lebar)
Luas = Panjang x Lebar

3. Kode Program
Public Class Form1
    Private Sub btnProses_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnProses.Click
        txtLuas.Text = txtP.Text * txtL.Text
        txtKel.Text = Val(2 * txtP.Text) + Val(2 * txtL.Text)
    End Sub
    Private Sub btnBersih_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnBersih.Click
        txtP.Text = ""
        txtL.Text = ""
        txtKel.Text = ""
        txtLuas.Text = ""
    End Sub
    Private Sub btnTutup_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnTutup.Click
        End
    End Sub

End Class

4. Hasil Program
Setelah semua selesai di Input dengan benar, mari kita lakukan Start Debugging atau dengan menekan tombol F5. Untuk menghentikan Progam bisa menekan Tombol Tutup atau Stop Program.
Maka tampilannya seperti dibawah ini:

Setelah itu mari kita coba menghitung Luas dan Keliling Persegi Panjang, dan ketika sudah di Proses tampilannya seperti dibawah:

Ingat: Yang di isi hanya Panjang dan Lebar saja, dan setelah itu Klik Proses.

Dan itulah Tutorial untuk mencari Luas dan Keliling Persegi Panjang, semoga Tutorial diatas bisa membantu teman-teman semuanya. Terimakasih 😇

===========================

LATIHAN 2
Membuat Program untuk mencari Luas dan Keliling Segitiga dengan tampilan sbb:

1. Desain Program

Desain Program

2. Pengaturan Properties

Tabel Properties

Rumus Luas dan Keliling Segitiga :
Luas = ½ x Alas x Tinggi
Keliling = Sisi A + Sisi B + Sisi C

3. Kode Program
Public Class Form1
    Private Sub btnproses_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnproses.Click
        txtLuas.Text = Val(0.5 * txtA.Text) * txtT.Text
        txtKel.Text = Val(txtSA.Text) + Val(txtSB.Text) + Val(txtSC.Text)
    End Sub

    Private Sub btnbersih_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnbersih.Click
        txtA.Text = ""
        txtT.Text = ""
        txtSA.Text = ""
        txtSB.Text = ""
        txtSC.Text = ""
        txtLuas.Text = ""
        txtKel.Text = ""
    End Sub

    Private Sub btntutup_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btntutup.Click
        End
    End Sub
End Class

Catatan:
Val : berfungsi untuk mengubah tipe data string menjadi Numeric.

4. Hasil Program
   Setelah semua selesai di Input dengan benar, mari kita lakukan Start Debugging atau dengan menekan tombol F5. Untuk menghentikan Progam bisa menekan Tombol Tutup atau Stop Program.
Maka tampilannya akan seperti dibawah ini:

Tampilan Program

Setelah itu mari kita coba menghitung Luas dan Keliling Persegi Panjang, dan ketika sudah di Proses tampilannya seperti dibawah:

Tampilan Hasil Program

Ingat: Yang di isi hanya Alas, Tinggi, Sisi A, Sisi B dan Sisi C saja, dan setelah itu Klik Proses.

Deimikian Tutorial untuk mencari Luas dan Keliling Segitiga, semoga Tutorial ini dapat membantu teman-teman semua. Terimakasih 😇

Sumber :
STMIK Triguna Dharma Medan

Pada pertemuan kali ini Saya akan memberikan pemahaman tentang IDE Visual Basic 2008 dan pemahaman tentang Control, Properties, Method dan Event.

Yuk... mari kita langsung menuju Langkah-langkahnya .

Menjalankan Visual Basic
Start ￫ Program ￫ Microsoft Visual Studio 2008 ￫ Microsoft Visual Studio 2008

Tampilan Start Page VB 2008

Membuat Project

Menu File ￫ New Project atau Klik Create: Project (Dari tampilan Start Page)

Pada Project Types: pilih Windows

Pada Templates: pilih Windows Forms Application

Pada Name: ketik nama Project

Klik OK

Tampilan New Project

Integrated Development Environment (IDE) Visual Basic 2008
Lingkungan Visual Basic 2008 terdiri dari:
ToolBox (Kotak Perlengkapan) yaitu kotak yang berisi objek-objek pemrograman yang digunakan untuk menggambar atau mendesain program.

Bila Toolbox tidak muncul, klik menu View ￫ Toolbox.

Solution Explorer yaitu kotak yang berisi project, form, modul program yang sedang dibuat. Solution Explorer berfungsi untuk mengeksplor form dan modul yang ada didalamnya.
Bila Solution Explorer tidak muncul, klik menu View ￫ Project Explorer.

Properties Window yaitu jendela yang berisi karakteristis atau ciri-ciri dari suatu objek pemrograman.

Bila Jendela Properties tidak muncul, klik menu View ￫ Properties Window.

Form yaitu Lembaran Kerja pemrograman atau tempat meletakkan dan mengatur objek pemrograman.

IDE Visual Basic 2008

Keterangan gambar:
1. Menubar
2. Toolbar
3. Tollbox
4. Solution Explorer
5. Properties Window
6. Form

Control dan Properties

Control adalah sebuah objek yang dapat diletakkan dan diatur serta menjadi bagian dari sebuah form sehingga user dapat berinteraksi dengan aplikasi yang dibuat. Control atau objek pemrograman terdapat pada toolbox, contohnya textbox, label, button dan lain-lain.

Control adalah sebuah objek yang memiliki identitas dan ciri khas yang membedakan satu control dengan control yang lain walaupun dengan basic class yang sama. Contohnya dua objek button, masing-masing memiliki ciri khas atau karakteristik seperti: ukuran, text, warna yang berbeda satu dengan lainnya.

Ciri khas tersebut pada visual basic dikenal dengan properties. Properties dapat diatur dengan dua cara yaitu: (1) melalui properties window, (2) melalui code editor.

Control atau objek yang sering digunakan pada pemrograman beserta propertiesnya

Properties yang sama pada setiap objek adalah Name yang berfungsi untuk memberi nama Objek.

Code Editor

Code Editor adalah sebuah jendela yang berfungsi untuk menulis kode program.

Untuk menampilkan Code Editor, klik menu View ￫ Code

Cara yang biasa digunakan programmer adalah dengan mengklik 2x objek yang terdapat pada Form.

Code Editor

Keterangan gambar:
1. Object Pemrograman atau Class Name
2. Method Name
3. Lembar Pengetikan Program

Method (Event)

Method merupakan kejadian atau aksi yang dapat dilakukan oleh sebuah control.
Contoh: Load, Click, DoubleClick.

Kode program diketik pada objek program (diantara Private Sub dan End Sub) yang berada dalam lingkungan Class (diawali dengan Public Class dan diakhiri dengan End Class).

Bentuk Umum Penulisan Kode Program

Contoh:

TextBox1.Text = “Visual Basic”

Contoh Program:
1. Desain awal program

2. Atur Properties Masing-masing Objek sebagai berikut:

Tampilan program setelah pengaturan properties sebagai berikut:

3. Pemberian Perintah/Instruksi pada Program

Alur Program:

a. Jika diklik CheckBox1 (OOP), maka pada objek TextBox1 (Txtoop) akan tampil teks:

“Object Oriented Programming”

b. Jika diklik CheckBox2 (VB), maka pada objek TextBox2 (Txtvb) akan tampil teks:

“Visual Basic”

c. Jika diklik RadioButton1 (Benar), maka pada objek TextBox3 (Txtbs) akan tampil teks:

“Anda memilih Benar”

d. Jika diklik RadioButton2 (Salah), maka pada objek TextBox3 (Txtbs) akan tampil teks:

“Anda memilih Salah”

e. Jika diklik tombol Button1 (Bersih), maka:

- tanda checklist pada OOP akan hilang.

- tanda checklist pada VB akan hilang.

- teks pada objek Txtoop, Txtvb dan Txtbs akan dihapus (kosong).

f. Jika diklik tombol Button2 (Tutup), maka program akan ditutup (keluar dari program)

Perintah Program:

a. Perintah pada Objek CheckBox1

Private Sub chkoop_CheckedChanged(ByVal sender As System.Object,…

txtoop.Text = "Object Oriented Programming"

End Sub

b. Perintah pada objek CheckBox2

Private Sub chkvb_CheckedChanged(ByVal sender As System.Object,…

txtvb.Text = "Visual Basic"

End Sub

c. Perintah pada objek RadioButton1

Private Sub rdobenar_CheckedChanged(ByVal sender As System.Object,…

txtbs.Text = "Anda Memilih Benar"

End Sub

d. Perintah pada objek RadioButton2

Private Sub RdoSalah_CheckedChanged(ByVal sender As System.Object,…

txtbs.Text = "Anda Memilih Salah"

End Sub

e. Perintah pada objek Button1

Private Sub btnbersih_Click(ByVal sender As System.Object, …

chkoop.Checked = 0

chkvb.Checked = False

txtoop.Text = ""

txtvb.Clear()

txtbs.Text = ""

End Sub

f. Perintah pada objek Button2

Private Sub btntutup_Click(ByVal sender As System.Object, …

End

End Sub

Tampilan program setelah dijalankan sebagai berikut:

Untuk menjalankan program, klik tombol Start Debugging ▶️ atau tekan F5 pada Keyboard

Untuk menutup program, klik tombol Stop Debugging ⏹️

LATIHAN

Tambah Perintah/Instruksi Program sebagai berikut:

a. Jika diklik CheckBox1 (OOP), maka:

- objek TextBox1 (Txtoop) akan menampilkan teks: “Object Oriented Programming”

- warna teks biru.

b. Jika diklik CheckBox2 (VB), maka:

- objek TextBox2 (Txtvb) akan menampilkan teks: “Visual Basic”

- warna background textbox kuning.

c. Jika diklik tombol Button1 (Bersih), maka:

- tanda checklist pada OOP akan hilang.

- tanda checklist pada VB akan hilang.

- teks pada objek Txtoop, Txtvb dan Txtbs akan dihapus (kosong).

- warna background Textbox2 (Txtvb) kembali menjadi putih.

Yuk mari kita sama sama belajar mengerjakan Latihannya 😇

Langsung kita mulai dari Contoh diatas,

Dari program yang sudah kita buat diatas tadi, kita hanya perlu merubah Propertiesnya, langkah-langkahnya:

Klik objek Txtoop, lihat Properties di sebelah kanan. Pada ForeColor kita beri warna menjadi Biru
Klik 2x Objek VB, maka akan muncul perintah program. Lalu kita tambahkan Kode Txtvb.BackColor = Color.Yellow dibawah Txtvb.Text = "Visual Basic"
Klik 2x objek Bersih, maka akan muncul lagi perintah program. Lalu kita tambahkan Kode Txtvb.BackColor = Color.White , karena pada latihan kita disuruh mengubahnya kembali menjadi warna putih maka dari itu kita menggunakan Kode warna Putih.
Setelah program sudah selesai di Edit, jalankan Programnya...