某同学在VB中编写了如下程序：

Private Sub Command1 Click()

    Label2 Caption = trans(Val(Text1. Text),Val(Text2. Text))

End Sub

Function trans(n As Integer, k As Integer) As String

    If n< >0 Then

        r = n Mod k

        trans = trans(n\ k, k)+Str(r)

    Else trans = 0

    End If

End function

程序运行时，在文本框Text1和Text2中分别输入11和3，则Label2中的输出结果是（    ）

A、102

B、201

C、3

D、113