题目内容
（请给出正确答案）
[单选题]
数制转换的函数定义如下，将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 Loop End 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)
答案
Text1.Text = Trans(16, 100)
如搜索结果不匹配，请 联系老师 获取答案
