Pengikut

Diberdayakan oleh Blogger.
Selasa, 18 Oktober 2011

7. SUB DAN FUNCTION PADA VISUAL BASIC.NET

7. SUB DAN FUNCTION PADA VISUAL BASIC.NET


DALAM PEMROGRAMAN KITA DAPAT MEMECAH PERINTAH-PERINTAH PROGRAM DALAM PROSEDUR DAN FUNGSI TERTENTU. HAL INI MEMUDAHKAN DALAM PEMROGRAMAN KARENA LEBIH TERSTRUKTUR, DAN PROSEDUR-PROSEDUR YANG ADA DAPAT DIPAKAI BERULANG KALI, MEMUDAHKAN UNTUK MAINTENANCE PROGRAM, LEBIH MUDAH UNTUK MENGIDENTIFIKASI BUG. UNTUK MEMBUAT SUB DAPAT MENGGUNAKAN FORMAT DI ATAS, UNTUK NAMA SUB NYA BOLEH BEBAS. DI DALAM SUB TERSEBUT KITA DAPAT MEMASUKKAN CODING-CODING YANG DIINGINKAN. UNTUK MEMANGGIL SUB TERSEBUT DAPAT LANGSUNG SEPERTI DI BAWAH INI.

SUB NAMASUB()
……
……
……
END SUB



UNTUK MEMBUAT SUB DAPAT MENGGUNAKAN FORMAT DI ATAS, UNTUK NAMA SUB NYA BOLEH BEBAS. DI DALAM SUB TERSEBUT KITA DAPAT MEMASUKKAN CODING-CODING YANG DIINGINKAN. UNTUK MEMANGGIL SUB TERSEBUT DAPAT LANGSUNG SEPERTI DI BAWAH INI.

NAMASUB()

 SELAIN SUB KITA JUGA DAPAT MEMBUAT FUNCTION DI MANA DAPAT MEMBERIKAN NILAI BALIK SESUAI DENGAN TIPE DATA YANG DIINGINKAN. MISALKAN DI BAWAH INI DIBERIKAN CONTOH FUNGSI YANG MENGEMBALIKAN NILAI BOOLEAN DI MANA FUNGSI INI MENGECEK APAKAH SEBUAH ANGKA ITU GENAP, JIKA YA MAKA MENGEMBALIKAN NILAI TRUE SEBALIKNYA MENGEMBALIKAN NILAI FALSE.

UNTUK MENGGUNAKAN FUNGSI TERSEBUT DAPAT LANGSUNG DIPANGGIL SEPERTI BERIKUT INI.


FUNCTION ISGENAP( N AS INTEGER ) AS BOOLEAN
IF N MOD 2 = 0 THEN
RETURN TRUE
ELSE
RETURN FALSE
END IF
END FUNCTION

UNTUK MENGGUNAKAN FUNGSI TERSEBUT DAPAT LANGSUNG DIPANGGIL SEPERTI BERIKUT INI.

IF ISGENAP(10) THEN
MESSAGEBOX.SHOW(“GENAP”)
ELSE
MESSAGEBOX.SHOW(“GANJIL”)
END IF

0 komentar: