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

[Andromeda]

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

[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