Rabu, 13 Juni 2018
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 stringPemberian 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
PUBLIC Z AS INTEGER
Private Sub Button1_Click(ByVal
sender As System.Object,
Dim x,y 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:
1.
Desain program
2. Pengaturan Properties
3. Pemberian Perintah/Instruksi pada Program
Alur
Program:
ú Input Bilangan1 dan Bilangan2
ú Klik salah satu tombol Operator, maka akan tampil hasil perhitungan
sesuai operator.
-
Tombol ^ : untuk
memangkatkan
-
Tombol * : untuk
mengalikan
-
Tombol / : untuk
membagi
-
Tombol + : untuk
menambahkan
-
Tombol - : untuk
mengurangkan
ú Klik tombol Bersih, maka isi Bilangan1, Bilangan2 dan
Hasil akan bersih (kosong).
ú Klik tombol Tutup, maka program akan ditutup.
Perintah Program:
Private Sub btnpangkat_Click(ByVal
sender As System.Object,
txthasil.Text = txtbil1.Text ^
txtbil2.Text
End Sub
Private Sub btnkali_Click(ByVal
sender As System.Object,
txthasil.Text = txtbil1.Text *
txtbil2.Text
End Sub
Private Sub btnbagi_Click(ByVal
sender As System.Object,
txthasil.Text = txtbil1.Text /
txtbil2.Text
End Sub
Private Sub btntambah_Click(ByVal
sender As System.Object,
txthasil.Text = Val(txtbil1.Text) +
txtbil2.Text
End Sub
Private Sub btnkurang_Click(ByVal
sender As System.Object,
txthasil.Text = txtbil1.Text -
txtbil2.Text
End Sub
Catatan:
Val : berfungsi untuk
mengubah tipe data string menjadi Numeric.
