Donatur utama

Rabu, 15 Oktober 2008

Prosedur

Prosedur digunakan untuk mengelompokkan baris-baris perintah yang dapat dipanggil sewaktu-waktu.

Bentuk umum dari sebuah prosedur
      sub NamaProsedur()
          perintah
      end sub
contohnya
      sub hapus()
          console.clear()
      end sub


Untuk memanggil sebuah prosedur digunakan nama prosedure tersebut.

Supaya sebuah prosedure dapat menyimpan nilai ketika dipanggil digunakan bentuk seperti berikut ini :
      Sub NamaProsedure([byval byref] variabel as type)
         perintah
      end sub

Contoh

      Sub cetak(byval i as string)
         Console.write(i)
      end sub

maka ketika Memakai atau memanggil prosedure tersebut digunakan cara

   cetak("kalimat yang akan dicetak")

Cara pengiriman Nilai ada 2 yakni:

   1.Byval

   2.ByRef


ByvalDigunakan untuk mengirimkan nilai ke prosedure kemudian nilai tersebut akan disimpan pada variabel penerima yang terdapat di prosedure tersebut.(jika anda menggunakan prosedur cetak yang diatas dan dipanggil dengan cara berikut

   a="selamat Tidur"
   cetak(a)

Maka Nilai yang terdapat di variabel a yaitu "selamat Tidur" akan disimpan di variabel i karena pada prosedure cetak variabelnya adalah i, sehingga nilai i adalah "selamat Tidur".


ByRefdigunakan untuk mengirimkan nilai ke variabel penampung pada prosedure dan jika variabel penampung tersebut diubah maka nilai variabel pemberi ikut diubah

contoh jika prosedure diubah menjadi seperti berikut

   sub cetak(byref i as string)
         console.write(i)
         i="Tidur aja terus"
      end sub

Variabel i adalah variabel penampung karena di kenalkan di dalam kurung sebuh prosedur. dan jika prosedure tersebut dipanggil dari sub utama dengan cara berikut
      a="selamat pagi"
      cetak(a)

maka nilai variabel a yang ada di sub main akan berubah menjadi "tidur aja terus".Variabel a disebut dengan variabel pemberi nilai

0 komentar:

 

Berlangganan

Enter your email address:

Delivered by FeedBurner

Belajar Tik


Pengikut

Komentar Terbaru

Belajar Tik
Tempatnya Belajar Teknologi Informasi dan Komunikasi

Administrator By : 3eta