编写一个二进制列表程序，功能如下：在文本框Text1中输入位数n，单击“显示”按钮Command1，在列表框List1中顺序显示n位二进制编码。程序界面及代码如下。

Private Sub Command1_Click( )

    Dim tmp As String

    Dim n As Integer, t As Integer

    Dim i As Integer, j As Integer, k As Integer

    n = Val(Text1.Text)

    For i = 0 To  ⑴ 

        tmp = ""

        k = i

        For j = 1 To n

            t = k Mod 2

              ⑵  

              ⑶  

        Next j

        List1.AddItem tmp

    Next i

End Sub

可选的代码如下：

①2 ^ n -1

②2 ^ n

③k = k \2

④t=t\2

⑤tmp = Str(t) + tmp

⑥tmp = tmp +Str(t)

则程序（1）、（2）、（3）处的代码依次为（    ）

A、①⑤③

B、②④⑥

C、②⑤④

D、①⑥③