Pada Visual basic menyediakan module yang dapat digunakan
untuk fungsi, subrutin, konstanta, variabel, dan tipe ciptaan yang akan
disediakan bagi keseluruhan project. Untuk module dalam project anda dapat menggunakan perintah
Project > Add Module
Project > Add Module

Setelah menambahkan module, maka pada jendela
project Ekplorer akan tampak module1

Untuk melakukan penulisan kode program , anda dapat
melakukan klik ganda pada module

Pada modul anda dapat mendeklarasikan variabel
dengan awalan DIM, PRIVATE, maupun PUBLIC, dimana awalan DIM dan PRIVATE
membentuk variabel module level (hanya berlaku pada pemakaian module
bersangkutan), sedangkan awalan PUBLIC akan menghasilkan variabel global yang
akan berfungsi bagi keseluruhan program.
Contoh
Dim A as Integer ‘Variabel A adalah module levelPrivate B as Integer ‘ Variabel B adalah module levelPublic C as Integer ‘ Program keseluruhan
Mengenal Sub Prosedure
Kode program sub prosedur di tulis sebagai berikut
[Private Public] [Static] Sub namaprosedur (argument-argumen)End Sub
Setiap
kali prosedur dipanggil, maka pernyataan-pernyataan yang berada di
antara Sub dan End Sub akan di jalankan. Argumen pada prosedur adalah
nilai yang akan di lewatkan saat pemanggilan procedure.
Pada
visual basic 6.0, Sub Prosedure terbagi atas 2 :
1. General
Procedure, procedure yang di aktipkan oleh projeck yang di buat
2. Event
Procedure, procedure yang di aktipkan
oleh system sebagai respon terhadap event
Contoh
Sub tengah yang dapat digunakan untuk menampilkan form tengah layar, dimana x
adalah parameter yang merupakan form akan dibuat ke tengah layar.
Sub Tengah (x As Form)x.top = (Screen.Height – x.Height) /2x.Left = (Screen.Widht – x. Widht) /2End Sub
Private Sub Form_Load()Call Tengah(Me)End Sub
Tidak ada komentar:
Posting Komentar