Sub ve function ların kullanımı nasıl yapılıyor....?

Başlatan Andromeda, 11 Eylül 2011, 15:09:14

Andromeda

Sub ve function ların kullanımı nasıl yapılıyor....?
" Tanrı, iradesini hakim kılmak için yeryüzündeki iyi insanları kullanır, yeryüzündeki kötü insanlar ise kendi iradelerini hakim kılmak için Tanrı'yı kullanırlar." ..." Tanrı'dan mesaj gelmiyor, biz Tanrı'ya mesaj gönderiyoruz"

muhittin_kaplan

C de olduğu gibi.

Sub Bekle(Sure as byte) ;Geri dönen bir deger yoktur
      delayms (Sure)
End Sub

function Carpma(A as byte,B as byte) sonuc as byte
      Sonuc=A*B
end function

Sub main
    bekle(10) ;geri dönen değer olmadığından bekleye gider işlemi yapa ve buraya geri döner
    Dim deger as Word
    Deger=carpma(10,20);geri dönen değer olduğundan  10 ile 20 yi çarpmaya gider sonucu alarak buraya döner ve Deger e atar
end sub

Sysntax hataları olabilir ama Kullanımı Bu şekildedir" Sub ile Functionu ayıran değer döndürüp döndürme mesidir.

Andromeda

Sağolun.C diline şöyle bir baktım..
Alt programları incelemem gerekli sanırım
" Tanrı, iradesini hakim kılmak için yeryüzündeki iyi insanları kullanır, yeryüzündeki kötü insanlar ise kendi iradelerini hakim kılmak için Tanrı'yı kullanırlar." ..." Tanrı'dan mesaj gelmiyor, biz Tanrı'ya mesaj gönderiyoruz"