有趣的进制数：编写VB程序找出符合条件的十进制自然数，该自然数的七进制与九进制都是三位数，且七进制与九进制的三位数码顺序正好相反，输出这个十进制数与对应的七进制和九进制数。程序运行界面如图所示。

实现上述功能的VB程序如下，请在划线处填入合适的代码。

Private Sub Command1_Click（）

  Dim i As Integer, d As Integer, r As integer

  Dim rs As string, ans1 As Integer, ans2 As Integer

  For i=81 To 342

    ①

    rs=“”

    Do While d ＜>0

      r = d Mod 9

      rs= str(r)+rs

      ②

    Loop

    ans1= Val(rs)

  ‘求出相应的七进制数，存储在变量ans2中，代码略

    If ans1 Mod 10=ans2\ 100 And ans1\ 100=ans2 Mod 10 And ③ Then

      Text1. Text=④

      Text2 Text= Str(ans1)

      Text3. Text= Str(ans2)

    End If

  Next i

End Sub