operazioni sulle stringhe

[val]

Buongiorno ragazzi,
chiedo a voi suggerimenti per operazioni sulle stringhe. Ciò che devo fare è la seguente cosa:
Estraggo da un database un valore. E fin qui non ci sono problemi:
1) verifico che all'interno di qst valore ci sia una virgola;
2) prendo ciò che sta alla destra della virgola e lo associo ad una variabile A;
3) prendo ciò che sta alla sinistra della virgola e lo associo ad una variabile B;

[Baol74]

'sottinteso : Valore = Rs("Campo") 
If InStr(Valore,";")>0 then
 ar = Split(Valore,";",2)
 a = ar(1) 'Parte Destra
 b = ar(0) 'Parte Sinistra
end if