下列myDecimal函数的功能是字符串s表示的r进制数转变成十进制数。如s=“3a” , r=16，则结果是58。请

在_________处填入适当的内容完善程序。 Function myDecimal(ByVal s$, ByVal r%) As Integer Dim i%, c$, n% For i = 1 To Len(s) c = Mid(s, i, 1) Select Case c Case "a" To "z" n = Asc(c) - Asc("a") + 10 Case "A" To "Z" n = Asc(c) - Asc("A") + 10 Case Else n = Val(c) End Select myDecimal = _________ Next End Function

A、myDecimal + n * r

B、myDecimal + n * 10

C、myDecimal * 10 + n

D、myDecimal * r + n

E、(myDecimal + n) * r

F、(myDecimal + n) * 10