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

实现上述功能的VB程序如下，请在横线处填入合适的代码。
Private Sub Commandl_Click （　　）
Dim i As Integer d As Integer,r As Integer
Dim rs As String,ansl As Integer,ans2 As Integer
For i=81 To 342
   ①
rs=““
Do While d＜＞0
r=d Mod 9
rs=str（r）+rs
      ②
Loop
ansl=val （rs）
’求出相应的七进制数，存储在变量ans2中，代码略
If ansl Mod 10=ans2\100 And ansl\100=ans2 Mod 10 And        ③Then
Text1．Text=   ④
Text2．Text=Str（ansl）
Text3．Text=Str（ans2）
End If
Next i
End Sub