Question

急！谁能把这段vb代码转换为能在网页中执行的Javascript啊！

Dim a, b, c As String
a = Str(s) 's为用户输入的一串数字，注意：已经知道了具体的数字。(type=integer)
For i = 1 To Len(a)
Select Case Mid(a, i, 1)
Case 0
b = "零"
Case 1
b = "一"
Case 2
b = "二"
Case 3
b = "三"
Case 4
b = "四"
Case 5
b = "五"
Case 6
b = "六"
Case 7
b = "七"
Case 8
b = "八"
Case 9
b = "九"
End Select
c = c + b
Next
MsgBox c
要快啊！
只是为了写几几年（如：二零零九），只有四位！并不是写钱！

Answer 1

function hanzi(x){
x=x+"";
var hz=["零","一","二","三","四","五","六","七","八","九"];
var re="";
for(var i=0;i<x.length;i++){
re+=hz[Number(x.charAt(i))];
}
alert(re);
}
hanzi("9416410696");

Answer 2

这样切有问题的，没有大写的拾佰仟，超过9的数字就都不对了

那如果是动态页面的话也不用js,比如asp 用replace就可以了啊