switch (num) {
case 1:
number = 'I';
break;
case 2:
number = 'II';
break;
case 3:
number = 'III';
break;
case 4:
number = 'IV';
break;
case 5:
number = 'V';
break;
case 6:
number = 'VI';
break;
case 7:
number = 'VII';
break;
case 8:
number = 'VIII';
break;
case 9:
number = 'IX';
break;
default:
number = '_'
}

[js]
... ваш код...
[/js]

Public Function RomanToArabic2(ByVal RStr As String) As Long
Dim i%, h%, j As Byte
RStr = UCase(RStr)
For j = 1 To Len(RStr)
    i = InStr("IVXLCDM", Mid(RStr, j, 1))
    i = IIf(i, Choose(i, 1, 5, 10, 50, 100, 500, 1000), 0)
    h = IIf(h < i, i - h * 2, i): RomanToArabic2 = RomanToArabic2 + h
Next
End Function

// Переводит римские числа в арабские
var num = prompt("Введите римское число", "ammmCMXCIX"); // default - 3999
if(num) alert(RomanToArabic(num));
			
function RomanToArabic() {
	var i, alph = { I:1, V:5, X:10, L:50, C:100, D:500, M:1000 };
	for(var h = 0, j = 0, n = 0; j < arguments[0].length; j++) {
		i = alph[arguments[0].charAt(j).toUpperCase()];
		if(i) n += h = (h < i ? i - (h << 1) : i);
	}
	return n;
}

// Переводит арабские числа в римские 
var num = prompt("Введите число", 19); // default - 19
if(num) alert(ArabicToRoman(num));

function ArabicToRoman() {
	var alph = [["I",1], ["IV",4], ["V",5], ["IX",9], ["X",10], ["XL",40], ["L",50], ["XC",90], ["C",100], ["CD",400], ["D",500], ["CM",900], ["M",1000]];
	for(var j = alph.length - 1, i = arguments[0], n = ""; j != -1; j--) {
		if(~~(i / alph[j][1]) > 0) { n += alph[j][0]; i -= alph[j][1]; j++; }
	}
	return n;
}

if(~~(i / alph[j][1]) > 0) { n += alph[j][0]; i -= alph[j][1]; j++; }

// Переводит римские числа в арабские
var num = prompt("Введите римское число", "ammmCMXCIX"); // default - 3999
if(num) alert(RomanToArabic(num));
			
function RomanToArabic() {
	// объявляем переменные, инициализируем объект
	var i, alph = { I:1, V:5, X:10, L:50, C:100, D:500, M:1000 };
	// j - счетчик символов
	// h - результат предыдущих вычислений
	// n - возвращаемое число
	// По буквам строки/римского числа
	for(var h = 0, j = 0, n = 0; j < arguments[0].length; j++) {
		// используем объект как ассоциативный массив - по римской цифре определяем арабскую
		i = alph[arguments[0].charAt(j).toUpperCase()];
	/*	// строку ниже, в данном случае, можно записать так:
				if(i != undefined) {		// римская цифра?
					if(h < i) {				// предыдующая цифра < текущей, вычитаем
						h = i - h * 2;		// т.е. h = i - (h << 1)
					}
					else {					// предыдующая цифра >= текущей, получаем эту цифру			
						h = i;
					}
					n += h;					// собираем число
				}							*/
		if(i) n += h = (h < i ? i - (h << 1) : i);
	}
	// возвращаем число
	return n;
}

// Переводит арабские числа в римские 
var num = prompt("Введите число", 19); // default - 19
if(num) alert(ArabicToRoman(num));

function ArabicToRoman() {
	// массив соответствий римских и арабских чисел
	var alph = [["I",1], ["IV",4], ["V",5], ["IX",9], ["X",10], ["XL",40], ["L",50], ["XC",90], ["C",100], ["CD",400], ["D",500], ["CM",900], ["M",1000]];
	// j - счетчик эл. массива
	// i - число (арабское), кот. требуется перевести
	// n - возвращаемое римское число
	// По элементам массива -> от большего к меньшему
	for(var j = alph.length - 1, i = arguments[0], n = ""; j != -1; j--) {
	/*	строку ниже можно записать следующим образом
		if(~~(i / alph[j][1]) > 0) { 	// целочисленное деление и сравнение с 0
			n += alph[j][0];			// собираем римское число
			i -= alph[j][1];			// корректируем арабское число на то, кот. определили
			j++;						// проверяем пару (эл. массива) еще раз
		}							*/					
		if(~~(i / alph[j][1]) > 0) { n += alph[j][0]; i -= alph[j][1]; j++; }
	}
	// возвращаем римское число
	return n;
}

~~(i / alph[j][1]) > 0

(i / alph[j][1])|0

parseInt(i / alph[j][1])

alert( [2/2 | 0 > 1, (2/2 | 0) > 1] )

alert([1/3 * 1e10, parseInt(1/3 * 1e10), 1/3 * 1e10 | 0].join('\n'))

alert( [-2/2 | 0 > 0, (-2/2 | 0) > 0] )

Boolean(-2/2 | 0) === (-2/2 | 0) > 0

var x = [];
x[0] = ~~1.7;
x[1] = 1.7 | 0;
x[2] = 1.7 ^ 0;
x[3] = 1.7 >> 0;
x[4] = 1.7 << 0;
x[5] = 1.7 >>> 0;
x[6] = parseInt(1.7);
alert(x.join('\n'));