ilgiliforum facebook   ilgiliforum google plus   ilgiliforum instagram   ilgiliforum youtube   ilgiliforum tumblr   ilgiliforum pinterest   ilgiliforum rss  

Function – Fonksiyon

 
Bu konu ile benzer olabilecek diğer forum sayfaları
 
 
 
 
Belli işlemleri yerine getirip işlem sonucuna bağlı olarak değer üreten kod parçasıdır.
 
Public Function Deger(X, Y)
 
If X > 0 Then
 
Deger = X + Y
 
Else
 
Exit Function ‘ Tercihli çıkış
 
End If
 
Deger = Sqr(Deger) ‘ Fonksiyon sonucu
 
End Function
 
 
 
Private Sub Form_Load()
 
Dim D1 As Long, D2 As Long
 
D1 = InputBox(" D1 ? ")
 
D2 = InputBox(" D2 ? ")
 
Deger = Topla(D1, D2) ‘ Fonkisyon çağrılıyor
 
MsgBox Deger
 
End Sub
 
 
 
1) Referans ile fonksiyon çağırmak : Fonksiyon içerisinde değeri değişen değişkenin bu değeri saklamasını sağlar.
 
 
 
Sub Bip(BipSayisi As Integer)
 
Do While BipSayisi > 0
 
Beep
 
BipSayisi = BipSayisi - 1
 
Loop
 
End Sub
 
 
 
Dim KacDefaBip As Integer
 
KacDefaBip = 5
 
Bip KacDefaBip
 
MsgBox KacDefaBip & "Defa Bip Sesi Çıkardım" ‘ Mesaj : 0 Defa Bip Sesi Çıkardım
 
 
 
2) Değer ile fonksiyon çağırmak : Fonksiyon içerisinde değeri değişen değişkenin; fonksiyon çağrılmadan önceki değerini almasını sağlar.
 
 
 
Sub Bip(ByVal BipSayisi As Integer)
 
Do While BipSayisi > 0
 
Beep
 
BipSayisi = BipSayisi - 1
 
Loop
 
End Sub
 
 
 
MsgBox KacDefaBip & "Defa Bip Sesi Çıkardım" ‘ Mesaj : 5 Defa Bip Sesi Çıkardım

ALINTIDIR
 
 
Forumlar okunmak ve paylaşmak içindir...

 
 

 ~ 

Bu konunun linki : 

Yukarıdaki linki arkadaşlarınıza göndermek için kullanabilirsiniz ve bu sayfada; Function – Fonksiyon hakkında bilgiler nedir yazıları veya şiirleri gibi sözleri veya resimleri Function – Fonksiyon siteleri gibi benzer birçok forum konularını bulabilirsiniz.

 ~ 

Son Forum Mesajları

Kaynak linkimizi belirtmek koşulu ile her türlü bilgiyi kopyalayabilirsiniz. Forum içerisinde yazılan tüm mesajların hukuki sorumlulukları mesajları yazanlara aittir. Üyeler, üyelik sözleşmesi gereği bu kuralı kabul etmiş sayılır. Ziyaretçilerimiz bu forumu kullanmadan önce Forum Kurallarını okumak zorundadırlar. Aksi durumda meydana gelecek bütün olumsuz durumlardan ziyaretçilerin bizzat kendileri sorumludur. Sitemizde telif, kişi haklarına; yasalara aykırı olduğunu düşündüğünüz bir konu görürseniz bize aşağıdaki iletişim adresinden ulaşabilirsiniz.

1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60 100, 150, 200, 250, 300, 350, 400, 450, 500, 550, 600, 650, 700, 750, 800, 850, 900, 950, 960

© 2006-2019 ilgiliFORUM.com