VB de fonksiyon tanımlama metotları


Bir yordam eklemek için, Tools menüsünden Add procedure ‘ e girilir. Sonra yordam adini yazip, Tipini belirtilir, bu kod modül içindeyse Scope ‘i Public, form ise Private.

Eger kullanilan degerlerin yordam kapaninsa bile içeriginin silinmesini istemiyorsaniz All local variables… ‘i seçin…(bkz: asagida.)



VB de en çok kullandigimiz Sub ( alt program ) dan farkli alt yordamlarda olusturabiliriz, bunlar :


SUB
FUNTION
PROPERTY
EVENT

SUB :
Bu bir standart ( geri bildirimsiz ) alt yordamdir, buraya yazdiginiz kodlar bu kodu çagirdiginiz yere yazmis gibi kullanilir. Eger birden fazla yerde ayni bir kodlari kullaniyorsaniz, bu kodlari bir sub paketi yaparak kullanirsaniz hem görsel güzellik hem de programin boyutu azalir

FUNCTION ( Fonksiyon ) :
Bu tip alt yordamlar genelde içerisinde barindirdigi kodlarin sonucunu geri bildirir. Kisaca :

Private Function DosyaSil(DosyaAdi As sansürsansürsansürsansürsansürsansür) As Boolean

If Dir(DosyaAdi) = Empty Then

DosyaSil = False

Else

Kill DosyaAdi

DosyaSil = True

End If

End Function

Kullanimi :
Msgbox “Dosya silindi :” & DosyaSil(“C:\Gereksiz.grk”)

DosyaSil(“C:\Gereksiz.grk”) in geri gönderdigi deger fonksiyon kod paketindeki ‘dosyasil =’ e yazilan degerdir. Ben önce dosyanin var olup olmadigina baktim yoksa false yap, varsa dosyayi sil ve true degerini geri göndersini yazdim…

PROPERTY ( Özellik ) :

Public Property Get Ozellik() As Variant ‘ Bilgi Okurken

Ozellik = form1.caption

End Property

Public Property Let Ozellik(ByVal Deger as sansürsansürsansürsansürsansürsansür) ‘ Bilgi yazarken

Form1.caption = Deger

End Property


Örnek olarak Ozellik “bi” yazdigimda formun baslik adi ‘bi’ olacaktir, msgbox Ozellik yazdigimda ise mesaj kutusu içerisinde formun basligi yazacaktir… Örnegin bir dosyaya bilgi kayit, okuma yapacaginizda get kismina open … for input #1 gibi yazip okunan bilgiyi Ozellik = okunan_veri gibi yapip ; Let kismina da open … for output #1 gibi yazip bilgiyi dosyaya yazabilirsiniz…

EVENT ( Kesme ) :
Örnek : Command1_Click bu bir event tir. Siz command butonuna tikladiginizda _Click olayina yazilan kesme aktiflesir… Bunun standart projelerde bir sub tan pek farkli yani yoktur ; ama bir OCX hazirladiginizda bir kesme ocx ile bir islem gerçeklestiginde oraya yazilmis bir kodun aktiflesmesini saglar…
Daha iyi anlamaniz için…
Mesela siz command buton tasarliyorsunuz…

… Programin deklarasyon kismina Event(Cliklendim) , Event(SagCliklendim) gibi siraliyorsunuz…

… Sonra kod olarak tiklanacak nesnenin MouseDown kismina,

if buton = 1 then raiseevent cliklendim

if buton = 2 then raiseevent Sagcliklendim

yazarsaniz sizin projenizi formuna ekleyen birisi nesnenin kod kisminda sizin command butonun click olayini seçer gibi cliklendim, sagkliklendim kesmesini tiklayip açilan yere istedigi kodu yazar ve sizin command butonunuzu tiklarsa yazdigi kod aktiflesir…