Const XHundred = ",C,CC,CCC,CD,D,DC,DCC,DCCC,CM"
Const Xten = ",X,XX,XXX,XL,L,LX,LXX,LXXX,XC"
Const Xone= ",I,II,III,IV,V,VI,VII,VIII,IX"
Я использовал это в функции. затем в конце функции я использовал split (), чтобы разбить их на строковые массивы.