Private Sub Command1_Click()

  Dim y As Long

  Text1.Text = ""

  y = f(3)

  Label1.Caption = Str(y)

End Sub

Function f(n As Integer) As Long

  Text1.Text = Text1.Text + Str(n)

  If n <= 1 Then

     f = 1

  Else

     f = f(n - 1) + 2

  End If

End Function

程序运行时，单击命令按钮Command1后，文本框Text1中显示的内容是（   ）

  Function f(n As Integer)As Long

    Text1．Text=Trim(Str(n))+Text1．Text             ‘函数Trim的作用是去掉字串首尾空格

    If n=1 Then

       f=1

    Else

       f=3*f(n＼2)

    End If

  End Function

  Private Sub Command1_Click()

    Text1．Text=“”

    Text1．Text=Trim(Str(f(8)))+Text1．Text

  End Sub

单击按钮Command1后，文本框Text1中显示的值是（  ）

  Private Sub Command1_Click()

    Dim k As Integer，a As Integer，b As Integer

    a=Val(Text1．Text)

    b=Val(Text2．Text)

    Label1．Caption=trans(a，b)

  End Sub

  Function trans(m As Integer，n As Integer)As String

    If m<>0 Then

       r=m Mod n

       trans=trans(m＼n，n)+Str(r)

    Else

      trans=0

     End If

    End Function

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

Function fg(n as Integer)As Integer

 If n=1 fg=1

 If n=2 fg=2

 If n>=3 fg=fg(n-1)+fg(n-2)

End Function

请问走完这8阶楼梯的走法有（  ）

def f(m, n):

    q=m%n

    if q == 0:

        return n

    else:

        return f(n,q)

print(f(14,10))