No, ma te la puoi costruire ad hoc.
Prova con questa

function numcar(stringa, carattere)
numcar = Len(stringa) - Len(Replace(stringa, carattere, ""))
end function

Non ho capito quello che chiedi...

Ma così non puoi definire una variabile! var è una stringa? Forse volevi scrivere

var = "1234,5678,92"

Se vuoi "separare" i vari blocchi (divisi da virgole) puoi usare la funzione Split che ti crea un array i cui elementi sono proprio questi blocchi:

blocchi = Split(var, ",")

Gli indici di blocchi vanno da 0 a UBound(blocchi).

Ma chevvordì??
Ma usi VBScript o JScript? E asp o asp.net?