数制转换的函数定义如下,将100转变成16进制并在Text1中显示结果,正确的调用是____________。Function Trans(ByVal r%, ByVal n%)As String Dim a% Do While n > 0 a = n Mod r If a > 9 Then Trans = Chr(a + 55) & Trans Else Trans = a & Trans End If n = n \ r LoopEnd Function
A.
Text1.Text = Trans(100, 16)
B.
Text1.Text = Trans(16, 100)
C.
Trans(Text1.Text,100, 16)
D.
Trans(Text1.Text,16, 100)