Andy Prasetyo Utomo, S.Kom Pemrograman Terstruktur (Visual Basic 6.0)

Andy Prasetyo Utomo, S.Kom

Pemrograman Terstruktur (Visual Basic 6.0)

Variable dan Seleksi Kondisi (Visual Basic 6.0) I. Variables Variable adalah nilai yang dapat berubah setiap saat. Pada kondisi ini, variable adalah area yang dialokasikan oleh komputer untuk menyimpan data. Setiap variable harus diberi nama untuk identifikasi dan pemudahan dalam pemanggilan. a) Aturan Penamaan Variable Aturan yang dipakai ketika menamakan suatu variable dalam Visual Basic adalah sebagai berikut: 1) Tidak boleh melebihi 255 karakter 2) Tidak boleh memakai spasi 3) Tidak boleh dimulai dengan angka 4) Tidak boleh memakai titik Dibawah ini adalah contoh penamaan variable yang diperbolehkan dan tidak.

b) Type Data Variable dalam Visual Basic

Universitas Muria Kudus

1

Sistem Informasi



c) Deklarasi Variable Dalam Visual Basic, sangat dianjurkan untuk mendeklarasikan suatu variable dengan cara menentukan nama dan type data yang digunakan. Normalnya kita mendeklarasikan suatu variable pada general section menggunakan Dim statement akan tetapi kita bisa juga mendeklarasikannya dalam suatu prosedur atau fungsi. Syntax deklarasi : Dim As Contoh deklarasi : Dim nama As String Dim jmlbrg As Integer Dim pajak As Double Dim lcounter As byte Dim tanggal As Date Dim nama As String, jmlbrg As Integer, pajak As Double d) Operator Aritmatika


2

Sistem Informasi



e) Contoh Penggunaan Variable dalam aplikasi (Penghitungan Luas Segitiga) 1. Buat desain form seperti dibawah ini

2. Atur Property Kontrol Seperti dibawah ini

Kontrol Form1 Text1

Text2

Text3

Command1 Command2 Command3


Property Name Caption Name Aligment Text Name Aligment Text Name Aligment Text Enabled Name Caption Name Caption Name Caption

Nilai Frmsegitiga Luas Segitiga Txtalas 1 0 Txttinggi 1 0 Txtluas 1 0 False Cmdhitung Hitung Cmdbatal Batal Cmdkeluar Keluar

3

Sistem Informasi



3. Source Code

4. Aplikasi Penghitung Luas Segitiga Setelah Dijalankan


4

Sistem Informasi



f) Latihan Penggunaan Variable Buatlah aplikasi – aplikasi berikut ini : 1. Aplikasi penghitung luas Lingkaran

NB. Rumus Luas Lingkaran adalah π

r2

2. Aplikasi penghitung luas Tabung

NB. Rumus Luas Tabung adalah 2 π


5

r2 t

Sistem Informasi



3. Aplikasi penghitung luas Kerucut

NB. Rumus Luas Kerucut adalah 1/3 π

r2 t

II. Seleksi Kondisi Dalam hampir semua program yang komplek mengandung suatu penyeleksi kondisi. Dengan menyeleksi suau kondisi, program dapat menentukan tindakan apa yang harus dikerjakan, tergantung dari hasil kondisi yang diseleksi tersebut. Untuk menyeleksi suatu kondisi, didalam visual basic dapat dipergunakan statement If dan statement Select … case. a) Statement IF.. Then 1. Statement IF Tunggal ) Syntax IF THEN ELSE END IF ) Contoh IF nilai>90 THEN Ket=”Lulus” ELSE Ket=”Tidak Lulus” END IF


6

Sistem Informasi



2. Statement IF Tunggal ) Syntax IF THEN ELSEIF THEN ELSEIF THEN .. .. .. .. ELSE END IF ) Contoh IF nilai=”A” THEN Ket=”Sangat Bagus” ELSEIF nilai=”B” THEN Ket=”Bagus” ELSE Ket=”Cukup” END IF b) Statement Select..Case ) Syntax SELECT CASE CASE CASE CASE CASE ELSE ] END SELECT


7

Sistem Informasi



) Contoh SELECT CASE nilai CASE “A” Ket=”Sangat Bagus” CASE “B” Ket=”Bagus” CASE ELSE Ket=”Cukup” END SELECT c) Contoh Aplikasi dengan seleksi kondisi (Aplikasi Pengubah Warna Font) 1. Buat desain form seperti dibawah ini :

2. Atur Property Kontrol Seperti dibawah ini

Kontrol Form1 Option1

Option2 Option3


Property Name Caption Name Caption Value Name Caption Value Name Caption Value

Nilai Frmwarna Setting Warna optmerah Merah True opthijau Hijau False optbiru Biru False

8

Sistem Informasi


Command1 Command2 Label2

Pemrograman Terstruktur (Visual Basic 6.0) Name Caption Name Caption Name Caption

Cmdset Setting Cmdkeluar Keluar lblset Latihan VB

3. Source Code

4. Aplikasi Pengubah Warna Font Setelah Dijalankan


9

Sistem Informasi



d) Latihan Aplikasi dengan seleksi kondisi Buat aplikasi pemilihan penghitungan luas / volume bangun seperti di bawah ini :

NB. Rumus Luas Persegi Panjang adalah a.t

a2 t 3 Rumus Volume Bola adalah 4/3 π a t

Rumus Volume Tabung adalah π


10

Sistem Informasi

Andy Prasetyo Utomo, S.Kom Pemrograman Terstruktur (Visual Basic 6.0)

Recommend Documents