Ορισμός συνάρτησης

Μπορούμε ακόμα να ορίσουμε δικές μας συναρτήσεις με τον εξής τρόπο:

Function όνομα συνάρτησης(δηλώσεις παραμέτρων) as τύπος αποτελέσματος
	δηλώσεις τοπικών μεταβλητών;

	εντολές
	όνομα = τιμή
end Function

Οι παράμετροι της συνάρτησης είναι μια σειρά από τύπους και ονόματα μεταβλητών χωρισμένα με κόμμα.
Όταν καλείται μια συνάρτηση οι μεταβλητές που ορίστηκαν ως παράμετροι παίρνουν τις τιμές που δόθηκαν στο όρισμα κατά την κλήση.
Για να θέσουμε την τιμή που επιστρέφει η συνάρτηση αναθέτουμε μια τιμή στο όνομά της (δεν ορίζουμε αντίστοιχη μεταβλητή).

Παράδειγμα:

Sub main()
    MsgBox "64!=" + Str(factorial(45))
End Sub

' Return n!
Function factorial(n As Integer) As Double
    Dim i As Integer
    Dim r As Double ' result
    
    r = 1
    For i = 1 To n
        r = r * i
    Next i
    factorial = r
End Function

Η εντολή exit function μπορεί να εμφανιστεί σε οποιοδήποτε σημείο της συνάρτησης. Στο σημείο εκείνο σταματά η εκτέλεση της συνάρτησης και ο έλεγχος ροής του προγράμματος συνεχίζει από το σημείο που κλήθηκε η συνάρτηση.