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.
2. 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
Bentuk penulisan Deklarasi Variabel:
⚉ Contoh:
Dim a,b as integer
Dim i as string
➧ Pemberian Nilai Awal pada Variabel
Bentuk Penulisan:
➧ Pendeklarasian Variabel disertai pemberian Nilai Awal
Bentuk Penulisan:
⚉ Contoh:
Dim a as integer = 10
Dim a as integer = 10
Dim i as string = “Visual
Basic”
◉ Contoh Program
PUBLIC Z AS INTEGERPrivate 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
^ : memangkatkan
- Tombol * :
mengalikan
- Tombol / : membagi
- Tombol + :
menambahakan
- Tombol-
: mengurangkan
ú Klik tombol Bersih, maka isi Bilangan1, Bilangan2 dan
Hasil akan bersih (kosong).
ú Klik tombol Tutup, maka program akan ditutup.
Perintah Program:
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.
0 komentar:
Posting Komentar