Funkcija Partition [VBA]

Vrne niz, ki nakazuje, kje se v izračunanem nizu obsegov pojavlja število.

To konstanto, funkcijo ali predmet omogočimo z ukazom Option VBASupport 1, ki ga moramo vstaviti pred izvedljivo programsko kodo v modulu.

Skladnja:

Partition(Število, Začetek, Konec, Interval)

Vrnjena vrednost:

String

Parametri:

Število: obvezno. Število, ki določa razdelitev.

Začetek: obvezen. Celo število, ki določa spodnjo vrednost obsega števil.

Konec: obvezno. Celo število, ki določa zgornjo vrednost obsega.

Interval: obvezen. Celo število, ki določa velikost delov v obsegu števil (med Začetek in Konec).

Primer:


        Option VBASupport 1
        Option Explicit
        Sub Test_Partition
            Dim retStr As String
            retStr = Partition(20, 0, 98, 5)
            print "20:24  Število 20 se pojavi v obsegu: " & retStr
            retStr = Partition(20, 0, 99, 1)
            print " 20: 20 Število 20 se pojavi v obsegu: " & retStr
            retStr = Partition(120, 0, 99, 5)
            print "100:  Število 120 se pojavi v obsegu: " & retStr
            retStr = Partition(-5, 0, 99, 5)
            print "   : -1 Število -5 se pojavi v obsegu: " & retStr
            retStr = Partition(2, 0, 5, 2)
            print " 2: 3 Število 2 se pojavi v obsegu: " & retStr
        End Sub

Matematične funkcije VBA